diff options
Diffstat (limited to 'perl-install/common.pm')
| -rw-r--r-- | perl-install/common.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/common.pm b/perl-install/common.pm index 7a9bddc5d..481ce793f 100644 --- a/perl-install/common.pm +++ b/perl-install/common.pm @@ -224,7 +224,7 @@ sub syscall_ { sub crypt_ { - local $_ = (gettimeofday())[1] % 0x40; + local $_ = sprintf("%2d", (gettimeofday())[1] % 0x40); #- make sure it is 2 char long. tr [\0-\x3f] [0-9a-zA-Z./]; crypt($_[0], $_) } |