diff options
author | Christian Pointner <equinox@helsinki.at> | 2016-03-13 00:44:05 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2016-03-13 00:44:05 (GMT) |
commit | 7ffd297bd4120690e45b7aa7d98f9c8472a1b3ec (patch) | |
tree | 7c554ae088e70a5ec849ed6e66ec025430c69c6a /rhautoimport-btl | |
parent | 66727097e79e98dc99b7c65105bb941ddf55e934 (diff) |
added external bounding checks to respective scripts
Diffstat (limited to 'rhautoimport-btl')
-rwxr-xr-x | rhautoimport-btl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/rhautoimport-btl b/rhautoimport-btl index 77da585..87ad7c7 100755 --- a/rhautoimport-btl +++ b/rhautoimport-btl @@ -29,6 +29,7 @@ use XML::Feed::Content; use XML::Feed::Enclosure; use URI::URL; use HTML::Entities; +use RHRD::utils; use lib '/usr/local/share/rhautoimport/'; use rhautoimport; @@ -38,6 +39,12 @@ my $RSS_URL = "http://www.btlonline.org/rss/btl128.xml"; my $RD_GROUP = "betweenlin"; my $PV_ID = '221'; +my $curweek = RHRD::utils::get_rd_week(); +if($curweek == 2 || $curweek == 4) { + print "please don't run this script in week 2 or 4!\n"; + exit 42; +} + if($#ARGV >= 0 && $ARGV[0] eq 'last') { print "!!!This is the last attempt, there won't be a retry on error!!!\n" } |