diff options
author | Daniel Friesel <derf@finalrewind.org> | 2014-10-20 10:02:12 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2014-10-20 10:02:12 +0200 |
commit | 8a769cd36383f9af895bae370d478bf6b9dae999 (patch) | |
tree | a667701b091005b2aaf7869c170527e0c4c2c3a1 /lib/Travel/Status/DE | |
parent | 119c3e764ce09481fa09027ba2aacc444876b139 (diff) |
Fix $result->delay accessor
Diffstat (limited to 'lib/Travel/Status/DE')
-rw-r--r-- | lib/Travel/Status/DE/DeutscheBahn/Result.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/DeutscheBahn/Result.pm b/lib/Travel/Status/DE/DeutscheBahn/Result.pm index 9c62a71..10f0f79 100644 --- a/lib/Travel/Status/DE/DeutscheBahn/Result.pm +++ b/lib/Travel/Status/DE/DeutscheBahn/Result.pm @@ -55,7 +55,7 @@ sub delay { if ( $info =~ m{ p.nktlich }ox ) { return 0; } - if ( $info =~ m{ ca[.] \s (?<delay> \d+ ) \s Minuten \s sp.ter }ox ) { + if ( $info =~ m{ (?: ca \. \s* )? \+ (?<delay> \d+) :? \s* }ox ) { return $+{delay}; } |