summaryrefslogtreecommitdiff
path: root/bin/efa
diff options
context:
space:
mode:
authorDaniel Friesel <derf@derf.homelinux.org>2009-05-23 12:47:53 +0200
committerDaniel Friesel <derf@derf.homelinux.org>2009-05-23 12:47:53 +0200
commit10458f5b1956c234b96ac7006886ba7f0be5b9ee (patch)
tree6e97bcc4c2a619583760b3af07f66f129a168cd7 /bin/efa
parent28982bc3c6193a6fe7cf161eb8e6eaf8686d52f5 (diff)
efa: Fixed parsing of "Fußweg" messages
Note: Fußweg without timestamp is still unsupported, but only happens when from and to are really close
Diffstat (limited to 'bin/efa')
-rwxr-xr-xbin/efa4
1 files changed, 4 insertions, 0 deletions
diff --git a/bin/efa b/bin/efa
index f601768..ae562ab 100755
--- a/bin/efa
+++ b/bin/efa
@@ -67,6 +67,10 @@ sub parse_content($) {
for (my $i = 0; @{$raw->[$offer]} >= (($i+1) * $groupsize); $i++) {
$offset = $i * $groupsize;
undef(@extra);
+ if ($raw->[$offer]->[$offset+3] =~ /^Fußweg/) {
+ # Fußweg messages lack the last element, so inject it
+ splice(@{$raw->[$offer]}, $offset+7, 0, '');
+ }
for my $j (0, 4, 8) {
until (not exists($raw->[$offer]->[$offset+$j]) or $raw->[$offer]->[$offset+$j] =~ /^\d+:\d+$/) {
last unless (exists($raw->[$offer]->[$offset+$j]));