Mercurial > pidgin.yaz

diff libpurple/plugins/perl/common/BuddyList.xs @ 23710:6f47135f5378

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Some cleanup and a couple leak fixes.
author Daniel Atallah <daniel.atallah@gmail.com>
date Thu, 07 Aug 2008 01:41:44 +0000
parents 4b33d4185342
children 907f5f41e32a
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/BuddyList.xs	Thu Aug 07 01:08:37 2008 +0000
+++ b/libpurple/plugins/perl/common/BuddyList.xs	Thu Aug 07 01:41:44 2008 +0000
@@ -362,7 +362,7 @@
 	for (t_HE = hv_iternext(t_HV); t_HE != NULL; t_HE = hv_iternext(t_HV) ) {
 		t_key = hv_iterkey(t_HE, &len);
 		t_SV = *hv_fetch(t_HV, t_key, len, 0);
-		t_value = SvPV(t_SV, PL_na);
+		t_value = SvPVutf8_nolen(t_SV);
 
 		g_hash_table_insert(t_GHash, t_key, t_value);
 	}