Mercurial > pidgin

diff libpurple/plugins/perl/common/Certificate.xs @ 26935:31f65046b92d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Various perl warning fixes as well as real fixes to gconstpointer functions SvPV, et al. take a char*, whereas the cipher and base16/64 encoding functions return unsigned char*s, so cast away warnings about those distinctions. get_image_extension and get_image_filename take a (char *, len) as arguments, but the generated glue code wasn't interepreting the data as a giant array. I think purple_imgstore_get_data is also broken, but is not fixed.
author Paul Aurich <paul@darkrain42.org>
date Fri, 22 May 2009 04:56:05 +0000
parents bf2ca2c5ac40
children 1bcedeb32bb4
line wrap: on
line diff
--- a/libpurple/plugins/perl/common/Certificate.xs	Fri May 22 04:44:07 2009 +0000
+++ b/libpurple/plugins/perl/common/Certificate.xs	Fri May 22 04:56:05 2009 +0000
@@ -214,7 +214,7 @@
 		GByteArray *gba = NULL;
 	CODE:
 		gba = purple_certificate_get_fingerprint_sha1(crt);
-		RETVAL = newSVpv(gba->data, gba->len);
+		RETVAL = newSVpv((gchar *)gba->data, gba->len);
 		g_byte_array_free(gba, TRUE);
 	OUTPUT:
 		RETVAL