view plugins/perl/libgaimperl.c @ 11573:e3e21a3b2975

[gaim-migrate @ 13842] This closes the file handle when the file transfer is done. As far as I can tell, everything else still works correctly. committer: Tailor Script <[e-mail]>

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);
}