summaryrefslogtreecommitdiff
path: root/configure.com
diff options
context:
space:
mode:
Diffstat (limited to 'configure.com')
-rw-r--r--configure.com2
1 files changed, 1 insertions, 1 deletions
diff --git a/configure.com b/configure.com
index 0fce752b83..721b889e67 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