summaryrefslogtreecommitdiff
path: root/rhautoimport-btl
diff options
context:
space:
mode:
authorChristian Pointner <equinox@helsinki.at>2016-03-13 22:20:09 (GMT)
committerChristian Pointner <equinox@helsinki.at>2016-03-13 22:20:09 (GMT)
commit6a9d9b09f2e69e2c86ab63945b6b04276cbc5d95 (patch)
tree9c4698f8b6ac3a820270e2987104184ef8e5bbbe /rhautoimport-btl
parentb2c6e4a42ada276356f94f78fd80302694d50af6 (diff)
fixed last run arguments
Diffstat (limited to 'rhautoimport-btl')
-rwxr-xr-xrhautoimport-btl6
1 files changed, 4 insertions, 2 deletions
diff --git a/rhautoimport-btl b/rhautoimport-btl
index 87ad7c7..1e2e7cc 100755
--- a/rhautoimport-btl
+++ b/rhautoimport-btl
@@ -38,6 +38,7 @@ my $STAT_FILE = $ENV{'HOME'} . "/rhautoimport-btl.stat";
my $RSS_URL = "http://www.btlonline.org/rss/btl128.xml";
my $RD_GROUP = "betweenlin";
my $PV_ID = '221';
+my $LAST_RUN = 0;
my $curweek = RHRD::utils::get_rd_week();
if($curweek == 2 || $curweek == 4) {
@@ -46,7 +47,8 @@ if($curweek == 2 || $curweek == 4) {
}
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;
}
@@ -120,7 +122,7 @@ for my $entry ($feed->entries) {
}
if($uri eq "") {
print "No Entry found for " . Date::Calc::Date_to_Text(@broadcast_date) . " - ";
- if($#ARGV >= 0 && $ARGV[0] eq 'last') {
+ if($LAST_RUN) {
print "giving up, manual import necessary!!!\n";
} else {
print "will retry later\n";