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";