Fixed the date pivot calculation
authorJoey Schulze <joey@infodrom.org>
Fri, 17 Sep 2004 21:03:04 +0000 (21:03 +0000)
committerJoey Schulze <joey@infodrom.org>
Fri, 17 Sep 2004 21:03:04 +0000 (21:03 +0000)
src/index.wml

index f420814..23c73db 100644 (file)
@@ -38,7 +38,7 @@ genauso interessant, wie f&uuml;r den gewerblichen Einsatz.  <p>
 
     my ($date_sec,$date_min,$date_hour,$date_mday,$date_mon,$date_year,$date_wday,$date_isdst)
         = localtime(time-24*60*60*10);
 
     my ($date_sec,$date_min,$date_hour,$date_mday,$date_mon,$date_year,$date_wday,$date_isdst)
         = localtime(time-24*60*60*10);
-    my $pivot = sprintf ("%04d-%d-%02d", $date_year+1900, $date_mon+1, $date_mday);
+    my $pivot = sprintf ("%04d-%02d-%02d", $date_year+1900, $date_mon+1, $date_mday);
 
     my @top = ();
     foreach my $fname (@news) {
 
     my @top = ();
     foreach my $fname (@news) {