Mercurial > pidgin.yaz
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 |