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

efa-m: only reserve space for occupancy if it is used

parent 1d258ed3

bin/efa-m

+6 −2
Original line number Diff line number Diff line
@@ -353,6 +353,7 @@ sub show_stopseq { 
	);

	say q{};



	my $occupancy_len   = 0;

	my $delay_len       = 0;

	my $inner_delay_len = 0;

	my $max_delay       = max map { abs( $_->delay // 0 ) } $trip->route;
@@ -360,6 +361,9 @@ sub show_stopseq { 
		$inner_delay_len = length($max_delay) + 1;

		$delay_len       = length( sprintf( '(%+d)', $max_delay ) ) + 1;

	}

	if ( first { $_->occupancy } $trip->route ) {

		$occupancy_len = 2;

	}



	if ( first { $_->is_cancelled } $trip->route and $delay_len < 3 ) {

		$delay_len = 3;
@@ -367,7 +371,7 @@ sub show_stopseq { 


	for my $stop ( $trip->route ) {

		printf(

			"%s → %s%${delay_len}s  %s %s (%s) %s\n",

			"%s → %s%${delay_len}s %-${occupancy_len}s%s (%s) %s\n",

			$stop->arr ? $stop->arr->strftime('%H:%M')

			: q{     },

			$stop->dep ? $stop->dep->strftime('%H:%M')