From f8b052ab7c8dffc9aa873a6c35744c33ded4996a Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 18 Jan 2014 23:58:54 +0100 Subject: db-iris: also show reasons for cancelled trains --- bin/db-iris | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/bin/db-iris b/bin/db-iris index d0e2662..f6de1e2 100755 --- a/bin/db-iris +++ b/bin/db-iris @@ -148,7 +148,10 @@ sub display_result { my $d = $line->[5]; - if ( $edata{delay} and $d->delay and $d->delay_messages ) { + if ( $edata{delay} + and ( $d->delay or $d->is_cancelled ) + and $d->delay_messages ) + { printf( ' %s', ( $d->delay_messages )[-1]->[1] ); } if ( $edata{qos} and $d->qos_messages ) { -- cgit v1.2.3