diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2011-12-03 14:04:52 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2011-12-03 14:04:52 +0100 |
| commit | ab020b55629130202638ee2019117718a854a5ff (patch) | |
| tree | fc60de691bf42afcfc4461e444b44c4b63ba52f6 /lib/Travel/Status/DE/DeutscheBahn | |
| parent | 3f4c8ae06655aebd8fbdcb292523a21960691d27 (diff) | |
Add language switch for extra information (delay reasons etc.)
Diffstat (limited to 'lib/Travel/Status/DE/DeutscheBahn')
| -rw-r--r-- | lib/Travel/Status/DE/DeutscheBahn/Result.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/DeutscheBahn/Result.pm b/lib/Travel/Status/DE/DeutscheBahn/Result.pm index 53585cf..4860810 100644 --- a/lib/Travel/Status/DE/DeutscheBahn/Result.pm +++ b/lib/Travel/Status/DE/DeutscheBahn/Result.pm @@ -38,7 +38,8 @@ sub info { $info =~ s{ ,Grund }{}ox; $info =~ s{ ^ \s+ }{}ox; - $info =~ s{ (?: ^ | , ) (?: p.nktlich | k [.] A [.] ) }{}ox; + $info + =~ s{ (?: ^ | , ) (?: p.nktlich | [nk] [.] [Aa] [.] | on \s time ) }{}ox; $info =~ s{ ^ , }{}ox; return $info; |