libpurple/plugins/perl/common/Server.xs

changeset 30758
5a5136914b3b
parent 25590
5f663e07dfb7
child 34608
3feba564faed
--- a/libpurple/plugins/perl/common/Server.xs	Sat Sep 04 17:47:46 2010 +0000
+++ b/libpurple/plugins/perl/common/Server.xs	Sun Sep 05 01:30:56 2010 +0000
@@ -144,6 +144,7 @@
 		g_hash_table_insert(t_GHash, t_key, t_value);
 	}
 	serv_join_chat(conn, t_GHash);
+	g_hash_table_destroy(t_GHash);
 
 void 
 serv_move_buddy(buddy, group1, group2)

mercurial