diff options
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/hafas | 12 |
1 files changed, 8 insertions, 4 deletions
@@ -320,16 +320,20 @@ for my $res ( @{ $hafas->{results} } ) { printf( "${output_bold}%s${output_reset} → %s\n", $sec->name, $sec->direction ); printf( - "%-5s %-${have_delay}s ab %s\n", + "%-5s %-${have_delay}s ab %s%s%s\n", $sec->dep_datetime->strftime('%H:%M'), format_delay( $sec->dep_delay ), - $sec->dep_loc->name + $sec->dep_loc->name, + $sec->dep_platform ? q{: } : q{}, + $sec->dep_platform // q{}, ); printf( - "%-5s %-${have_delay}s an %s\n", + "%-5s %-${have_delay}s an %s%s%s\n", $sec->arr_datetime->strftime('%H:%M'), format_delay( $sec->arr_delay ), - $sec->arr_loc->name + $sec->arr_loc->name, + $sec->arr_platform ? q{: } : q{}, + $sec->arr_platform // q{}, ); } elsif ( $sec->type eq 'WALK' ) { |