Mercurial > pidgin.yaz
view pidgin/plugins/perl/common/GtkThemes.xs @ 24771:8fb78d30ea83
We have a prpl function "buddy_free" that I don't think any of our
in-tree prpls use, and it wasn't called from anywhere. But the facebook
prpl uses it to free data associated with each buddy. I think it
makes sense to call this function. In the future it would probably be
cleaner to have prpls attach to a signal or something.
author | Mark Doliner <mark@kingant.net> |
---|---|
date | Thu, 18 Dec 2008 02:03:20 +0000 |
parents | b54abfe11fc5 |
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"))); }