Unverified Commit 5f686d1d authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

Only show HAFAS links for non-DB backends

parent a4a5bc05
Loading
Loading
Loading
Loading
+14 −15
Original line number Diff line number Diff line
@@ -2268,8 +2268,7 @@ sub handle_result {
		my $station_name = $data->{station_name} // $self->stash('station');
		my ( $api_link, $api_text, $api_icon );
		my $params = $self->req->params->clone;
		$params->param( hafas => $params->param('hafas') ? q{} : 'DB' );
		if ( $params->param('hafas') ) {
		if ( not $hafas ) {
			if (    $data->{station_eva} >= 8100000
				and $data->{station_eva} < 8200000 )
			{
@@ -2280,18 +2279,12 @@ sub handle_result {
			{
				$params->param( hafas => 'BLS' );
			}
			$api_link = '/' . $data->{station_eva} . '?' . $params->to_string;
			if ( $params->param('hafas') ) {
				$api_link
				  = '/' . $data->{station_eva} . '?' . $params->to_string;
				$api_text = 'Auf Nahverkehr wechseln';
				$api_icon = 'train';
			}
		else {
			my $iris_eva = List::Util::min grep { $_ >= 1000000 }
			  @{ $data->{station_evas} // [] };
			if ($iris_eva) {
				$api_link = '/' . $iris_eva . '?' . $params->to_string;
				$api_text = 'Auf Bahnverkehr wechseln';
				$api_icon = 'directions';
			}
		}
		$self->render(
			$template,
@@ -2507,6 +2500,12 @@ sub backend_list {
	}

	for my $backend ( Travel::Status::DE::HAFAS::get_services() ) {
		if ( $backend->{shortname} eq 'DB' ) {

			# HTTP 503 Service Temporarily Unavailable as of 2025-01-08 ~10:30 UTC
			# (I bet it's actually Permanently Unavailable)
			next;
		}
		push(
			@backends,
			{