[gaim-migrate @ 14466]

Sat, 19 Nov 2005 18:07:19 +0000

author
Stu Tomlinson <nosnilmot@pidgin.im>
date
Sat, 19 Nov 2005 18:07:19 +0000
changeset 12165
9f2d7e6b8707
parent 12164
b39dc890f640
child 12166
f70f508e87f6

[gaim-migrate @ 14466]
Fix the perl loader to compile with old perl (< 5.8.0) and old gcc (< 3)

plugins/perl/common/typemap file | annotate | diff | comparison | revisions
plugins/perl/perl-handlers.c file | annotate | diff | comparison | revisions
--- a/plugins/perl/common/typemap	Sat Nov 19 16:35:34 2005 +0000
+++ b/plugins/perl/common/typemap	Sat Nov 19 18:07:19 2005 +0000
@@ -211,7 +211,7 @@
 INPUT
 
 T_GaimObj
-	$var = gaim_perl_ref_object($arg);
+	$var = gaim_perl_ref_object($arg)
 
 
 OUTPUT
--- a/plugins/perl/perl-handlers.c	Sat Nov 19 16:35:34 2005 +0000
+++ b/plugins/perl/perl-handlers.c	Sat Nov 19 18:07:19 2005 +0000
@@ -11,6 +11,11 @@
 static char *perl_gtk_plugin_pref_cb;
 extern PerlInterpreter *my_perl;
 
+/* perl < 5.8.0 doesn't define PERL_MAGIC_ext */
+#ifndef PERL_MAGIC_ext
+#define PERL_MAGIC_ext '~'
+#endif
+
 /* For now a plugin can only have one action */
 void gaim_perl_plugin_action_cb(GaimPluginAction * gpa) {
 

mercurial