Commit 28af6367 authored by Dr. Stephen Henson's avatar Dr. Stephen Henson
Browse files

PR: 1782

Submitted by: Philip Prindeville <philipp_subx@redfish-solutions.com>
Approved by: steve@openssl.org
parent 2c17b493
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -1048,7 +1048,7 @@ $perl=$ENV{'PERL'} or $perl=&which("perl5") or $perl=&which("perl")
  or $perl="perl";

chop $openssldir if $openssldir =~ /\/$/;
chop $prefix if $prefix =~ /\/$/;
chop $prefix if $prefix =~ /.\/$/;

$openssldir=$prefix . "/ssl" if $openssldir eq "";
$openssldir=$prefix . "/" . $openssldir if $openssldir !~ /(^\/|^[a-zA-Z]:[\\\/])/;