Index: GtkObject.xs =================================================================== --- GtkObject.xs (revision 2104) +++ GtkObject.xs (working copy) @@ -1,5 +1,5 @@ /* - * Copyright (c) 2003-2005 by the gtk2-perl team (see the file AUTHORS) + * Copyright (c) 2003-2005, 2009 by the gtk2-perl team (see the file AUTHORS) * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Library General Public @@ -171,3 +171,31 @@ OUTPUT: RETVAL + +MODULE = Gtk2::Object PACKAGE = Gtk2::Object PREFIX = gtk_ + +=for apidoc +Although C and C are C +methods, as of Gtk 2.12 they will only actually invoke signals on a +C. On a C the return is always false (no +binding activated). +=cut +gboolean +gtk_bindings_activate (object, keyval, modifiers) + GtkObject *object + guint keyval + GdkModifierType modifiers + +gboolean +gtk_bindings_activate_event (object, event) + GtkObject *object + GdkEvent *event +PREINIT: + GdkEventType type; +CODE: + type = event->type; + if (type != GDK_KEY_PRESS && type != GDK_KEY_RELEASE) + croak ("Event must be key-press or key-release"); + RETVAL = gtk_bindings_activate_event (object, (GdkEventKey*) event); +OUTPUT: + RETVAL