Mercurial > pidgin.yaz
view gtk/plugins/perl/common/GtkThemes.xs @ 14567:d6eae5115b31
[gaim-migrate @ 17291]
This is a really huge commit for basically nothing, I decided that Gaim::Gtk
should really be Gaim::GtkUI (which will line up better with any eventual
Gaim::GntUI that might exist, etc.). So that's what this is, I think I got
everything, it builds here at least.
committer: Tailor Script <tailor@pidgin.im>
author | Etan Reisner <pidgin@unreliablesource.net> |
---|---|
date | Sun, 17 Sep 2006 05:35:46 +0000 |
parents | eeca8be382a5 |
children | 3ed24586efcb |
line wrap: on
line source
#include "gtkmodule.h" /* This can't work at the moment since I don't have a typemap for Gtk::Widget. * I thought about using the one from libgtk2-perl but wasn't sure how to go * about doing that. void gaim_gtkthemes_smiley_themeize(widget) Gtk::Widget * widget */ MODULE = Gaim::GtkUI::Themes PACKAGE = Gaim::GtkUI::Themes PREFIX = gaim_gtkthemes_ PROTOTYPES: ENABLE void gaim_gtkthemes_init() gboolean gaim_gtkthemes_smileys_disabled() void gaim_gtkthemes_smiley_theme_probe() void gaim_gtkthemes_load_smiley_theme(file, load) const char * file gboolean load void gaim_gtkthemes_get_proto_smileys(id) const char * id PREINIT: GSList *l; PPCODE: for (l = gaim_gtkthemes_get_proto_smileys(id); l != NULL; l = l->next) { XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gtk::IMHtml::Smiley"))); }