diff options
Diffstat (limited to 'rhautoimport-dn')
| -rwxr-xr-x | rhautoimport-dn | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/rhautoimport-dn b/rhautoimport-dn index 3bb0e58..2a65c8b 100755 --- a/rhautoimport-dn +++ b/rhautoimport-dn @@ -38,9 +38,11 @@ my $FILES_RSS_URL = "http://www.democracynow.org/podcast-stations.xml"; my $HEADLINES_RSS_URL = "http://www.democracynow.org/podcast.xml"; my $RD_GROUP = "democracyn"; my $PV_ID = '111'; +my $LAST_RUN = 0; if($#ARGV >= 0 && $ARGV[0] eq 'last') { - print "!!!This is the last attempt, there won't be a retry on error!!!\n" + print "!!!This is the last attempt, there won't be a retry on error!!!\n"; + $LAST_RUN = 1; } my @today = Date::Calc::Today(); @@ -121,7 +123,7 @@ for my $entry ($files_feed->entries) { } if($uri eq "") { print "No Entry found from day in question - "; - if($#ARGV >= 0 && $ARGV[0] eq 'last') { + if($LAST_RUN) { print "giving up, manual import necessary!!!\n"; } else { print "will retry later\n"; |