--- /usr/share/mc/extfs/uzip.orig 2009-06-19 21:48:06.000000000 +0200 +++ /usr/share/mc/extfs/uzip 2009-06-20 09:51:41.000000000 +0200 @@ -203,10 +203,21 @@ while () { chomp; my @match = /^ *(\d+) +([^ ]+) +(\d+) +(-?\d+\%) +(\d?\d)-(\d?\d)-(\d\d) (\d?\d):(\d\d) +([0-9a-f]+) +(.*)$/; - next if ($#match != 10); - my @rmatch = ('', '', 'unknown', $match[0], '', $match[2], $match[1], + my @rmatch; + if ($#match == 10) + { + @rmatch = ('', '', 'unknown', $match[0], '', $match[2], $match[1], $match[6] + ($match[6] < 70 ? 2000 : 1900), $match[4], $match[5], $match[7], $match[8], "00", $match[10]); + } + else + { + @match = /^ *(\d+) +([^ ]+) +(\d+) +(-?\d+\%) +(\d{4})-(\d\d)-(\d\d) (\d?\d):(\d\d) +([0-9a-f]+) +(.*)$/; + next if ($#match != 10); + @rmatch = ('', '', 'unknown', $match[0], '', $match[2], $match[1], + $match[4], $match[5], $match[6], + $match[7], $match[8], "00", $match[10]); + } &checked_print_file(@rmatch); } }