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

DBWagenreihung: fix misleading 'station data' message in errstr

parent cbdb7037

lib/Travel/Status/DE/DBWagenreihung.pm

+6 −7
Original line number Original line Diff line number Diff line
@@ -83,15 +83,14 @@ sub get_wagonorder { 
			number           => $train_number,

			number           => $train_number,

			time             => $time

			time             => $time

		};

		};

		my ( $content, $err ) = $self->get_with_cache(

		my $url

			$cache,

		  = $api_base . '?'

			$api_base . '?'

		  . join( '&',

			  . join( '&',

			map { $_ . '=' . $self->{param}{$_} } keys %{ $self->{param} } );

				map { $_ . '=' . $self->{param}{$_} } keys %{ $self->{param} } )

		my ( $content, $err ) = $self->get_with_cache( $cache, $url );

		);





		if ($err) {

		if ($err) {

			$self->{errstr} = "Failed to fetch station data: $err";

			$self->{errstr} = "GET $url: $err";

			return;

			return;

		}

		}

		$json = $self->{from_json} = $self->{json}->utf8->decode($content);

		$json = $self->{from_json} = $self->{json}->utf8->decode($content);