diff options
| -rwxr-xr-x | src/ivymon | 2 | ||||
| -rwxr-xr-x | src/ivyreplay | 9 |
2 files changed, 1 insertions, 10 deletions
@@ -93,7 +93,7 @@ use Tk::CmdLine; use vars qw/$VERSION $opt_help $opt_b $opt_bus $opt_history @opt_bind @opt_send $opt_size $opt_undersize $opt_out $opt_debug/; # **** VERSION **** -$VERSION = '1.19'; +$VERSION = '1.20'; # options initialisation # geometry diff --git a/src/ivyreplay b/src/ivyreplay index c9ed64a..9e6231c 100755 --- a/src/ivyreplay +++ b/src/ivyreplay @@ -194,15 +194,6 @@ $mw->geometry($minW."x".$minH); $mw->minsize($minW, $minH); $mw->title($title); -# Key-Tab binding is deactivated, because this event will be used by entries -# for completion functionality -$mw->bind('<Key-Tab>', sub {Tk->break}); -my $focusedtext; -$mw->bind("Tk::Text", "<FocusIn>", [sub { - &clearSearch() if $_[1] ne $focusedtext; - $focusedtext = $_[1];}, Ev('W')]); - - #---------------------------------------------------------------------------------- # Progress bar #---------------------------------------------------------------------------------- |