Mercurial > pidgin.yaz
comparison libpurple/plugins/perl/common/Certificate.xs @ 27017:31f65046b92d
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 |
comparison
equal
deleted
inserted
replaced
| 27016:c162a088489f | 27017:31f65046b92d |
|---|---|
| 212 Purple::Certificate crt | 212 Purple::Certificate crt |
| 213 PREINIT: | 213 PREINIT: |
| 214 GByteArray *gba = NULL; | 214 GByteArray *gba = NULL; |
| 215 CODE: | 215 CODE: |
| 216 gba = purple_certificate_get_fingerprint_sha1(crt); | 216 gba = purple_certificate_get_fingerprint_sha1(crt); |
| 217 RETVAL = newSVpv(gba->data, gba->len); | 217 RETVAL = newSVpv((gchar *)gba->data, gba->len); |
| 218 g_byte_array_free(gba, TRUE); | 218 g_byte_array_free(gba, TRUE); |
| 219 OUTPUT: | 219 OUTPUT: |
| 220 RETVAL | 220 RETVAL |
| 221 | 221 |
| 222 void | 222 void |