Forgotten about perl year issue.
Sorry, sorry. Attached.

-- 

  _.|._ |_  _.    : Adam Byrtek, alpha@(irc.pl|debian.org)
 (_|||_)| |(_|    : gg 1802819, pgp 0xB25952C0
     |            : jid alpha.jabberpl.org
--- extfs.orig/patchfs.in       2002-12-13 03:13:30.000000000 +0100
+++ extfs/patchfs.in    2002-12-13 03:12:07.000000000 +0100
@@ -21,7 +21,7 @@
 sub timef
 {
     my @time=localtime($_[0]);
-    return sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5]%100, 
$time[2], $time[1];
+    return sprintf "%02d-%02d-%d %02d:%02d", $time[4]+1, $time[3], $time[5]+1900, 
+$time[2], $time[1];
 }
 
 # parse given string as a date and return unix time

Reply via email to