Sat, 28 Apr 2007 01:46:53 +0000
Delete the right things, and some other things, while building an RPM.
Hopefully this will make building an RPM happier and the resulting RPM less
noisy about our new split prpl things.
| 14478 | 1 | #include "gtkmodule.h" |
| 2 | ||
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
3 | MODULE = Pidgin::Themes PACKAGE = Pidgin::Themes PREFIX = pidgin_themes_ |
| 14478 | 4 | PROTOTYPES: ENABLE |
| 5 | ||
| 6 | void | |
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
7 | pidgin_themes_init() |
| 14478 | 8 | |
| 9 | gboolean | |
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
10 | pidgin_themes_smileys_disabled() |
| 14478 | 11 | |
| 12 | void | |
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
13 | pidgin_themes_smiley_theme_probe() |
| 14478 | 14 | |
| 15 | void | |
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
16 | pidgin_themes_load_smiley_theme(file, load) |
| 14478 | 17 | const char * file |
| 18 | gboolean load | |
| 19 | ||
| 20 | void | |
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
21 | pidgin_themes_get_proto_smileys(id) |
| 14478 | 22 | const char * id |
| 23 | PREINIT: | |
| 24 | GSList *l; | |
| 25 | PPCODE: | |
|
16276
8853d1da70f5
Rename a number of Perl functions which were munged at some point
Warren Togami Jr. <warren@togami.com>
parents:
15899
diff
changeset
|
26 | for (l = pidgin_themes_get_proto_smileys(id); l != NULL; l = l->next) { |
|
15899
75f0041f72b8
Pidgin perl fixes for s/gaim/purple/.
Daniel Atallah <datallah@pidgin.im>
parents:
15590
diff
changeset
|
27 | XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::IMHtml::Smiley"))); |
| 14478 | 28 | } |