diff options
Diffstat (limited to 'rhimport-ra')
| -rwxr-xr-x | rhimport-ra | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rhimport-ra b/rhimport-ra index 5291819..102e61d 100755 --- a/rhimport-ra +++ b/rhimport-ra @@ -75,7 +75,7 @@ my $to_cart_reb = $allowed_dbs[$idx_reb]->{'TO_CART'}; my @today = Date::Calc::Standard_to_Business(Date::Calc::Today()); $today[2] = 1; my @broadcast_day = Date::Calc::Business_to_Standard(@today); -$today[2] = 4; +$today[2] = 3; my @import_date = Date::Calc::Business_to_Standard(@today); my @import_date_reb = Date::Calc::Add_Delta_Days($import_date[0], $import_date[1], $import_date[2], 3); print "day of original broadcast: " . Date::Calc::Date_to_Text(@broadcast_day) . "\n"; |