Mercurial > pidgin3 / file revision

• file
• latest
• revisions
• annotate
• diff
• comparison
• raw

pidgin/plugins/perl/common/GtkThemes.xs@56e73606e2b2

pidgin/plugins/perl/common/GtkThemes.xs

Thu, 11 Dec 2008 22:36:47 +0000

author

John Bailey <rekkanoryo@rekkanoryo.org>

date

Thu, 11 Dec 2008 22:36:47 +0000

changeset 25122

56e73606e2b2

parent 16276

8853d1da70f5

child 18068

b6554e3c8224

child 35312

add13288757e

permissions

-rw-r--r--

merge of 'c36026e6d6a9420e254a9b837c172c4ccb75d654'
and '4e9dba9e28e65d0cba8a3cebe987b25d0620a44a'

#include "gtkmodule.h"

MODULE = Pidgin::Themes  PACKAGE = Pidgin::Themes  PREFIX = pidgin_themes_
PROTOTYPES: ENABLE

void
pidgin_themes_init()

gboolean
pidgin_themes_smileys_disabled()

void
pidgin_themes_smiley_theme_probe()

void
pidgin_themes_load_smiley_theme(file, load)
	const char * file
	gboolean load

void
pidgin_themes_get_proto_smileys(id)
	const char * id
PREINIT:
	GSList *l;
PPCODE:
	for (l = pidgin_themes_get_proto_smileys(id); l != NULL; l = l->next) {
		XPUSHs(sv_2mortal(purple_perl_bless_object(l->data, "Pidgin::IMHtml::Smiley")));
	}