comparison libpurple/plugins/perl/common/Server.xs @ 30920:a2d5bafdbea9

perl: Fix chat-related functions. Purple::BuddyList::Chat::new needs to copy the strings, since the GHashTable is long-listing. The serv_join_chat wrapper needs to free the hash table, since that one isn't owned by the prpl.
author Paul Aurich <paul@darkrain42.org>
date Sun, 05 Sep 2010 01:30:56 +0000
parents 1946af161630
children
comparison
equal deleted inserted replaced
30919:54461ce5f7e0 30920:a2d5bafdbea9
142 t_value = SvPVutf8_nolen(t_SV); 142 t_value = SvPVutf8_nolen(t_SV);
143 143
144 g_hash_table_insert(t_GHash, t_key, t_value); 144 g_hash_table_insert(t_GHash, t_key, t_value);
145 } 145 }
146 serv_join_chat(conn, t_GHash); 146 serv_join_chat(conn, t_GHash);
147 g_hash_table_destroy(t_GHash);
147 148
148 void 149 void
149 serv_move_buddy(buddy, group1, group2) 150 serv_move_buddy(buddy, group1, group2)
150 Purple::BuddyList::Buddy buddy 151 Purple::BuddyList::Buddy buddy
151 Purple::BuddyList::Group group1 152 Purple::BuddyList::Group group1