1
1

* extfs/uzip.in: Fix error in parsing size of files over 9999999

bytes long.
Этот коммит содержится в:
Pavel Roskin 2003-08-18 05:17:25 +00:00
родитель 65b52a3c89
Коммит 780609f437
2 изменённых файлов: 6 добавлений и 1 удалений

Просмотреть файл

@ -1,3 +1,8 @@
2003-08-18 Oskar Liljeblad <oskar@osk.mine.nu>
* extfs/uzip.in: Fix error in parsing size of files over 9999999
bytes long.
2003-08-08 Pavel Roskin <proski@gnu.org>
* extfs/audio.in: Further portability fixes. Use current date

Просмотреть файл

@ -202,7 +202,7 @@ sub mczipfs_list {
} else {
while (<PIPE>) {
chomp;
my @match = /^ +(\d+) +([^ ]+) +(\d+) +(\d+\%) +(\d?\d)-(\d?\d)-(\d\d) (\d?\d):(\d\d) +([0-9a-f]+) +(.*)$/;
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],
$match[6] + ($match[6] < 70 ? 2000 : 1900), $match[4], $match[5],