train details: support non-DB HAFAS backends

1 files changed, 7 insertions, 1 deletions

diff --git a/lib/DBInfoscreen/Controller/Stationboard.pm b/lib/DBInfoscreen/Controller/Stationboard.pm
index e2e5bb5..77b0f8d 100644
--- a/lib/DBInfoscreen/Controller/Stationboard.pm
+++ b/lib/DBInfoscreen/Controller/Stationboard.pm
@@ -1101,7 +1101,8 @@ sub station_train_details {
 # /z/:train
 sub train_details {
 	my ($self) = @_;
-	my $train = $self->stash('train');
+	my $train  = $self->stash('train');
+	my $hafas  = $self->param('hafas');
 
 	# TODO error handling
 
@@ -1139,6 +1140,11 @@ sub train_details {
 		$opt{train_no}   = $train_no;
 	}
 
+	my $service = 'DB';
+	if ( $hafas ne '1' and Travel::Status::DE::HAFAS::get_service($hafas) ) {
+		$opt{service} = $hafas;
+	}
+
 	if ( $self->languages =~ m{^en} ) {
 		$opt{language} = 'en';
 	}