diff options
author | Christian Pointner <equinox@helsinki.at> | 2016-06-02 11:42:58 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2016-06-02 11:42:58 (GMT) |
commit | 2d1d346df2b40eecfc82803d57f15a3165cdf898 (patch) | |
tree | 90d7e74f02e75a37b4a299d5324f78d761ad9dbd /rhautoimport-er | |
parent | d1e4c6e5ca1f785ec603d711b37f79936c255c82 (diff) |
fixed last-run warning
Diffstat (limited to 'rhautoimport-er')
-rwxr-xr-x | rhautoimport-er | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/rhautoimport-er b/rhautoimport-er index 34b431d..31033db 100755 --- a/rhautoimport-er +++ b/rhautoimport-er @@ -46,9 +46,13 @@ binmode(STDIN, ":utf8"); binmode(STDOUT, ":utf8"); binmode(STDERR, ":utf8"); -if($#ARGV >= 0 && $ARGV[0] eq 'last') { - print "!!!This is the last attempt, there won't be a retry on error!!!\n"; - $LAST_RUN = 1; +my $curweek = RHRD::utils::get_rd_week(); + +if($curweek == 1 || $curweek == 3) { + if($#ARGV >= 0 && $ARGV[0] eq 'last') { + print "!!!This is the last attempt, there won't be a retry on error!!!\n"; + $LAST_RUN = 1; + } } @@ -65,8 +69,6 @@ if(scalar(@allowed_dbs) != 1) { my $show_id = $allowed_dbs[0]->{'SHOWID'}; my $show_title = $allowed_dbs[0]->{'SHOWTITLE'}; -my $curweek = RHRD::utils::get_rd_week(); - my @today = Date::Calc::Today(); my @import_date = Date::Calc::Standard_to_Business(@today); $import_date[2] = 5; |