summaryrefslogtreecommitdiff
path: root/src/ivyreplay
diff options
context:
space:
mode:
authoretienne2007-04-18 12:14:22 +0000
committeretienne2007-04-18 12:14:22 +0000
commit2672d9f6f20f8046d44a637b341a7dca3315fa70 (patch)
treec39622be53404653acae47fe779271d9460821ac /src/ivyreplay
parent85844f887db348661b596fbdc53aa97128230a70 (diff)
downloadivymon-2672d9f6f20f8046d44a637b341a7dca3315fa70.zip
ivymon-2672d9f6f20f8046d44a637b341a7dca3315fa70.tar.gz
ivymon-2672d9f6f20f8046d44a637b341a7dca3315fa70.tar.bz2
ivymon-2672d9f6f20f8046d44a637b341a7dca3315fa70.tar.xz
make ivyreplay compatible to Perl-Tk 804.
Diffstat (limited to 'src/ivyreplay')
-rwxr-xr-xsrc/ivyreplay2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ivyreplay b/src/ivyreplay
index 8d34b61..c9ed64a 100755
--- a/src/ivyreplay
+++ b/src/ivyreplay
@@ -558,7 +558,7 @@ sub replayStart {
-background => $replay_bg);
}
$replay_last_time = $replay_time;
- my $i = $t->tagRanges($replay_time);
+ my ($i) = $t->tagRanges($replay_time);
$t->see($i) if defined $i;
}
$replay_time += $replay_time_granularity;