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

hafas: move train before dep/arr

parent 1ee25e29

bin/hafas

+1 −2
Original line number Diff line number Diff line
@@ -271,14 +271,13 @@ for my $res ( @{ $hafas->{results} } ) { 


	for my $sec ( $res->sections ) {

		if ( $sec->type eq 'JNY' ) {

			printf( "%s → %s\n", $sec->name, $sec->direction );

			printf(

				"%-5s %-${have_delay}s ab  %s\n",

				$sec->dep_datetime->strftime('%H:%M'),

				format_delay( $sec->dep_delay ),

				$sec->dep_loc->name

			);

			printf( "%10s%${have_delay}s %s → %s\n",

				q{}, q{}, $sec->name, $sec->direction );

			printf(

				"%-5s %-${have_delay}s an  %s\n",

				$sec->arr_datetime->strftime('%H:%M'),