diff options
author | etienne | 2007-06-14 15:28:49 +0000 |
---|---|---|
committer | etienne | 2007-06-14 15:28:49 +0000 |
commit | 916ab9126de838797c788818af73079eec85b25f (patch) | |
tree | 1a3f4e22753fddf8d5903cedfab77e969ea82c8c /src | |
parent | 0e09ac6943a5752c8a6758936e0e733679e7aca5 (diff) | |
download | ivymon-916ab9126de838797c788818af73079eec85b25f.zip ivymon-916ab9126de838797c788818af73079eec85b25f.tar.gz ivymon-916ab9126de838797c788818af73079eec85b25f.tar.bz2 ivymon-916ab9126de838797c788818af73079eec85b25f.tar.xz |
* fixed a bug causing unexpected play/stop actions in ivyreplay
* ivyreplay windows resizable
Diffstat (limited to 'src')
-rwxr-xr-x | src/ivyreplay | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/ivyreplay b/src/ivyreplay index 9e6231c..5aa1009 100755 --- a/src/ivyreplay +++ b/src/ivyreplay @@ -65,6 +65,8 @@ my $replay_bg_orig; my $replay_fg_orig; my $replay_hour; +$opt_startregexp = '^ClockStart\$'; +$opt_stopregexp = '^ClockStop\$'; #---------------------------------------------------------------------------------- # command line options management @@ -191,7 +193,6 @@ my $mw = MainWindow->new(); # Set default min size $mw->geometry($minW."x".$minH); -$mw->minsize($minW, $minH); $mw->title($title); #---------------------------------------------------------------------------------- @@ -410,7 +411,7 @@ sub build { -height => 1)->pack(-side => 'left', -padx => 10, -fill => 'y', -expand => 1); $mw->update; - $mw->minsize($mw->width, $mw->height); + $mw->minsize($mw->width, 100); } # end build @@ -474,8 +475,8 @@ sub loadfileForReplay { $replay_time = $replay_min_time; $replay_text->configure(-state => 'disabled'); # ivy bindings - $ivy->bindRegexp($opt_startregexp, [\&replayStart]); - $ivy->bindRegexp($opt_stopregexp, [\&replayStop]); + $ivy->bindRegexp($opt_startregexp, [\&replayStart]) if $opt_startregexp; + $ivy->bindRegexp($opt_stopregexp, [\&replayStop]) if $opt_stopregexp; } # end loadfileForReplay |