diff options
author | etienne | 2007-05-04 08:27:28 +0000 |
---|---|---|
committer | etienne | 2007-05-04 08:27:28 +0000 |
commit | b2e2955aa81523456a12b60a1d0e4804ada8c785 (patch) | |
tree | d0094790302f15bef6131db0df93e6f3e941bed3 /src | |
parent | 2672d9f6f20f8046d44a637b341a7dca3315fa70 (diff) | |
download | ivymon-b2e2955aa81523456a12b60a1d0e4804ada8c785.zip ivymon-b2e2955aa81523456a12b60a1d0e4804ada8c785.tar.gz ivymon-b2e2955aa81523456a12b60a1d0e4804ada8c785.tar.bz2 ivymon-b2e2955aa81523456a12b60a1d0e4804ada8c785.tar.xz |
* fixed a bug causing the crash of ivyreplay
(function clearSearch not found).
Diffstat (limited to 'src')
-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 #---------------------------------------------------------------------------------- |