diff options
-rw-r--r-- | src/perl/common/Core.xs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/perl/common/Core.xs b/src/perl/common/Core.xs index bd7d9fe2..6889d137 100644 --- a/src/perl/common/Core.xs +++ b/src/perl/common/Core.xs @@ -438,17 +438,17 @@ PPCODE: void command_bind_first(...) CODE: - handle_command_bind(0, items, ST(0), ST(1), ST(2)); + handle_command_bind(SIGNAL_PRIORITY_HIGH, items, ST(0), ST(1), ST(2)); void command_bind(...) CODE: - handle_command_bind(1, items, ST(0), ST(1), ST(2)); + handle_command_bind(SIGNAL_PRIORITY_DEFAULT, items, ST(0), ST(1), ST(2)); void command_bind_last(...) CODE: - handle_command_bind(2, items, ST(0), ST(1), ST(2)); + handle_command_bind(SIGNAL_PRIORITY_LOW, items, ST(0), ST(1), ST(2)); void command_runsub(cmd, data, server, item) |