view release on metacpan or  search on metacpan

Gnome/xs/Gnome.xs  view on Meta::CPAN

			      "but none was specified");
		{
			STRLEN len;
			/* It's just a string */
			info->moreinfo = SvPV((SV*)info->moreinfo, len);
			break;
		}

	default:
		/* Do nothing */
		break;
	}
}


MODULE = Gnome		PACKAGE = Gnome		PREFIX = gnome_

void
_boot_all ()
	CODE:
	{
#include "Gnomeobjects.xsh"
	}

void
init(Class, app_id, app_version="X.X", options=NULL)
	char *  app_id
	char *  app_version
	SV *	options
	CODE:
	{
		GnomeInit_internal(app_id, app_version, options);
	}

void
gnome_accelerators_sync (Class)
	SV *	Class
	CODE:
	gnome_accelerators_sync();

Gtk::Button_Sink
gnome_stock_button(btype)
	char *btype
CODE:
	const char *t = gnome_perl_stock_button(btype);
	if(!t) {die("Invalid stock button '%s'", btype);}
	RETVAL = GTK_BUTTON(gnome_stock_button(t));
OUTPUT:
	RETVAL

Gtk::Button_Sink
gnome_stock_or_ordinary_button(btype)
	char *btype
CODE:
	const char *t = gnome_perl_stock_button(btype);
	if(!t) t = btype;
	RETVAL = GTK_BUTTON(gnome_stock_or_ordinary_button(t));
OUTPUT:
	RETVAL

Gtk::MenuItem_Sink
gnome_stock_menu_item(mtype, text)
	char *mtype
	char *text
CODE:
	const char *t = gnome_perl_stock_menu_item(mtype);
	if(!t) {die("Invalid stock menuitem '%s'", mtype);}
	RETVAL = GTK_MENU_ITEM(gnome_stock_menu_item(t,text));
OUTPUT:
	RETVAL

gstring
gnome_libdir_file(Class, filename)
	SV *	Class
	char* filename
	ALIAS:
		Gnome::libdir_file = 0
		Gnome::datadir_file = 1
		Gnome::pixmap_file = 2
		Gnome::unconditional_libdir_file = 3
		Gnome::unconditional_datadir_file = 4
		Gnome::unconditional_pixmap_file = 5
		Gnome::sound_file = 6
		Gnome::unconditional_sound_file = 7
	CODE:
	switch (ix) {
	case 0: RETVAL = gnome_libdir_file (filename); break;
	case 1: RETVAL = gnome_datadir_file (filename); break;
	case 2: RETVAL = gnome_pixmap_file (filename); break;
	case 3: RETVAL = gnome_unconditional_libdir_file (filename); break;
	case 4: RETVAL = gnome_unconditional_datadir_file (filename); break;
	case 5: RETVAL = gnome_unconditional_pixmap_file (filename); break;
	case 6: RETVAL = gnome_sound_file (filename); break;
	case 7: RETVAL = gnome_unconditional_sound_file (filename); break;
	}
	OUTPUT:
	RETVAL

MODULE = Gnome		PACKAGE = Gnome::Config		PREFIX = gnome_config_

gstring
gnome_config_get_string (Class, path)
	SV *	Class
	char *	path
	ALIAS:
		Gnome::Config::get_string = 0
		Gnome::Config::private_get_string = 1
	CODE:
	if (ix == 0)
		RETVAL = gnome_config_get_string (path);
	else
		RETVAL = gnome_config_private_get_string (path);
	OUTPUT:
	RETVAL

gstring
gnome_config_get_translated_string (Class, path)
	SV *	Class
	char *	path
	ALIAS:
		Gnome::Config::get_translated_string = 0