view pidgin/plugins/perl/common/GtkMenuTray.xs @ 17256:d04b1617da3d

This should suppress an annoying 477 numeric on channel joins if you aren't identified on freenode. It might cause problems with *real* 477s if you get disconnected, but I'm not sure -- someone scream if it does.
author Ethan Blanton <elb@pidgin.im>
date Wed, 23 May 2007 18:29:23 +0000
parents cb0750152bf6
children
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.
Gtk::Widget
pidgin_menu_tray_new()

Gtk::Widget
pidgin_menu_tray_get_box(menu_tray)
	Pidgin::MenuTray menu_tray

void
pidgin_menu_tray_append(menu_tray, widget, tooltip)
	Pidgin::MenuTray menu_tray
	Gtk::Widget widget
	const char * tooltip

void
pidgin_menu_tray_prepend(menu_tray, widget, tooltip)
	Pidgin::MenuTray menu_tray
	Gtk::Widget widget
	const char * tooltip

void
pidgin_menu_tray_set_tooltip(menu_tray, widget, tooltip)
	Pidgin::MenuTray menu_tray
	Gtk::Widget widget
	const char * tooltip
*/

MODULE = Pidgin::MenuTray  PACKAGE = Pidgin::MenuTray  PREFIX = pidgin_menu_tray
PROTOTYPES: ENABLE