Commit 048a5c1f authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

perltidy

parent ddbe9023

index.pl

+10 −7
Original line number Diff line number Diff line
@@ -317,8 +317,8 @@ helper 'checkout' => sub { 
					name  => $status->{station_name}

				),

				DateTime->now( time_zone => 'Europe/Berlin' )->epoch,

				undef, undef, undef, undef, undef,

				undef, undef, undef

				undef, undef, undef, undef, undef, undef,

				undef, undef

			);

			if ( defined $success ) {

				return;
@@ -484,7 +484,9 @@ helper 'get_user_travels' => sub { 
				}

			);

		}

		elsif ( $action == $action_type{checkin} and $prev_action == $action_type{checkout} ) {

		elsif ( $action == $action_type{checkin}

			and $prev_action == $action_type{checkout} )

		{

			my $ref = $travels[-1];

			$ref->{from_name}       = $name;

			$ref->{completed}       = 1;
@@ -705,7 +707,8 @@ get '/*station' => sub { 


		@results = map { $_->[0] }

		  sort { $b->[1] <=> $a->[1] }

			map { [$_, $_->sched_departure->epoch // $_->departure->epoch] } @results;

		  map { [ $_, $_->sched_departure->epoch // $_->departure->epoch ] }

		  @results;



		$self->render(

			'departures',