diff options
Diffstat (limited to 'test')
-rwxr-xr-x | test/cba-inspect | 6 | ||||
-rwxr-xr-x | test/rss-inspect | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/test/cba-inspect b/test/cba-inspect index b8546bd..f998d43 100755 --- a/test/cba-inspect +++ b/test/cba-inspect @@ -49,9 +49,9 @@ binmode(STDIN, ":utf8"); binmode(STDOUT, ":utf8"); binmode(STDERR, ":utf8"); -my ($feed, $errstr) = rhautoimport::fetch_parse_rss($RSS_URL); -unless (defined $feed) { - print "Error fetching feed: $errstr\n"; +my ($result, $feed) = rhautoimport::fetch_parse_rss($RSS_URL); +unless ($result) { + print "Error fetching feed: $feed\n"; exit 1; } diff --git a/test/rss-inspect b/test/rss-inspect index 3494e7c..1859ed7 100755 --- a/test/rss-inspect +++ b/test/rss-inspect @@ -49,9 +49,9 @@ binmode(STDIN, ":utf8"); binmode(STDOUT, ":utf8"); binmode(STDERR, ":utf8"); -my ($feed, $errstr) = rhautoimport::fetch_parse_rss($RSS_URL); -unless (defined $feed) { - print "Error fetching feed: $errstr\n"; +my ($result, $feed) = rhautoimport::fetch_parse_rss($RSS_URL); +unless ($result) { + print "Error fetching feed: $feed\n"; exit 1; } |