Thu, 05 Sep 2013 21:59:11 +0530
Replacements for the GObject Xfer API
|
24569
5dbd0617a27d
Build everything with the *_DISABLE_DEPRECATED flags set. This allows us
Richard Laager <rlaager@pidgin.im>
parents:
15899
diff
changeset
|
1 | /* Allow the Perl code to see deprecated functions, so we can continue to |
|
5dbd0617a27d
Build everything with the *_DISABLE_DEPRECATED flags set. This allows us
Richard Laager <rlaager@pidgin.im>
parents:
15899
diff
changeset
|
2 | * export them to Perl plugins. */ |
|
5dbd0617a27d
Build everything with the *_DISABLE_DEPRECATED flags set. This allows us
Richard Laager <rlaager@pidgin.im>
parents:
15899
diff
changeset
|
3 | #undef PIDGIN_DISABLE_DEPRECATED |
|
5dbd0617a27d
Build everything with the *_DISABLE_DEPRECATED flags set. This allows us
Richard Laager <rlaager@pidgin.im>
parents:
15899
diff
changeset
|
4 | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
5 | typedef struct group *Pidgin__Group; |
| 14478 | 6 | |
| 7 | #define group perl_group | |
| 8 | ||
| 9 | #include <glib.h> | |
| 10 | #include <gtk/gtk.h> | |
| 11 | #ifdef _WIN32 | |
| 12 | #undef pipe | |
| 13 | #endif | |
| 14 | #include <EXTERN.h> | |
| 15 | #include <perl.h> | |
| 16 | #include <XSUB.h> | |
| 17 | ||
| 18 | #undef group | |
| 19 | ||
| 20 | #include <plugins/perl/common/module.h> | |
| 21 | ||
| 22 | #include "gtkaccount.h" | |
|
34708
dd67596485ca
Undo renames of UI blist headers back to gntblist.h and gtkblist.h
Ankit Vani <a@nevitus.org>
parents:
34706
diff
changeset
|
23 | #include "gtkblist.h" |
| 14478 | 24 | #include "gtkconn.h" |
| 25 | #include "gtkconv.h" | |
| 26 | #include "gtkconvwin.h" | |
| 27 | #include "gtkdebug.h" | |
| 28 | #include "gtkdialogs.h" | |
|
34910
60502558e400
Replacements for the GObject Xfer API
Ankit Vani <a@nevitus.org>
parents:
34708
diff
changeset
|
29 | #include "gtkxfer.h" |
| 14478 | 30 | #include "gtkimhtml.h" |
| 31 | #include "gtkimhtmltoolbar.h" | |
| 32 | #include "gtklog.h" | |
| 33 | #include "gtkmenutray.h" | |
| 34 | #include "gtkplugin.h" | |
| 35 | #include "gtkpluginpref.h" | |
| 36 | #include "gtkpounce.h" | |
| 37 | #include "gtkprefs.h" | |
| 38 | #include "gtkprivacy.h" | |
| 39 | #include "gtkroomlist.h" | |
| 40 | #include "gtksavedstatuses.h" | |
| 41 | #include "gtksession.h" | |
| 42 | #include "gtksound.h" | |
| 43 | #include "gtkstatusbox.h" | |
| 44 | #include "gtkthemes.h" | |
| 45 | #include "gtkutils.h" | |
| 46 | ||
| 47 | /* gtkaccount.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
48 | typedef PidginAccountDialogType Pidgin__Account__Dialog__Type; |
| 14478 | 49 | |
|
34708
dd67596485ca
Undo renames of UI blist headers back to gntblist.h and gtkblist.h
Ankit Vani <a@nevitus.org>
parents:
34706
diff
changeset
|
50 | /* gtkblist.h */ |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
51 | typedef PidginBuddyList * Pidgin__BuddyList; |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
52 | typedef pidgin_blist_sort_function Pidgin__BuddyList__SortFunction; |
| 14478 | 53 | |
| 54 | /* gtkconv.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
55 | typedef PidginConversation * Pidgin__Conversation; |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15884
diff
changeset
|
56 | typedef PidginUnseenState Pidgin__UnseenState; |
| 14478 | 57 | |
| 58 | /* gtkconvwin.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
59 | typedef PidginWindow * Pidgin__Conversation__Window; |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15884
diff
changeset
|
60 | typedef PidginConvPlacementFunc Pidgin__Conversation__PlacementFunc; |
| 14478 | 61 | |
|
34910
60502558e400
Replacements for the GObject Xfer API
Ankit Vani <a@nevitus.org>
parents:
34708
diff
changeset
|
62 | /* gtkxfer.h */ |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
63 | typedef PidginXferDialog * Pidgin__Xfer__Dialog; |
| 14478 | 64 | |
| 65 | /* gtkimhtml.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
66 | typedef GtkIMHtml * Pidgin__IMHtml; |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
67 | typedef GtkIMHtmlButtons Pidgin__IMHtml__Buttons; |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
68 | typedef GtkIMHtmlFuncs * Pidgin__IMHtml__Funcs; |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
69 | typedef GtkIMHtmlScalable * Pidgin__IMHtml__Scalable; |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
70 | typedef GtkIMHtmlSmiley * Pidgin__IMHtml__Smiley; |
|
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
71 | typedef GtkIMHtmlOptions Pidgin__IMHtml__Options; |
| 14478 | 72 | |
| 73 | /* gtkimhtmltoolbar.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
74 | typedef GtkIMHtmlToolbar * Pidgin__IMHtmlToolbar; |
| 14478 | 75 | |
| 76 | /* gtkmenutray.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
77 | typedef PidginMenuTray * Pidgin__MenuTray; |
| 14478 | 78 | |
| 79 | /* gtkstatusbox.h */ | |
|
15590
c07dd12bf3f4
Partial fix for pidgin perl support. Fixing fully is going to require a decision on splitting from some of the core perl support - more than I want to deal with right now.
Daniel Atallah <datallah@pidgin.im>
parents:
15577
diff
changeset
|
80 | typedef PidginStatusBox * Pidgin__StatusBox; |