1 files changed, 5 insertions, 2 deletions
diff --git a/rhautoimport-tr b/rhautoimport-tr
index b356a01..df848a5 100755
--- a/rhautoimport-tr
+++ b/rhautoimport-tr
@@ -84,8 +84,11 @@ my $bdfile = sprintf("^%04d-?%02d-?%02d", @broadcast_day);
 print "looking for files from $bd in RSS Feed\n";
 print " -> $RSS_URL\n";
 
-my $feed = rhautoimport::fetch_parse_rss($RSS_URL)
-  or die "Error fetching feed: " . XML::Feed->errstr;
+my ($feed, $errstr) = rhautoimport::fetch_parse_rss($RSS_URL);
+unless (defined $feed) {
+  print "Error fetching feed: $errstr\n";
+  exit 1;
+}
 
 my $uri = "";
 my $file = "";