libpurple/plugins/perl/libgaimperl.c

changeset 15987
71d668c3d56d
parent 15913
e4c15762aafa
parent 15986
49c0e6c8c116
child 15989
2023148e9514
--- a/libpurple/plugins/perl/libgaimperl.c	Mon Mar 26 01:11:46 2007 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,18 +0,0 @@
-#include <gmodule.h>
-
-#ifdef  __SUNPRO_C
-#pragma init (my_init)
-void my_init(void);
-
-void my_init() {
-#else
-void __attribute__ ((constructor)) my_init(void);
-
-void __attribute__ ((constructor)) my_init() {
-#endif
-
-	/* Very evil hack...puts perl.so's symbols in the global table
-	 * but does not create a circular dependancy because g_module_open
-	 * will only open the library once. */
-	g_module_open("perl.so", 0);
-}

mercurial