summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoretienne2007-06-14 15:28:49 +0000
committeretienne2007-06-14 15:28:49 +0000
commit916ab9126de838797c788818af73079eec85b25f (patch)
tree1a3f4e22753fddf8d5903cedfab77e969ea82c8c
parent0e09ac6943a5752c8a6758936e0e733679e7aca5 (diff)
downloadivymon-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
-rwxr-xr-xsrc/ivyreplay9
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