summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@derf.homelinux.org>2009-03-17 18:44:26 +0100
committerDaniel Friesel <derf@derf.homelinux.org>2009-03-17 18:44:26 +0100
commit06a005c89d560d0ff05f8e7999492691ef7320d8 (patch)
tree69545751085f05ababc775bf3ff7e6369f5a9006
parentb0ecd4e9f73aa7d10b5dc53af9187b5cafb3b31c (diff)
efa: Don't touch $raw while parsing
-rwxr-xr-xbin/efa2
1 files changed, 1 insertions, 1 deletions
diff --git a/bin/efa b/bin/efa
index 6c47f64..57d2f29 100755
--- a/bin/efa
+++ b/bin/efa
@@ -103,7 +103,7 @@ for ($offer = 0; exists($raw->[$offer]); $offer++) {
# If the first field is not a time we've got some additional information.
# Sadly, this script does not parse it yet, so it's ignored
until ($raw->[$offer]->[$offset] =~ /^\d+:\d+$/) {
- splice(@{$raw->[$offer]}, $offset, 1) or last;
+ last unless exists($raw->[$offer]->[++$offset]);
}
$cons->[$offer]->[$i] = {
deptime => $raw->[$offer]->[$offset],