efa-m: show trip detail delays in braces (we're outputting realtime data)

1 files changed, 7 insertions, 4 deletions

diff --git a/bin/efa-m b/bin/efa-m
index 51f1585..99622ba 100755
--- a/bin/efa-m
+++ b/bin/efa-m
@@ -345,10 +345,12 @@ sub show_stopseq {
 	);
 	say q{};
 
-	my $delay_len = 0;
-	my $max_delay = max map { abs( $_->delay // 0 ) } $trip->route;
+	my $delay_len       = 0;
+	my $inner_delay_len = 0;
+	my $max_delay       = max map { abs( $_->delay // 0 ) } $trip->route;
 	if ($max_delay) {
-		$delay_len = length( sprintf( '%+d', $max_delay ) ) + 1;
+		$inner_delay_len = length($max_delay) + 1;
+		$delay_len       = length( sprintf( '(%+d)', $max_delay ) ) + 1;
 	}
 
 	for my $stop ( $trip->route ) {
@@ -358,7 +360,8 @@ sub show_stopseq {
 			: q{     },
 			$stop->dep ? $stop->dep->strftime('%H:%M')
 			: q{     },
-			$stop->delay ? sprintf( ' %+d', $stop->delay ) : q{},
+			$stop->delay ? sprintf( " (%+${inner_delay_len}d)", $stop->delay )
+			: q{},
 			$stop->full_name,
 			$stop->niveau,
 			$stop->platform