diff options
| author | Daniel Friesel <derf@finalrewind.org> | 2014-02-02 16:04:00 +0100 |
|---|---|---|
| committer | Daniel Friesel <derf@finalrewind.org> | 2014-02-02 16:04:00 +0100 |
| commit | 0c0386264c7a08cea15cd8794aa9220df7d110e7 (patch) | |
| tree | 9345d290d01f50ad72e72428858594c7ee71763a /bin/db-iris | |
| parent | 7bbd09e68aba30218694d580f48f8a1a1d59aa34 (diff) | |
Remove duplicates from delay and qos messages
Diffstat (limited to 'bin/db-iris')
| -rwxr-xr-x | bin/db-iris | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/bin/db-iris b/bin/db-iris index 2ac75e1..1dd6ede 100755 --- a/bin/db-iris +++ b/bin/db-iris @@ -200,8 +200,7 @@ sub display_result { if ( $edata{delays} and $d->delay_messages ) { - printf( ' %s', - join( q{ }, map { $_->[1] } ( reverse $d->delay_messages ) ) ); + printf( ' %s', join( q{ }, map { $_->[1] } $d->delay_messages ) ); } if ( $edata{delay} and ( $d->delay or $d->is_cancelled ) @@ -210,8 +209,7 @@ sub display_result { printf( ' %s', ( $d->delay_messages )[-1]->[1] ); } if ( $edata{qos} and $d->qos_messages ) { - printf( ' %s', - join( q{ }, map { $_->[1] } ( reverse $d->qos_messages ) ) ); + printf( ' %s', join( q{ }, map { $_->[1] } $d->qos_messages ) ); } print "\n"; @@ -233,7 +231,7 @@ sub display_result { } if ( $edata{messages} ) { - for my $message ( reverse $d->messages ) { + for my $message ( $d->messages ) { # leading spaces to align with regular output printf( " %s %s\n", @@ -520,7 +518,7 @@ None. =head1 BUGS AND LIMITATIONS -B<-oD> and B<-oq> contain duplicate entries. +Unknown. =head1 AUTHOR |