Mercurial > pidgin

changeset 6525:66689e2cb966

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[gaim-migrate @ 7042] Pass the GaimPlugin to the load/unload functions in the perl scripts. committer: Tailor Script <tailor@pidgin.im>
author Christian Hammond <chipx86@chipx86.com>
date Wed, 20 Aug 2003 10:45:12 +0000
parents 2d9857a0d8a3
children e162c765fe21
files plugins/perl/perl.c
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/plugins/perl/perl.c	Wed Aug 20 10:40:11 2003 +0000
+++ b/plugins/perl/perl.c	Wed Aug 20 10:45:12 2003 +0000
@@ -315,6 +315,8 @@
 	ENTER;
 	SAVETMPS;
 	PUSHMARK(SP);
+	XPUSHs(gaim_perl_ref_object(plugin));
+	PUTBACK;
 
 	perl_call_pv(gps->load_sub, G_NOARGS | G_EVAL | G_SCALAR);
 	SPAGAIN;
@@ -348,6 +350,8 @@
 	ENTER;
 	SAVETMPS;
 	PUSHMARK(SP);
+	XPUSHs(gaim_perl_ref_object(plugin));
+	PUTBACK;
 
 	perl_call_pv(gps->unload_sub, G_NOARGS | G_EVAL | G_SCALAR);
 	SPAGAIN;