summaryrefslogtreecommitdiff
path: root/src/perl/perl-common.c
diff options
context:
space:
mode:
authorTimo Sirainen <cras@irssi.org>2001-08-07 15:25:41 +0000
committercras <cras@dbcabf3a-b0e7-0310-adc4-f8d773084564>2001-08-07 15:25:41 +0000
commitb80d4e62ab1c8eec62c13cbb9966429914f3a9f5 (patch)
tree9d559a4b7ad855e948c4bc5733dca5f9569a0191 /src/perl/perl-common.c
parent1db558b8ea0f283d63567ee17a625fd5cf6a08a1 (diff)
downloadirssi-b80d4e62ab1c8eec62c13cbb9966429914f3a9f5.zip
/SCRIPT RESET didn't work properly (start/stop functions were called in
wrong order). Added a few extra deinits. git-svn-id: http://svn.irssi.org/repos/irssi/trunk@1712 dbcabf3a-b0e7-0310-adc4-f8d773084564
Diffstat (limited to 'src/perl/perl-common.c')
-rw-r--r--src/perl/perl-common.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/perl/perl-common.c b/src/perl/perl-common.c
index ef15b99a..1109dee6 100644
--- a/src/perl/perl-common.c
+++ b/src/perl/perl-common.c
@@ -561,12 +561,15 @@ void perl_common_stop(void)
{
g_hash_table_foreach(iobject_stashes, (GHFunc) free_iobject_hash, NULL);
g_hash_table_destroy(iobject_stashes);
+ iobject_stashes = NULL;
g_hash_table_foreach(plain_stashes, (GHFunc) g_free, NULL);
g_hash_table_destroy(plain_stashes);
+ plain_stashes = NULL;
g_slist_foreach(use_protocols, (GFunc) g_free, NULL);
- g_slist_free(use_protocols);
+ g_slist_free(use_protocols);
+ use_protocols = NULL;
signal_remove("chat protocol created", (SIGNAL_FUNC) perl_register_protocol);
signal_remove("chat protocol destroyed", (SIGNAL_FUNC) perl_unregister_protocol);