diff options
| author | Christian Pointner <equinox@helsinki.at> | 2016-11-12 14:58:02 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@helsinki.at> | 2016-11-12 14:58:02 (GMT) |
| commit | 10ad28260299aa002962a407c944a8e0e56c6e3e (patch) | |
| tree | 180b360b18ae970fa9b82d20760005ec60f3a671 | |
| parent | 5938daf832ad1322d05cd49004b7f74a3aad4595 (diff) | |
Werkstatt Radio is now on Saturday
| -rw-r--r-- | debian/changelog | 6 | ||||
| -rwxr-xr-x | rhimport-wr | 4 |
2 files changed, 8 insertions, 2 deletions
diff --git a/debian/changelog b/debian/changelog index dc7f383..d8a8574 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +rhimport (0.3.15-58) unstable; urgency=medium + + * Werkstatt Radio is now on Saturday + + -- Christian Pointner <equinox@spreadspace.org> Sat, 12 Nov 2016 15:57:42 +0100 + rhimport (0.3.15-57) unstable; urgency=medium * fixe btl importer diff --git a/rhimport-wr b/rhimport-wr index dbf1043..8f7348a 100755 --- a/rhimport-wr +++ b/rhimport-wr @@ -83,12 +83,12 @@ my @today = Date::Calc::Today(); print "today: " . Date::Calc::Date_to_Text(@today) . " (Week: " . $curweek . ")\n"; my @import_date = Date::Calc::Standard_to_Business(@today); -$import_date[2] = 3; +$import_date[2] = 6; @import_date = Date::Calc::Business_to_Standard(@import_date); my $dow = Date::Calc::Day_of_Week(@today); if($curweek == 1 || $curweek == 3) { - if($dow > 3) { + if($dow > 6) { @import_date = Date::Calc::Add_Delta_Days(@import_date, 14); } } else { |