Mercurial > pidgin
annotate gtk/plugins/perl/common/GtkUI.xs @ 14569:7bf6f9102b77
[gaim-migrate @ 17293]
Here's the oops connected to my big commit, I knew there would be at least
one. Fix the main gtkperl module bootstrap stuff.
committer: Tailor Script <tailor@pidgin.im>
author | Etan Reisner <pidgin@unreliablesource.net> |
---|---|
date | Sun, 17 Sep 2006 06:30:12 +0000 |
parents | d6eae5115b31 |
children | 3ed24586efcb |
rev | line source |
---|---|
14567
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
1 #include "gtkmodule.h" |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
2 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
3 /* |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
4 #define GAIM_PERL_BOOT_PROTO(x) \ |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
5 void boot_Gaim__##x(pTHX_ CV *cv); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
6 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
7 #define GAIM_PERL_BOOT(x) \ |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
8 gaim_perl_callXS(boot_Gaim__##x, cv, mark) |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
9 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
10 static void |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
11 gaim_perl_callXS(void (*subaddr)(pTHX_ CV *cv), CV *cv, SV **mark) |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
12 { |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
13 dSP; |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
14 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
15 PUSHMARK(mark); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
16 (*subaddr)(aTHX_ cv); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
17 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
18 PUTBACK; |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
19 } |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
20 */ |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
21 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
22 /* Prototypes for the BOOT section below. */ |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
23 GAIM_PERL_BOOT_PROTO(GtkUI__Account); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
24 GAIM_PERL_BOOT_PROTO(GtkUI__BuddyList); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
25 GAIM_PERL_BOOT_PROTO(GtkUI__Connection); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
26 GAIM_PERL_BOOT_PROTO(GtkUI__Conversation); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
27 GAIM_PERL_BOOT_PROTO(GtkUI__Conversation__Window); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
28 GAIM_PERL_BOOT_PROTO(GtkUI__Debug); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
29 GAIM_PERL_BOOT_PROTO(GtkUI__Dialogs); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
30 GAIM_PERL_BOOT_PROTO(GtkUI__IMHtml); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
31 GAIM_PERL_BOOT_PROTO(GtkUI__IMHtmlToolbar); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
32 GAIM_PERL_BOOT_PROTO(GtkUI__Log); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
33 GAIM_PERL_BOOT_PROTO(GtkUI__MenuTray); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
34 GAIM_PERL_BOOT_PROTO(GtkUI__Plugin); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
35 GAIM_PERL_BOOT_PROTO(GtkUI__PluginPref); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
36 GAIM_PERL_BOOT_PROTO(GtkUI__Pounce); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
37 GAIM_PERL_BOOT_PROTO(GtkUI__Prefs); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
38 GAIM_PERL_BOOT_PROTO(GtkUI__Privacy); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
39 GAIM_PERL_BOOT_PROTO(GtkUI__Roomlist); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
40 GAIM_PERL_BOOT_PROTO(GtkUI__Status); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
41 #ifndef _WIN32 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
42 GAIM_PERL_BOOT_PROTO(GtkUI__Session); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
43 #endif |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
44 GAIM_PERL_BOOT_PROTO(GtkUI__Sound); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
45 GAIM_PERL_BOOT_PROTO(GtkUI__StatusBox); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
46 GAIM_PERL_BOOT_PROTO(GtkUI__Themes); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
47 GAIM_PERL_BOOT_PROTO(GtkUI__Utils); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
48 GAIM_PERL_BOOT_PROTO(GtkUI__Xfer); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
49 |
14569
7bf6f9102b77
[gaim-migrate @ 17293]
Etan Reisner <pidgin@unreliablesource.net>
parents:
14567
diff
changeset
|
50 MODULE = Gaim::GtkUI PACKAGE = Gaim::GtkUI PREFIX = gaim_gtk_ |
14567
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
51 PROTOTYPES: ENABLE |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
52 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
53 BOOT: |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
54 GAIM_PERL_BOOT(GtkUI__Account); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
55 GAIM_PERL_BOOT(GtkUI__BuddyList); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
56 GAIM_PERL_BOOT(GtkUI__Connection); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
57 GAIM_PERL_BOOT(GtkUI__Conversation); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
58 GAIM_PERL_BOOT(GtkUI__Conversation__Window); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
59 GAIM_PERL_BOOT(GtkUI__Debug); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
60 GAIM_PERL_BOOT(GtkUI__Dialogs); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
61 GAIM_PERL_BOOT(GtkUI__IMHtml); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
62 GAIM_PERL_BOOT(GtkUI__IMHtmlToolbar); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
63 GAIM_PERL_BOOT(GtkUI__Log); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
64 GAIM_PERL_BOOT(GtkUI__MenuTray); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
65 GAIM_PERL_BOOT(GtkUI__Plugin); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
66 GAIM_PERL_BOOT(GtkUI__PluginPref); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
67 GAIM_PERL_BOOT(GtkUI__Pounce); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
68 GAIM_PERL_BOOT(GtkUI__Prefs); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
69 GAIM_PERL_BOOT(GtkUI__Privacy); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
70 GAIM_PERL_BOOT(GtkUI__Roomlist); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
71 GAIM_PERL_BOOT(GtkUI__Status); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
72 #ifndef _WIN32 |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
73 GAIM_PERL_BOOT(GtkUI__Session); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
74 #endif |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
75 GAIM_PERL_BOOT(GtkUI__Sound); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
76 GAIM_PERL_BOOT(GtkUI__StatusBox); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
77 GAIM_PERL_BOOT(GtkUI__Themes); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
78 GAIM_PERL_BOOT(GtkUI__Utils); |
d6eae5115b31
[gaim-migrate @ 17291]
Etan Reisner <pidgin@unreliablesource.net>
parents:
diff
changeset
|
79 GAIM_PERL_BOOT(GtkUI__Xfer); |