From 6c8d494df892dbcb9dbd7048402137f385593e96 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 26 Nov 2013 18:29:34 +0100 Subject: info: handle uncommon delay information (e.g. after "Änderung im Fahrtverlauf") MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- cgi/index.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/cgi/index.pl b/cgi/index.pl index 48583fc..65bbcb9 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -98,10 +98,10 @@ sub handle_request { $info = undef; } if ( $hide_low_delay and $info ) { - $info =~ s{ ^ (?: ca\. \s* )? \+ [ 1 2 3 4 ] $ }{}x; + $info =~ s{ (?: ca\. \s* )? \+ [ 1 2 3 4 ] $ }{}x; } if ($info) { - $info =~ s{ ^ (?: ca\. \s* )? \+ (\d+) }{Verspätung ca $1 Min.}x; + $info =~ s{ (?: ca\. \s* )? \+ (\d+) }{Verspätung ca $1 Min.}x; } push( @departures, -- cgit v1.2.3