[Gaim-commits] CVS: gaim/src perl.c,1.70,1.71

[Sean E. <sea...@us...>]

Update of /cvsroot/gaim/gaim/src
In directory usw-pr-cvs1:/tmp/cvs-serv14608/src

Modified Files:
	perl.c 
Log Message:
This is what I meant.


Index: perl.c
===================================================================
RCS file: /cvsroot/gaim/gaim/src/perl.c,v
retrieving revision 1.70
retrieving revision 1.71
diff -u -d -r1.70 -r1.71
--- perl.c	25 Apr 2002 05:41:27 -0000	1.70
+++ perl.c	25 Apr 2002 05:48:20 -0000	1.71
@@ -715,9 +715,9 @@
 	case event_chat_recv:
 		{
 		char *t3, *t4;
-		t3 = g_strdup(escape_quotes(arg3));
-		t4 = arg4 ? g_strdup(escape_quotes(arg4)) : g_malloc0(1);
-		buf = g_strdup_printf("'%lu','%d','%s','%s'", (unsigned long)arg1, (int)arg2, *t3, *t4);
+		t3 = g_strdup(escape_quotes(*(char **)arg3));
+		t4 = *(char **)arg4 ? g_strdup(escape_quotes(*(char **)arg4)) : g_malloc0(1);
+		buf = g_strdup_printf("'%lu','%d','%s','%s'", (unsigned long)arg1, (int)arg2, t3, t4);
 		g_free(t3);
 		g_free(t4);
 		}