diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2025-04-02 17:26:39 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2025-04-02 17:26:39 +0200 |
commit | 2ccbd9b24f03e8965ff0ce9f468fb8be5b03c59d (patch) | |
tree | ca240d5775ce0534cb87f0cda3897f173124dbd3 /lib/Travel/Status/DE/DBRIS | |
parent | 31b5c565d3f8034f838c6f73d01a1316917825c5 (diff) |
Breaking news: negative coordinates do exist
Diffstat (limited to 'lib/Travel/Status/DE/DBRIS')
-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; } |