Mercurial > pidgin.yaz
annotate pidgin/plugins/perl/common/GtkThemes.xs @ 32619:17c27a527004
Add some boilerplate Conversation theme GObjects. These don't do
anything yet, and aren't used either.
author | Elliott Sales de Andrade <qulogic@pidgin.im> |
---|---|
date | Sat, 17 Sep 2011 05:27:30 +0000 |
parents | b54abfe11fc5 |
children |
rev | line source |
---|---|
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
1 #include "gtkmodule.h" |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
2 |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
3 MODULE = Pidgin::Themes PACKAGE = Pidgin::Themes PREFIX = pidgin_themes_ |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
4 PROTOTYPES: ENABLE |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
5 |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
6 void |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
7 pidgin_themes_init() |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
8 |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
9 gboolean |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
10 pidgin_themes_smileys_disabled() |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
11 |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
12 void |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
13 pidgin_themes_smiley_theme_probe() |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
14 |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
15 void |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
16 pidgin_themes_load_smiley_theme(file, load) |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
17 const char * file |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
18 gboolean load |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
19 |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
20 void |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
21 pidgin_themes_get_proto_smileys(id) |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
22 const char * id |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
23 PREINIT: |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
24 GSList *l; |
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
25 PPCODE: |
16211
b54abfe11fc5
Rename a number of Perl functions which were munged at some point
Warren Togami <wtogami>
parents:
15838
diff
changeset
|
26 for (l = pidgin_themes_get_proto_smileys(id); l != NULL; l = l->next) { |
15838
e622745f6f42
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <daniel.atallah@gmail.com>
parents:
15526
diff
changeset
|
27 XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::IMHtml::Smiley"))); |
15374
5fe8042783c1
Rename gtk/ and libgaim/ to pidgin/ and libpurple/
Sean Egan <seanegan@gmail.com>
parents:
diff
changeset
|
28 } |