On 11 Jan 2004 at 3:38, Autrijus Tang wrote: > 在 六, 2004-01-10 03:54, Alan Stewart 寫道： > > OK. Here is another version of mktmpdir.c and sha1test.c, with sha1.c taken from > > the XS > > code in Digest::SHA1, so it's under the Perl license vice GPL. No sha1.h this time. > > Thanks, applied. > > I'd also appreciate a similar patch to par.pl that conditionally loads > and uses Digest::SHA1 to compute the cache directory, then fallback to > Digest::MD5, then finally to the current stat(). > I believe it's on line 610ish. > > Thanks! > /Autrijus/ >
Here is a patched par.pl and a patched Par.pm. However, this par.pl doesn't bundle Digest::SHA1 and Digest::MD5 in the par file. There is a chicken and egg problem. You can't use a bundled digest .pm to create the temp dir name until you extract the digest .pm and you can't extract the .pm until you have a temp dir already. It will work if the .pm can be found in the local perl installation from which perl.exe is running. Of course mtime is still there as fallback. Is that good enough?? Alan Stewart
The following section of this message contains a file attachment
prepared for transmission using the Internet MIME message format.
If you are using Pegasus Mail, or any another MIME-compliant system,
you should be able to save it or view it from within your mailer.
If you cannot, please ask your system administrator for assistance.
---- File information -----------
File: par.zip
Date: 10 Jan 2004, 14:23
Size: 13172 bytes.
Type: ZIP-archive
par.zip
Description: Zip archive
