output now contians feed url

1 files changed, 4 insertions, 0 deletions

diff --git a/rhimport-dn b/rhimport-dn
index 4c86bf3..5682ff1 100755
--- a/rhimport-dn
+++ b/rhimport-dn
@@ -96,7 +96,9 @@ if($dropbox eq "") {
 
 my $y = sprintf("%04d-%02d-%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]);
 my $yc = sprintf("%04d-%02d%02d", $broadcast_day[0], $broadcast_day[1], $broadcast_day[2]);
+
 print "looking for files from date $y in RSS Feed\n";
+print " -> $FILES_RSS_URL\n";
 
 my $files_feed = XML::Feed->parse(URI->new($FILES_RSS_URL))
   or die "Error fetching feed: " . XML::Feed->errstr;
@@ -138,6 +140,8 @@ if($file eq "" || !(-e "$file")) {
 
 
 print "\nlooking for headlines from date $y in RSS Feed\n";
+print " -> $HEADLINES_RSS_URL\n";
+
 my $headlines_feed = XML::Feed->parse(URI->new($HEADLINES_RSS_URL))
   or die "Error fetching feed: " . XML::Feed->errstr;