mirror of
https://github.com/openssl/openssl.git
synced 2025-02-17 14:32:04 +08:00
test/recipes/80-test_ca.t: remove_tree->rmtree to make it work with Perl 5.10.
Reviewed-by: Richard Levitte <levitte@openssl.org>
This commit is contained in:
parent
1457731221
commit
e9fd82f624
@ -4,7 +4,7 @@ use strict;
|
||||
use warnings;
|
||||
|
||||
use POSIX;
|
||||
use File::Path 2.00 qw/remove_tree/;
|
||||
use File::Path 2.00 qw/rmtree/;
|
||||
use OpenSSL::Test qw/:DEFAULT cmdstr srctop_file/;
|
||||
|
||||
setup("test_ca");
|
||||
@ -13,7 +13,7 @@ $ENV{OPENSSL} = cmdstr(app(["openssl"]));
|
||||
my $std_openssl_cnf =
|
||||
srctop_file("apps", $^O eq "VMS" ? "openssl-vms.cnf" : "openssl.cnf");
|
||||
|
||||
remove_tree("demoCA", { safe => 0 });
|
||||
rmtree("demoCA", { safe => 0 });
|
||||
|
||||
plan tests => 4;
|
||||
SKIP: {
|
||||
@ -37,7 +37,7 @@ plan tests => 4;
|
||||
}
|
||||
|
||||
|
||||
remove_tree("demoCA", { safe => 0 });
|
||||
rmtree("demoCA", { safe => 0 });
|
||||
unlink "newcert.pem", "newreq.pem";
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user