summaryrefslogtreecommitdiff
path: root/rhautoimport-rs
diff options
context:
space:
mode:
Diffstat (limited to 'rhautoimport-rs')
-rwxr-xr-xrhautoimport-rs2
1 files changed, 1 insertions, 1 deletions
diff --git a/rhautoimport-rs b/rhautoimport-rs
index 9e3f6e5..2d9ffab 100755
--- a/rhautoimport-rs
+++ b/rhautoimport-rs
@@ -83,7 +83,7 @@ if($dow <= $week_table{$curweek}) {
$import_date[2] = $week_table{$nextweek};
@import_date = Date::Calc::Business_to_Standard(@import_date);
@import_date = Date::Calc::Add_Delta_Days(@import_date, 7);
- $dow = $week_table{$curweek};
+ $dow = $week_table{$nextweek};
}
print "day of next Radio Helsinki broadcast: " . Date::Calc::Date_to_Text(@import_date) . "\n";