summaryrefslogtreecommitdiff
path: root/src/perl/perl-signals.h
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-12-06 17:17:40 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-12-06 17:17:40 +0000
commit31dcd8258f8f52c065e4297f7abecc5dd0a7d0a2 (patch)
treefc3cdc763159ad896422775addb1a763d53536ee /src/perl/perl-signals.h
parent9dd46372ff722a54d70ae383b79542f6d3c60200 (diff)
downloadirssi-31dcd8258f8f52c065e4297f7abecc5dd0a7d0a2.zip
Irssi::signal_add(), Irssi::timeout_add(), Irssi::input_add() and their
variants now also allow use of code references. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2199 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/perl-signals.h')
-rw-r--r--src/perl/perl-signals.h12
1 files changed, 6 insertions, 6 deletions
diff --git a/src/perl/perl-signals.h b/src/perl/perl-signals.h
index a4df2740..33e0c1b8 100644
--- a/src/perl/perl-signals.h
+++ b/src/perl/perl-signals.h
@@ -1,7 +1,7 @@
#ifndef __PERL_SIGNALS_H
#define __PERL_SIGNALS_H
-void perl_signal_add_to(const char *signal, const char *func, int priority);
+void perl_signal_add_to(const char *signal, SV *func, int priority);
#define perl_signal_add_first(signal, func) \
perl_signal_add_to(signal, func, 0)
#define perl_signal_add(signal, func) \
@@ -9,12 +9,12 @@ void perl_signal_add_to(const char *signal, const char *func, int priority);
#define perl_signal_add_last(signal, func) \
perl_signal_add_to(signal, func, 2)
-void perl_signal_remove(const char *signal, const char *func);
-/* remove all signals used by package */
-void perl_signal_remove_package(const char *package);
+void perl_signal_remove(const char *signal, SV *func);
+/* remove all signals used by script */
+void perl_signal_remove_script(PERL_SCRIPT_REC *script);
void perl_command_bind_to(const char *cmd, const char *category,
- const char *func, int priority);
+ SV *func, int priority);
#define perl_command_bind_first(cmd, category, func) \
perl_command_bind_to(cmd, category, func, 0)
#define perl_command_bind(cmd, category, func) \
@@ -22,7 +22,7 @@ void perl_command_bind_to(const char *cmd, const char *category,
#define perl_command_bind_last(cmd, category, func) \
perl_command_bind_to(cmd, category, func, 2)
-void perl_command_unbind(const char *cmd, const char *func);
+void perl_command_unbind(const char *cmd, SV *func);
void perl_signals_start(void);
void perl_signals_stop(void);