summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xbin/db-iris5
1 files changed, 4 insertions, 1 deletions
diff --git a/bin/db-iris b/bin/db-iris
index fc72adc..4185d1c 100755
--- a/bin/db-iris
+++ b/bin/db-iris
@@ -258,6 +258,7 @@ for my $d ( $status->results() ) {
$delay = ' CANCELED';
}
+ my $platformstr = $d->platform // q{};
my $timestr;
if ($track_via) {
$timestr = $d->time;
@@ -273,6 +274,8 @@ for my $d ( $status->results() ) {
}
my $timestr_via = $d_via->arrival->strftime('%H:%M') . $delay;
$timestr = $d->time . ' → ' . $timestr_via;
+ $platformstr = sprintf( '%2s → %2s', $d->platform // q{},
+ $d_via->platform // q{} );
}
elsif ( $edata{times} ) {
$timestr = sprintf( '%5s → %5s',
@@ -289,7 +292,7 @@ for my $d ( $status->results() ) {
[
$timestr, $d->train,
$edata{route} ? join( q{ }, $d->route_interesting ) : q{},
- $d->route_end, $d->platform // q{}, $d
+ $d->route_end, $platformstr // q{}, $d
]
);
}