diff options
Diffstat (limited to 'src/perl/irssi-perl.c')
| -rw-r--r-- | src/perl/irssi-perl.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/perl/irssi-perl.c b/src/perl/irssi-perl.c index e4f616e9..edf4ea5e 100644 --- a/src/perl/irssi-perl.c +++ b/src/perl/irssi-perl.c @@ -143,6 +143,9 @@ static void signal_destroy_hash(void *key, GSList *list) while (list != NULL) { PERL_SIGNAL_REC *rec = list->data; + if (strncmp(rec->signal, "command ", 8) == 0) + command_unbind(rec->signal+8, NULL); + list = g_slist_remove(list, rec); g_free(rec->signal); |