Mercurial > pidgin.yaz

view pidgin/plugins/perl/common/GtkThemes.xs @ 16211:b54abfe11fc5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Rename a number of Perl functions which were munged at some point (e.g., pidgindialog_whatever -> pidgin_dialog_whatever). Thanks, Warren. Fixes #167 committer: Ethan Blanton <elb@pidgin.im>
author Warren Togami <wtogami>
date Mon, 16 Apr 2007 21:31:57 +0000
parents e622745f6f42
children
line wrap: on
line source

#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")));
	}