Mercurial > pidgin3 / annotate

pidgin/plugins/perl/common/Pidgin.xs@29aec44ac483 (annotated)

pidgin/plugins/perl/common/Pidgin.xs

Sun, 23 Sep 2007 00:56:54 +0000

author
Gabriel Schulhof <nix@go-nix.ca>
date
Sun, 23 Sep 2007 00:56:54 +0000
changeset 20708
29aec44ac483
parent 16623
5d685c111d7b
child 16661
f3d9a3646735
child 18068
b6554e3c8224
child 35312
add13288757e
permissions
-rw-r--r--

Thanks to Sean, I know that Gtk::Window is perlese for GtkWindow *

16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
1 #define PIDGIN_PERL_BOOT_PROTO(x) \
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
2 void boot_Pidgin__##x(pTHX_ CV *cv)
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
3
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
4 #define PIDGIN_PERL_BOOT(x) \
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
5 purple_perl_callXS(boot_Pidgin__##x, cv, mark)
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
6
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
7 #include "gtkmodule.h"
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
8
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
9 /* Prototypes for the BOOT section below. */
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
10 PIDGIN_PERL_BOOT_PROTO(Account);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
11 PIDGIN_PERL_BOOT_PROTO(BuddyList);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
12 PIDGIN_PERL_BOOT_PROTO(Connection);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
13 PIDGIN_PERL_BOOT_PROTO(Conversation);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
14 PIDGIN_PERL_BOOT_PROTO(Conversation__Window);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
15 PIDGIN_PERL_BOOT_PROTO(Debug);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
16 PIDGIN_PERL_BOOT_PROTO(Dialogs);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
17 PIDGIN_PERL_BOOT_PROTO(IMHtml);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
18 PIDGIN_PERL_BOOT_PROTO(IMHtmlToolbar);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
19 PIDGIN_PERL_BOOT_PROTO(Log);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
20 PIDGIN_PERL_BOOT_PROTO(MenuTray);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
21 PIDGIN_PERL_BOOT_PROTO(Plugin);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
22 PIDGIN_PERL_BOOT_PROTO(PluginPref);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
23 PIDGIN_PERL_BOOT_PROTO(Pounce);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
24 PIDGIN_PERL_BOOT_PROTO(Prefs);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
25 PIDGIN_PERL_BOOT_PROTO(Privacy);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
26 PIDGIN_PERL_BOOT_PROTO(Roomlist);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
27 PIDGIN_PERL_BOOT_PROTO(Status);
14509
e46c4ed7e331 [gaim-migrate @ 17161]
Daniel Atallah <datallah@pidgin.im>
parents: 14478
diff changeset
28 #ifndef _WIN32
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
29 PIDGIN_PERL_BOOT_PROTO(Session);
14509
e46c4ed7e331 [gaim-migrate @ 17161]
Daniel Atallah <datallah@pidgin.im>
parents: 14478
diff changeset
30 #endif
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
31 PIDGIN_PERL_BOOT_PROTO(Sound);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
32 PIDGIN_PERL_BOOT_PROTO(StatusBox);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
33 PIDGIN_PERL_BOOT_PROTO(Themes);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
34 PIDGIN_PERL_BOOT_PROTO(Utils);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
35 PIDGIN_PERL_BOOT_PROTO(Xfer);
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
36
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
37 MODULE = Pidgin PACKAGE = Pidgin PREFIX = pidgin_
14478
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
38 PROTOTYPES: ENABLE
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
39
a6b831ab1d13 [gaim-migrate @ 17124]
Etan Reisner <deryni@pidgin.im>
parents:
diff changeset
40 BOOT:
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
41 PIDGIN_PERL_BOOT(Account);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
42 PIDGIN_PERL_BOOT(BuddyList);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
43 PIDGIN_PERL_BOOT(Connection);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
44 PIDGIN_PERL_BOOT(Conversation);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
45 PIDGIN_PERL_BOOT(Conversation__Window);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
46 PIDGIN_PERL_BOOT(Debug);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
47 PIDGIN_PERL_BOOT(Dialogs);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
48 PIDGIN_PERL_BOOT(IMHtml);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
49 PIDGIN_PERL_BOOT(IMHtmlToolbar);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
50 PIDGIN_PERL_BOOT(Log);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
51 PIDGIN_PERL_BOOT(MenuTray);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
52 PIDGIN_PERL_BOOT(Plugin);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
53 PIDGIN_PERL_BOOT(PluginPref);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
54 PIDGIN_PERL_BOOT(Pounce);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
55 PIDGIN_PERL_BOOT(Prefs);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
56 PIDGIN_PERL_BOOT(Privacy);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
57 PIDGIN_PERL_BOOT(Roomlist);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
58 PIDGIN_PERL_BOOT(Status);
14509
e46c4ed7e331 [gaim-migrate @ 17161]
Daniel Atallah <datallah@pidgin.im>
parents: 14478
diff changeset
59 #ifndef _WIN32
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
60 PIDGIN_PERL_BOOT(Session);
14509
e46c4ed7e331 [gaim-migrate @ 17161]
Daniel Atallah <datallah@pidgin.im>
parents: 14478
diff changeset
61 #endif
16529
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
62 PIDGIN_PERL_BOOT(Sound);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
63 PIDGIN_PERL_BOOT(StatusBox);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
64 PIDGIN_PERL_BOOT(Themes);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
65 PIDGIN_PERL_BOOT(Utils);
1d0da9270ff9 This is mostly moving Purple::GtkUI:: -> Pidgin:: which has the side effect of
Etan Reisner <deryni@pidgin.im>
parents: 15899
diff changeset
66 PIDGIN_PERL_BOOT(Xfer);

Mercurial Repository: pidgin3

mercurial