Thanks all!
Unfortunately I don't see event-loop in X11::Protocol, i.e. polling capabilities. I don't wan't go to low-level capabilities, i.e. poll underlying socket for events. I'll try to use the libkeybinder, and tell the details here.
PS. Mixed usage of Gtk2 events and X11 events seems to be leading to some messy:
...
my $seq = $x->GrabKey(
$k->KeysymToKeycode("z"),
'AnyModifier', $x->root, 0, 'Asynchronous', 'Asynchronous');
$x->event_handler('queue');
my %event = $x->next_event;
### %event
my $t = AE::timer 0, 1, sub {
my %event = $x->next_event;
# %event
};
Gtk2->main;
It exists with:
Protocol error: bad 2 (Value); Sequence Number 4
Opcode (33, 0) = GrabKey
Bad value 183 (0xb7)
at ./gtk-treeview-action line 31.
|