diff options
Diffstat (limited to 'bin')
-rwxr-xr-x | bin/db-iris | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/bin/db-iris b/bin/db-iris index f1bff19..38e30cd 100755 --- a/bin/db-iris +++ b/bin/db-iris @@ -259,12 +259,19 @@ if ( my $err = $status->errstr ) { say STDERR "Request error: ${err}"; exit 2; } +if ( my $warning = $status->warnstr ) { + say STDERR "Request warning: ${warning}"; +} if ( $status_via and $status_via->errstr ) { my $err = $status_via->errstr; - say STDERR "Request error: ${err}"; + say STDERR "Request error in --via : ${err}"; exit 2; } +if ( $status_via and $status_via->warnstr ) { + my $warning = $status_via->warnstr; + say STDERR "Request warning in --via : ${warning}"; +} sanitize_options(); |