# HG changeset patch
# User Christian Hammond <chipx86@chipx86.com>
# Date 1065938345 0
# Node ID d3a7ff6a91bbf41ba7247adfbada381f51dd78f0
# Parent  3875b924d622b989b66b5cd6bea3b17b0b31ef20
[gaim-migrate @ 7815]
Let's try this instead.

committer: Tailor Script <tailor@pidgin.im>

diff -r 3875b924d622 -r d3a7ff6a91bb plugins/perl/perl-common.c
--- a/plugins/perl/perl-common.c	Sun Oct 12 05:25:41 2003 +0000
+++ b/plugins/perl/perl-common.c	Sun Oct 12 05:59:05 2003 +0000
@@ -545,7 +545,7 @@
 				if ((*copy_arg = (void *)va_arg(*args, char *)) == NULL)
 					return &PL_sv_undef;
 
-				return newSVGChar(*(char *)*copy_arg);
+				return newSVGChar((char *)*copy_arg);
 
 			case GAIM_TYPE_POINTER:
 				if ((*copy_arg = (void *)va_arg(*args, void *)) == NULL)