From 916ab9126de838797c788818af73079eec85b25f Mon Sep 17 00:00:00 2001
From: etienne
Date: Thu, 14 Jun 2007 15:28:49 +0000
Subject:   * fixed a bug causing unexpected play/stop actions in ivyreplay   *
 ivyreplay windows resizable

---
 src/ivyreplay | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'src')

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
-- 
cgit v1.1