view plugins/perl/libgaimperl.c @ 12387:1112a9ef2cc6

[gaim-migrate @ 14693] Fix a leak. This compiles, but I'm now seeing all sorts of random segfaults, both with this code and prior to the change. Thus, I'm fairly sure this change isn't at fault. committer: Tailor Script <tailor@pidgin.im>
author Richard Laager <rlaager@wiktel.com>
date Wed, 07 Dec 2005 09:16:25 +0000
parents f8cd06753755
children a4229dd9c76a
line wrap: on
line source

#include <gmodule.h>
void __attribute__ ((constructor)) my_init(void) {
	/* 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);
}