Fix Sodexo food days.

sodexo.pl

@@ -51,16 +51,17 @@ sub get_sodexo_restaurants {
     # Loop weekdays
     for (my $weekday = 1; $weekday < 7; $weekday++) {
 
-      # Get current unix timestamp and week
+      # Get current unix timestamp and week day
       $s = strftime "%s", localtime;
       $v = strftime "%w", localtime;
       # Calculate current weekday 
-      $s = $s - ($v - 2 + $weekday)  * 84600;
+      $s = $s + ($weekday - $v)  * 86400;
       $timestr = strftime "%Y/%m/%d", localtime($s);
 
       my $url = "http://www.sodexo.fi/ruokalistat/output/daily_json/$kitchen/$timestr/fi";
       my $temp_fname = "sodexo$count-$weekday.temp.js";  
       if (!-f $temp_fname || !$use_old) {
+        print $url . " -> " . $temp_fname . "\n";
         system("wget -q --timeout=10 -O $temp_fname.tmp \"$url\" && mv $temp_fname.tmp $temp_fname");
       }
       if (-f $temp_fname) {