From f734fa35b4a14b9091632aa305b7fcceed7c4c57 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 23 Jun 2014 18:24:17 +0200 Subject: Do not error out if only partial data is available (closes #4) --- bin/db-iris | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'bin') 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(); -- cgit v1.2.3