1
1

* extfs/apt.in: Add 1 to the month number. Perl localtime()

uses range 0..11 while extfs expects range 1..12.
* extfs/deba.in: Likewise.
* extfs/debd.in: Likewise.
* extfs/dpkg.in: Likewise.
Этот коммит содержится в:
Pavel Roskin 2002-12-11 21:19:43 +00:00
родитель 82b5f988a5
Коммит 92a3d687fd
5 изменённых файлов: 10 добавлений и 4 удалений

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

@ -1,5 +1,11 @@
2002-12-11 Adam Byrtek <alpha@debian.org>
* extfs/apt.in: Add 1 to the month number. Perl localtime()
uses range 0..11 while extfs expects range 1..12.
* extfs/deba.in: Likewise.
* extfs/debd.in: Likewise.
* extfs/dpkg.in: Likewise.
* extfs/audio: Move ...
* extfs/audio.in: ... here. Add CDDB support.
* extfs/Makefile.am: Adjust for the above.

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

@ -11,7 +11,7 @@ sub bt
my ($dt) = @_;
my (@time);
@time = localtime($dt);
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4], $time[3], $time[5], $time[2], $time[1];
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
return $bt;
}

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

@ -11,7 +11,7 @@ sub bt
my ($dt) = @_;
my (@time);
@time = localtime($dt);
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4], $time[3], $time[5], $time[2], $time[1];
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
return $bt;
}

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

@ -11,7 +11,7 @@ sub bt
my ($dt) = @_;
my (@time);
@time = localtime($dt);
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4], $time[3], $time[5], $time[2], $time[1];
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
return $bt;
}

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

@ -11,7 +11,7 @@ sub bt
my ($dt) = @_;
my (@time);
@time = localtime($dt);
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4], $time[3], $time[5], $time[2], $time[1];
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
return $bt;
}