libpurple/plugins/perl/libpurpleperl.c

Wed, 13 May 2009 20:29:03 +0000

author
Marcus Lundblad <malu@pidgin.im>
date
Wed, 13 May 2009 20:29:03 +0000
changeset 27110
05ca719b901b
parent 15987
71d668c3d56d
child 16238
33bf2fd32108
child 18068
b6554e3c8224
child 20478
46933dc62880
permissions
-rw-r--r--

Support custom smileys in MUCs (when all participants support BoB and a maximum
of 10 participants are in the chat).
Always announce support for BoB, since disable custom smileys will still turn
off fetching them, and BoB can be used for other purposes further on.

11862
5d4bc6d54688 [gaim-migrate @ 14153]
Stu Tomlinson <nosnilmot@pidgin.im>
parents: 11120
diff changeset
1 #include <gmodule.h>
15611
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
2
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
3 #ifdef __SUNPRO_C
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
4 #pragma init (my_init)
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
5 void my_init(void);
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
6
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
7 void my_init() {
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
8 #else
12418
77abb6df8ee6 [gaim-migrate @ 14725]
Richard Laager <rlaager@pidgin.im>
parents: 11862
diff changeset
9 void __attribute__ ((constructor)) my_init(void);
77abb6df8ee6 [gaim-migrate @ 14725]
Richard Laager <rlaager@pidgin.im>
parents: 11862
diff changeset
10
77abb6df8ee6 [gaim-migrate @ 14725]
Richard Laager <rlaager@pidgin.im>
parents: 11862
diff changeset
11 void __attribute__ ((constructor)) my_init() {
15611
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
12 #endif
5cb407a7d44a SF Patch #1637687 from Damien Carbery
Richard Laager <rlaager@pidgin.im>
parents: 15435
diff changeset
13
12418
77abb6df8ee6 [gaim-migrate @ 14725]
Richard Laager <rlaager@pidgin.im>
parents: 11862
diff changeset
14 /* Very evil hack...puts perl.so's symbols in the global table
77abb6df8ee6 [gaim-migrate @ 14725]
Richard Laager <rlaager@pidgin.im>
parents: 11862
diff changeset
15 * but does not create a circular dependancy because g_module_open
77abb6df8ee6 [gaim-migrate @ 14725]
Richard Laager <rlaager@pidgin.im>
parents: 11862
diff changeset
16 * will only open the library once. */
11120
beeb901ca8a9 [gaim-migrate @ 13176]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
17 g_module_open("perl.so", 0);
beeb901ca8a9 [gaim-migrate @ 13176]
John H. Kelm <johnkelm@gmail.com>
parents:
diff changeset
18 }

mercurial