Since OpenSSL::Test redirects stderr to /dev/null, don't do so in 80-test_ca.t
Since OpenSSL::Test only redirects stderr to /dev/null when being run through non-verbose test harness, this change allows the stderr output to be displayed when verbosity is requested. Reviewed-by: Emilia Käsper <emilia@openssl.org>
This commit is contained in:
parent
b8fcd4f079
commit
7d9b2d53a2
@ -19,20 +19,20 @@ plan tests => 4;
|
|||||||
SKIP: {
|
SKIP: {
|
||||||
$ENV{OPENSSL_CONFIG} = "-config ".srctop_file("test", "CAss.cnf");
|
$ENV{OPENSSL_CONFIG} = "-config ".srctop_file("test", "CAss.cnf");
|
||||||
skip "failed creating CA structure", 3
|
skip "failed creating CA structure", 3
|
||||||
if !ok(run(perlapp(["CA.pl","-newca"], stdin => undef, stderr => undef)),
|
if !ok(run(perlapp(["CA.pl","-newca"], stdin => undef)),
|
||||||
'creating CA structure');
|
'creating CA structure');
|
||||||
|
|
||||||
$ENV{OPENSSL_CONFIG} = "-config ".srctop_file("test", "Uss.cnf");
|
$ENV{OPENSSL_CONFIG} = "-config ".srctop_file("test", "Uss.cnf");
|
||||||
skip "failed creating new certificate request", 2
|
skip "failed creating new certificate request", 2
|
||||||
if !ok(run(perlapp(["CA.pl","-newreq"], stderr => undef)),
|
if !ok(run(perlapp(["CA.pl","-newreq"])),
|
||||||
'creating CA structure');
|
'creating CA structure');
|
||||||
|
|
||||||
$ENV{OPENSSL_CONFIG} = "-config ".$std_openssl_cnf;
|
$ENV{OPENSSL_CONFIG} = "-config ".$std_openssl_cnf;
|
||||||
skip "failed to sign certificate request", 1
|
skip "failed to sign certificate request", 1
|
||||||
if !is(yes(cmdstr(perlapp(["CA.pl", "-sign"], stderr => undef))), 0,
|
if !is(yes(cmdstr(perlapp(["CA.pl", "-sign"]))), 0,
|
||||||
'signing certificate request');
|
'signing certificate request');
|
||||||
|
|
||||||
ok(run(perlapp(["CA.pl", "-verify", "newcert.pem"], stderr => undef)),
|
ok(run(perlapp(["CA.pl", "-verify", "newcert.pem"])),
|
||||||
'verifying new certificate');
|
'verifying new certificate');
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user