diff options
Diffstat (limited to 'lib/Travel/Status')
-rw-r--r-- | lib/Travel/Status/DE/DBRIS/Location.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/DBRIS/Location.pm b/lib/Travel/Status/DE/DBRIS/Location.pm index 839a47d..d19b961 100644 --- a/lib/Travel/Status/DE/DBRIS/Location.pm +++ b/lib/Travel/Status/DE/DBRIS/Location.pm @@ -23,7 +23,7 @@ sub new { # station search results include lat/lon keys in JSON; route entries do not my ( $lon, $lat ); - if ( $json->{id} =~ m{ [@]X= (?<lon> \d+) [@]Y= (?<lat> \d+) }x ) { + if ( $json->{id} =~ m{ [@]X= (?<lon> -? \d+) [@]Y= (?<lat> -? \d+) }x ) { $lat = $+{lat} / 1e6; $lon = $+{lon} / 1e6; } |