diff options
author | Christian Pointner <equinox@helsinki.at> | 2016-05-25 14:15:22 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2016-05-25 14:15:22 (GMT) |
commit | 2fbd4bc628b28c88a45026a1ec4a324ca2bda417 (patch) | |
tree | 83e7097247d1b6eae1e0c401b1f91a7d1b2e0eec /rhautoimport-dn | |
parent | 25acf325139cc0f7ce59406bc083258aa1e8bfee (diff) |
make interface of fetch_parse_rss the same as fetch_parse_json from rhrdlibs
Diffstat (limited to 'rhautoimport-dn')
-rwxr-xr-x | rhautoimport-dn | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/rhautoimport-dn b/rhautoimport-dn index 80ffec3..b843e84 100755 --- a/rhautoimport-dn +++ b/rhautoimport-dn @@ -94,9 +94,9 @@ my $yc = sprintf("%04d-%02d%02d", @broadcast_day); print "looking for files from date $y in RSS Feed\n"; print " -> $FILES_RSS_URL\n"; -my ($files_feed, $errstr) = rhautoimport::fetch_parse_rss($FILES_RSS_URL); -unless (defined $files_feed) { - print "Error fetching feed: $errstr\n"; +my ($result, $files_feed) = rhautoimport::fetch_parse_rss($FILES_RSS_URL); +unless ($result) { + print "Error fetching feed: $files_feed\n"; exit 1; } @@ -142,9 +142,10 @@ if($uri eq "") { print "\nlooking for headlines from date $y in RSS Feed\n"; print " -> $HEADLINES_RSS_URL\n"; -(my $headlines_feed, $errstr) = rhautoimport::fetch_parse_rss($HEADLINES_RSS_URL); -unless (defined $headlines_feed) { - print "Error fetching feed: $errstr\n"; + +my ($result, $headlines_feed) = rhautoimport::fetch_parse_rss($HEADLINES_RSS_URL); +unless ($result) { + print "Error fetching feed: $headlines_feed\n"; exit 1; } |