# HG changeset patch
# User Christian Hammond <chipx86@chipx86.com>
# Date 1061455975 0
# Node ID 65dc4d34f280b7c7e3e93d05b6701e5d633f56ae
# Parent  12343e2aaab13bcca3e6f63410c990677bcf1878
[gaim-migrate @ 7074]
We like it when data can be passed through callbacks.

committer: Tailor Script <tailor@pidgin.im>

diff -r 12343e2aaab1 -r 65dc4d34f280 plugins/perl/common/Gaim.xs
--- a/plugins/perl/common/Gaim.xs	Thu Aug 21 08:51:37 2003 +0000
+++ b/plugins/perl/common/Gaim.xs	Thu Aug 21 08:52:55 2003 +0000
@@ -5,13 +5,13 @@
 PROTOTYPES: ENABLE
 
 void
-timeout_add(plugin, seconds, func, arg)
+timeout_add(plugin, seconds, func, data)
 	Gaim::Plugin plugin
 	int seconds
 	const char *func
-	void *arg
+	SV *data
 CODE:
-	gaim_perl_timeout_add(plugin, seconds, func, arg);
+	gaim_perl_timeout_add(plugin, seconds, func, data);
 
 void
 debug(level, category, string)
@@ -38,7 +38,7 @@
 	const char *signal
 	Gaim::Plugin plugin
 	const char *func
-	void *data
+	SV *data
 CODE:
 	gaim_perl_signal_connect(plugin, instance, signal, func, data);