gtk/plugins/perl/common/GtkThemes.xs

Mon, 18 Sep 2006 04:22:44 +0000

author
Etan Reisner <deryni@pidgin.im>
date
Mon, 18 Sep 2006 04:22:44 +0000
changeset 14641
a55ef032e889
parent 14629
1a0cd727c121
child 14643
a058b716c189
permissions
-rw-r--r--

[gaim-migrate @ 17303]
Remove a bunch of functions that are commented out because they can't work
currently, they'll come back if I can get the actual Gtk2 perl stuff to not
crash, but they were just taking up space and getting in my way (since they
are removed already in my other tree).

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

mercurial