diff options
| author | Steve Peters <steve@fisharerojo.org> | 2006-01-18 13:32:09 +0000 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2006-01-18 13:32:09 +0000 |
| commit | 2f397494d2e5c4344bda444a704ca9e81d71a61b (patch) | |
| tree | fc4c376b9fa40bcceb671dc6b74c1b0973cc6d56 /ext/Digest | |
| parent | e7e4d43305ac59d273d9fc1ca506e3502878844d (diff) | |
| download | perl-2f397494d2e5c4344bda444a704ca9e81d71a61b.tar.gz | |
Digest::SHA's t/2-nist-sha-oo.t has some path related problems on
VMS as well.
p4raw-id: //depot/perl@26900
Diffstat (limited to 'ext/Digest')
| -rw-r--r-- | ext/Digest/SHA/t/2-nist-sha-oo.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Digest/SHA/t/2-nist-sha-oo.t b/ext/Digest/SHA/t/2-nist-sha-oo.t index 7af2edba13..e0e363b453 100644 --- a/ext/Digest/SHA/t/2-nist-sha-oo.t +++ b/ext/Digest/SHA/t/2-nist-sha-oo.t @@ -30,7 +30,7 @@ ok(Digest::SHA->new($NSA), undef); # test OO methods using first two SHA-256 vectors from NIST -my $temp = dirname($0) . "/oo.tmp"; +my $temp = File::Spec->catfile(dirname($0), "oo.tmp"); my $file = File::Spec->canonpath($temp); open(FILE, ">$file"); binmode(FILE); |