From 7185e2d6cde3fc90edc55ea2b173e4fa12abc7b1 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Ulf=20M=C3=B6ller?= Date: Thu, 29 Apr 1999 22:10:24 +0000 Subject: [PATCH] $perl should never be empty. --- Configure | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/Configure b/Configure index 60fca6ad22..2a2dffe3f9 100755 --- a/Configure +++ b/Configure @@ -285,7 +285,7 @@ my $ranlib; my $perl; $ranlib=&which("ranlib") or $ranlib="true"; -$perl=&which("perl5") or $perl=&which("perl"); +$perl=&which("perl5") or $perl=&which("perl") or $perl="perl"; &usage if ($#ARGV < 0); @@ -629,10 +629,7 @@ if($IsWindows) { printf OUT "#define DATE \"%s\"\n", scalar gmtime(); close(OUT); } else { - if ( $perl =~ /./ ) { - (system "make -f Makefile.ssl PERL=\'$perl\' links") == 0 or exit $?; - } else { - (system 'make -f Makefile.ssl links') == 0 or exit $?; + (system "make -f Makefile.ssl PERL=\'$perl\' links") == 0 or exit $?; } (system 'make depend') == 0 or exit $? if $depflags ne ""; &dofile("tools/c_rehash",$openssldir,'^DIR=', 'DIR=%s',); -- 2.25.1