diff -r 8c34380ada83 -r 4918a5928b93 libpurple/plugins/perl/perl-handlers.c
--- a/libpurple/plugins/perl/perl-handlers.c	Thu Mar 04 17:08:19 2010 +0000
+++ b/libpurple/plugins/perl/perl-handlers.c	Thu Mar 04 21:25:50 2010 +0000
@@ -299,7 +299,7 @@
 	for (i = 0; i < value_count; i++) {
 		sv_args[i] = purple_perl_sv_from_vargs(values[i],
 #ifdef VA_COPY_AS_ARRAY
-		                                       args,
+		                                       (va_list*)args,
 #else
 		                                       (va_list*)&args,
 #endif