diff options
author | Dr. Stephen Henson <steve@openssl.org> | 2011-10-14 15:15:20 +0000 |
---|---|---|
committer | Dr. Stephen Henson <steve@openssl.org> | 2011-10-14 15:15:20 +0000 |
commit | 41a846c694f93b073798bc7dd78a3cb465a27485 (patch) | |
tree | 2f5e291e81871bc1908babd1c0dabacce0aa5ea0 /fips | |
parent | 3335b6f265f727dc7ac6606abfa021f5223cb31b (diff) |
Don't use TPREFIX shell variable for minimal script.
Diffstat (limited to 'fips')
-rw-r--r-- | fips/fipsalgtest.pl | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/fips/fipsalgtest.pl b/fips/fipsalgtest.pl index 28dd315109..2f6c45f9ed 100644 --- a/fips/fipsalgtest.pl +++ b/fips/fipsalgtest.pl @@ -938,6 +938,7 @@ sub run_tests { my ( $tname, $tref ); my $bad = 0; my $lastdir = ""; + $stprefix = $tprefix unless defined $stprefix; if ($outfile ne "") { open OUT, ">$outfile" || die "Can't open $outfile"; } @@ -953,7 +954,6 @@ echo Running Algorithm Tests END } else { - $stprefix = $tprefix unless defined $stprefix; print OUT <<END; #!/bin/sh @@ -1041,8 +1041,12 @@ END my $cmd = "$tcmd \"$req\" \"$out\""; print STDERR "DEBUG: running test $tname\n" if ( $debug && !$verify ); if ($outfile ne "") { - print OUT "echo \" running $tname test\"\n" unless $minimal_script; - print OUT "\${TPREFIX}$cmd\n"; + if ($minimal_script) { + print OUT "$stprefix$cmd\n"; + } else { + print OUT "echo \" running $tname test\"\n" unless $minimal_script; + print OUT "\${TPREFIX}$cmd\n"; + } } else { $cmd = "$tprefix$cmd"; system($cmd); |