From 9be80133b419ceb193f146d4a06dfd88bc9020ee Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Wed, 18 Jun 2025 15:25:23 +0200 Subject: DBRIS: Support short IDs (A=1@L=eva) --- lib/Travelynx/Helper/DBRIS.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Travelynx/Helper/DBRIS.pm') diff --git a/lib/Travelynx/Helper/DBRIS.pm b/lib/Travelynx/Helper/DBRIS.pm index 9ddaa5f..1b7f099 100644 --- a/lib/Travelynx/Helper/DBRIS.pm +++ b/lib/Travelynx/Helper/DBRIS.pm @@ -69,7 +69,7 @@ sub get_departures_p { my $agent = $self->{user_agent}; - if ( $opt{station} =~ m{ [@] L = (? \d+ ) [@] }x ) { + if ( $opt{station} =~ m{ [@] L = (? \d+ ) }x ) { $opt{station} = { eva => $+{eva}, id => $opt{station}, -- cgit v1.2.3