Mercurial > pidgin
comparison libpurple/plugins/perl/libpurpleperl.c @ 15884:c6e563dfaa7a
More s/gaim/pidgin/ and s/gaim/purple/ and make the RPM spec file work a bit
author | Stu Tomlinson <stu@nosnilmot.com> |
---|---|
date | Sat, 24 Mar 2007 17:51:05 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
15883:bfa907029bfc | 15884:c6e563dfaa7a |
---|---|
1 #include <gmodule.h> | |
2 | |
3 #ifdef __SUNPRO_C | |
4 #pragma init (my_init) | |
5 void my_init(void); | |
6 | |
7 void my_init() { | |
8 #else | |
9 void __attribute__ ((constructor)) my_init(void); | |
10 | |
11 void __attribute__ ((constructor)) my_init() { | |
12 #endif | |
13 | |
14 /* Very evil hack...puts perl.so's symbols in the global table | |
15 * but does not create a circular dependancy because g_module_open | |
16 * will only open the library once. */ | |
17 g_module_open("perl.so", 0); | |
18 } |