The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "GtkDefs.h"
#include "GnomeDefs.h"


MODULE = Gnome::MessageBox		PACKAGE = Gnome::MessageBox		PREFIX = gnome_messagebox_

#ifdef GNOME_MESSAGE_BOX

Gnome::MessageBox_Sink
new(Class, message, messagebox_type, button1=0, button2=0, button3=0, button4=0, button5=0, button6=0)
	SV *	Class
	char *	message
	char *	messagebox_type
	char *	button1
	char *	button2
	char *	button3
	char *	button4
	char *	button5
	char *	button6
	CODE:
	RETVAL = GNOME_MESSAGE_BOX(gnome_message_box_new(message,messagebox_type,button1,button2,button3,button4,button5,button6,NULL));
	OUTPUT:
	RETVAL


void
gnome_message_box_set_modal(messagebox)
	Gnome::MessageBox	messagebox


void
gnome_message_box_set_default(messagebox, button)
	Gnome::MessageBox	messagebox
	int	button


#endif