Gtk-Perl
view release on metacpan or search on metacpan
Gtk/xs/GtkItemFactory.xs view on Meta::CPAN
unsigned int action
void
gtk_item_factory_create_item(item_factory, entry, ...)
Gtk::ItemFactory item_factory
Gtk::ItemFactory::Entry entry
CODE:
{
AV *args = NULL;
/* Need to unref args when the item is destroyed.
Should be fixed at the Gtk+ level with a _full
version of the function. */
if (items > 2) {
/* If we have a handler and arg-list, use it */
args = newAV();
PackCallbackST(args, 2);
} else {
SV *handler = ifactory_sv_get_handler(ST(1)); /* entry */
if (handler) {
args = newAV();
PackCallback(args, handler);
} else
entry->callback = NULL;
}
gtk_item_factory_create_item(item_factory, entry, args, 1);
}
void
gtk_item_factory_create_items(item_factory, ...)
Gtk::ItemFactory item_factory
CODE:
{
int i;
for (i = 1; i < items; i++) {
GtkItemFactoryEntry *entry = SvGtkItemFactoryEntry(ST(i));
SV *handler = ifactory_sv_get_handler(ST(i));
AV *args = NULL;
/* As above, args will leak memory :( */
if (handler) {
args = newAV();
PackCallback(args, handler);
} else
entry->callback = NULL;
gtk_item_factory_create_item(item_factory, entry, args, 1);
}
}
void
gtk_item_factory_delete_item(item_factory, path)
Gtk::ItemFactory item_factory
char * path
void
gtk_item_factory_delete_entry(item_factory, entry)
Gtk::ItemFactory item_factory
Gtk::ItemFactory::Entry entry
void
gtk_item_factory_popup(item_factory, x, y, mouse_button, time)
Gtk::ItemFactory item_factory
unsigned int x
unsigned int y
unsigned int mouse_button
unsigned int time
# gtk_item_factory_set_translate_func
#endif
MODULE = Gtk::ItemFactory PACKAGE = Gtk::Widget
#ifdef GTK_ITEM_FACTORY
Gtk::ItemFactory
item_factory(widget)
Gtk::Widget widget
CODE:
RETVAL = gtk_item_factory_from_widget (widget);
OUTPUT:
RETVAL
char*
item_factory_path(widget)
Gtk::Widget widget
CODE:
RETVAL = gtk_item_factory_path_from_widget (widget);
OUTPUT:
RETVAL
#endif
( run in 1.179 second using v1.01-cache-2.11-cpan-364913b4093 )