From: Craig A. Berry <craigberry@mac.com>
Date: Fri, 23 Apr 2010 22:54:05 +0000 (-0500)
Subject: Fix -Uuseperlio command-line option in configure.com.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=839d17582bad556c85fba50bb136d1c1fa878a54;p=p5sagit%2Fp5-mst-13.2.git

Fix -Uuseperlio command-line option in configure.com.

Formerly it only worked if you went through all the questions
interactively and explicitly answered no.
---

diff --git a/configure.com b/configure.com
index 0fce752..721b889 100644
--- a/configure.com
+++ b/configure.com
@@ -3053,7 +3053,7 @@ $!
 $ bool_dflt = "y"
 $ IF F$TYPE(useperlio) .NES. ""
 $ then
-$   if f$extract(0,1,f$edit(useperlio,"collapse,upcase")) .eqs. "N" .or. useperlio .eqs. "undef" then bool_dflt = "n"
+$   if .not. useperlio .or. useperlio .eqs. "undef" then bool_dflt = "n"
 $ endif
 $ IF .NOT. silent
 $ THEN