diff options
| author | Timo Sirainen <cras@irssi.org> | 2002-04-15 13:59:09 +0000 |
|---|---|---|
| committer | cras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564> | 2002-04-15 13:59:09 +0000 |
| commit | 8b9c4823bfb9a1b60f31aa62eb882143e3dec153 (patch) | |
| tree | 5370cc87f33e181e8d71933bddd701bb48093050 /src/perl | |
| parent | 15667ec7ff00b151fde5e9d9927bb75f00f7c79a (diff) | |
| download | irssi-8b9c4823bfb9a1b60f31aa62eb882143e3dec153.zip | |
Rewritten signal handling code - it wasn't supposed to come before 0.9 irssi
but it doesn't break much things and is needed for Qt port :)
git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2682 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl')
| -rw-r--r-- | src/perl/perl-signals.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/perl/perl-signals.c b/src/perl/perl-signals.c index eb3a8b48..eced9970 100644 --- a/src/perl/perl-signals.c +++ b/src/perl/perl-signals.c @@ -288,8 +288,8 @@ static void perl_signal_add_to_int(const char *signal, SV *func, g_hash_table_insert(table, signal_idp, siglist); if (!command) { - signal_add_to_id(MODULE_NAME, priority, rec->signal_id, - perl_signal_get_func(rec)); + signal_add_full_id(MODULE_NAME, priority, rec->signal_id, + perl_signal_get_func(rec), NULL); } } @@ -321,7 +321,7 @@ static void perl_signal_remove_list_one(GSList **siglist, PERL_SIGNAL_REC *rec) *siglist = g_slist_remove(*siglist, rec); if (*siglist == NULL) { - signal_remove_id(rec->signal_id, perl_signal_get_func(rec)); + signal_remove_id(rec->signal_id, perl_signal_get_func(rec), NULL); g_free(siglist); g_hash_table_remove(signals[rec->priority], signal_idp); } @@ -407,7 +407,8 @@ static int signal_destroy_hash(void *key, GSList **list, PERL_SCRIPT_REC *script *list = g_slist_remove(*list, rec); if (*list == NULL) { signal_remove_id(rec->signal_id, - perl_signal_get_func(rec)); + perl_signal_get_func(rec), + NULL); } perl_signal_destroy(rec); } |