summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoretienne2006-04-19 09:26:12 +0000
committeretienne2006-04-19 09:26:12 +0000
commitb1e5dad4abbf9f54c05d4d4e06d266ca5132e7fa (patch)
tree5474632dc6bda5f8d2285b3798a958a84045a937
parent8f53167c7add2c47400d0b9604ff59c5bb6f2ac0 (diff)
downloadivycontrolpanel-b1e5dad4abbf9f54c05d4d4e06d266ca5132e7fa.zip
ivycontrolpanel-b1e5dad4abbf9f54c05d4d4e06d266ca5132e7fa.tar.gz
ivycontrolpanel-b1e5dad4abbf9f54c05d4d4e06d266ca5132e7fa.tar.bz2
ivycontrolpanel-b1e5dad4abbf9f54c05d4d4e06d266ca5132e7fa.tar.xz
optimisation des regexps ivy (bug introuduit en 2.0)
-rw-r--r--src/IvyIO.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/IvyIO.pm b/src/IvyIO.pm
index c933ffc..acaed69 100644
--- a/src/IvyIO.pm
+++ b/src/IvyIO.pm
@@ -83,7 +83,7 @@ sub bind_for_play_event {
my $cb = shift;
return unless $cb;
return unless $ivy;
- $ivy->bindRegexp("ClockStart", [sub { shift; &$cb(); }]);
+ $ivy->bindRegexp("^ClockStart", [sub { shift; &$cb(); }]);
} # end bind_for_play_event
@@ -92,7 +92,7 @@ sub bind_for_pause_event {
my $cb = shift;
return unless $cb;
return unless $ivy;
- $ivy->bindRegexp("ClockStop", [sub { shift; &$cb(); }]);
+ $ivy->bindRegexp("^ClockStop", [sub { shift; &$cb(); }]);
} # end bind_for_pause_event
@@ -103,9 +103,9 @@ sub bind_for_clock_and_rate_event {
my $cb = shift;
return unless $cb;
return unless $ivy;
- $ivy->bindRegexp('ClockEvent Time=(\d\d):(\d\d):(\d\d) Rate=(.*) Bs=.*',
+ $ivy->bindRegexp('^ClockEvent Time=(\d\d):(\d\d):(\d\d) Rate=(.*) Bs=.*',
[sub { shift; &$cb(@_); }]);
- $ivy->bindRegexp('ClockDatas Time=(\d\d):(\d\d):(\d\d) Rate=(.*) Bs=.*',
+ $ivy->bindRegexp('^ClockDatas Time=(\d\d):(\d\d):(\d\d) Rate=(.*) Bs=.*',
[sub { shift; &$cb(@_); }]);
} # end bind_for_clock_event