From f290638934800a2508360a066dbde7a8dcf938e2 Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <derf@finalrewind.org>
Date: Sun, 23 Mar 2025 18:26:35 +0100
Subject: dbris: /s/: redirect to proper station ID if needed

---
 lib/Travelynx/Controller/Traveling.pm | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'lib')

diff --git a/lib/Travelynx/Controller/Traveling.pm b/lib/Travelynx/Controller/Traveling.pm
index a6e56b9..bb82cb5 100755
--- a/lib/Travelynx/Controller/Traveling.pm
+++ b/lib/Travelynx/Controller/Traveling.pm
@@ -967,6 +967,21 @@ sub station {
 	  // ( $user->{backend_hafas} ? $user->{backend_name} : undef );
 	my $promise;
 	if ($dbris_service) {
+		if ( $station !~ m{ [@] L = \d+ }x ) {
+			$self->render_later;
+			$self->dbris->get_station_id_p($station)->then(
+				sub {
+					my ($dbris_station) = @_;
+					$self->redirect_to( '/s/' . $dbris_station->{id} );
+				}
+			)->catch(
+				sub {
+					my ($err) = @_;
+					$self->redirect_to('/');
+				}
+			)->wait;
+			return;
+		}
 		$promise = $self->dbris->get_departures_p(
 			station    => $station,
 			timestamp  => $timestamp,
-- 
cgit v1.2.3