# HG changeset patch
# User Eric Warmenhoven <eric@warmenhoven.org>
# Date 1005207643 0
# Node ID c17afaccaf09439987bd80cf98b775f8c3ceffde
# Parent  d4be9f5b8d58fefc738538f5cf51298736eeddeb
[gaim-migrate @ 2709]
John Watson fixes more things :)

committer: Tailor Script <tailor@pidgin.im>

diff -r d4be9f5b8d58 -r c17afaccaf09 src/perl.c
--- a/src/perl.c	Thu Nov 08 02:39:40 2001 +0000
+++ b/src/perl.c	Thu Nov 08 08:20:43 2001 +0000
@@ -761,7 +761,7 @@
 		char *tmp2, *tmp3;
 		tmp2 = g_strdup(escape_quotes(arg2));
 		tmp3 = arg3 ? g_strdup(escape_quotes(arg3)) : g_malloc0(1);
-		buf = g_strdup_printf("'%lu','\"%s\"','%s'", (unsigned long)arg1, tmp2, tmp3);
+		buf = g_strdup_printf("'%lu','%s','%s'", (unsigned long)arg1, tmp2, tmp3);
 		g_free(tmp2);
 		g_free(tmp3);
 		}