* extfs/apt.in: Fix Y2K bug.
* extfs/deba.in: Likewise. * extfs/debd.in: Likewise. * extfs/dpkg.in: Likewise. Reported by Adam Byrtek <alpha@debian.org>
Этот коммит содержится в:
родитель
4da228c21e
Коммит
ec8375764b
@ -1,5 +1,11 @@
|
|||||||
2002-12-12 Pavel Roskin <proski@gnu.org>
|
2002-12-12 Pavel Roskin <proski@gnu.org>
|
||||||
|
|
||||||
|
* extfs/apt.in: Fix Y2K bug.
|
||||||
|
* extfs/deba.in: Likewise.
|
||||||
|
* extfs/debd.in: Likewise.
|
||||||
|
* extfs/dpkg.in: Likewise.
|
||||||
|
Reported by Adam Byrtek <alpha@debian.org>
|
||||||
|
|
||||||
* extfs/patchfs.in: Print 4-digit year. If str2time is not
|
* extfs/patchfs.in: Print 4-digit year. If str2time is not
|
||||||
available, use current time, not 0.
|
available, use current time, not 0.
|
||||||
|
|
||||||
|
@ -11,7 +11,8 @@ sub bt
|
|||||||
my ($dt) = @_;
|
my ($dt) = @_;
|
||||||
my (@time);
|
my (@time);
|
||||||
@time = localtime($dt);
|
@time = localtime($dt);
|
||||||
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
|
$bt = sprintf "%02d-%02d-%d %02d:%02d", $time[4] + 1, $time[3],
|
||||||
|
$time[5] + 1900, $time[2], $time[1];
|
||||||
return $bt;
|
return $bt;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -11,7 +11,8 @@ sub bt
|
|||||||
my ($dt) = @_;
|
my ($dt) = @_;
|
||||||
my (@time);
|
my (@time);
|
||||||
@time = localtime($dt);
|
@time = localtime($dt);
|
||||||
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
|
$bt = sprintf "%02d-%02d-%d %02d:%02d", $time[4] + 1, $time[3],
|
||||||
|
$time[5] + 1900, $time[2], $time[1];
|
||||||
return $bt;
|
return $bt;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -11,7 +11,8 @@ sub bt
|
|||||||
my ($dt) = @_;
|
my ($dt) = @_;
|
||||||
my (@time);
|
my (@time);
|
||||||
@time = localtime($dt);
|
@time = localtime($dt);
|
||||||
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
|
$bt = sprintf "%02d-%02d-%d %02d:%02d", $time[4] + 1, $time[3],
|
||||||
|
$time[5] + 1900, $time[2], $time[1];
|
||||||
return $bt;
|
return $bt;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -11,7 +11,8 @@ sub bt
|
|||||||
my ($dt) = @_;
|
my ($dt) = @_;
|
||||||
my (@time);
|
my (@time);
|
||||||
@time = localtime($dt);
|
@time = localtime($dt);
|
||||||
$bt = sprintf "%02d-%02d-%02d %02d:%02d", $time[4]+1, $time[3], $time[5], $time[2], $time[1];
|
$bt = sprintf "%02d-%02d-%d %02d:%02d", $time[4] + 1, $time[3],
|
||||||
|
$time[5] + 1900, $time[2], $time[1];
|
||||||
return $bt;
|
return $bt;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user