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

DBRIS: perltidy

parent 72d5c98f

lib/Travelynx/Helper/DBRIS.pm

+9 −4
Changes for lib/Travelynx/Helper/DBRIS.pm: 9 added lines, 4 removed lines.
Original line number Diff line number Diff line
@@ -74,16 +74,21 @@ sub get_station_id_p { 


	my $promise = Mojo::Promise->new;



	my $ds100_match = firstval { $station_name eq $_->[0] } Travel::Status::DE::IRIS::Stations::get_stations();

	my $ds100_match = firstval { $station_name eq $_->[0] }

	Travel::Status::DE::IRIS::Stations::get_stations();



	if ($ds100_match) {

		$promise->resolve({

		$promise->resolve(

			{

				eva => $ds100_match->[2],

			id   => "A=1\@L=" . $ds100_match->[2] . "\@O=" . $ds100_match->[1] . "@",

				id  => "A=1\@L="

				  . $ds100_match->[2] . "\@O="

				  . $ds100_match->[1] . "@",

				lat  => $ds100_match->[4],

				lon  => $ds100_match->[3],

				name => $ds100_match->[1],

		});

			}

		);



		return $promise;

	}