summaryrefslogtreecommitdiff
path: root/rhautoimport-dn
diff options
context:
space:
mode:
Diffstat (limited to 'rhautoimport-dn')
-rwxr-xr-xrhautoimport-dn13
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;
}