amassivus/clusterssh
1
0
Fork 0
mirror of https://github.com/duncs/clusterssh.git synced 2025-07-01 01:03:04 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix key binding to pass on events again

Browse source
This commit is contained in:
Duncan Ferguson 2011-08-31 21:10:13 +01:00
parent ce4f610905
commit 1d98a078dd
1 changed files with 4 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib/App/ClusterSSH.pm
View file

@ -1905,12 +1905,9 @@ sub create_menubar() {
-tearoff => 0,
);
#$windows{main_window}->bind(
#'<Key>' => \&key_event,
#);
warn 'TODO: fix key even binding';
#$windows{main_window}->bind( '<KeyPress>' => \&{$self->key_event}, );
#$windows{main_window}->bind( '<KeyRelease>' => \&$self->key_event, );
$windows{main_window}->bind(
'<Key>' => [ $self => 'key_event' ],
);
logmsg( 2, "create_menubar: completed" );
}
@ -2143,7 +2140,7 @@ the code until this time.
=item config
=item helper
=item config
=item create_menubar