From: Nicholas Clark <nick@ccl4.org>
Date: Fri, 25 Aug 2000 12:01:45 +0000 (+0100)
Subject: Tweak the sfio/useperlio logic, hopefully as wished in
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f28d4e807996dd683dfcc827cb203c7127473f9f;p=p5sagit%2Fp5-mst-13.2.git

Tweak the sfio/useperlio logic, hopefully as wished in

Subject: [ID 20000825.004] Not OK: perl v5.7.0 +SUIDMAIL +DEVEL6804 on i586-linux 2.2.12 (UNINSTALLED)
Message-Id: <E13SHF3-0005I9-00@fruitbat.babyhippo.co.uk>

p4raw-id: //depot/perl@6818
---

diff --git a/Configure b/Configure
index afdbfbb..8805bca 100755
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Fri Aug 25 21:05:22 EET DST 2000 [metaconfig 3.0 PL70]
+# Generated on Fri Aug 25 21:43:24 EET DST 2000 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.com)
 
 cat >/tmp/c1$$ <<EOF
@@ -11256,10 +11256,19 @@ $define)
 	*) dflt='n';;
 	esac
 	echo "$package can use the sfio library, but it is experimental."
+	case "$useperlio" in
+	"$undef")
+	    echo "For sfio also the PerlIO abstraction layer is needed."
+	    echo "Earlier you said you wouldn't want that."
+	    ;;
+	esac
 	rp="You seem to have sfio available, do you want to try using it?"
 	. ./myread
 	case "$ans" in
-	y|Y) ;;
+	y|Y)	echo "Ok, turning on both sfio and PerlIO, then."
+		useperlio="$define"
+		val="$define"
+		;;
 	*)	echo "Ok, avoiding sfio this time.  I'll use stdio instead."
 		val="$undef"
 		: Remove sfio from list of libraries to use
@@ -11272,8 +11281,9 @@ $define)
 	;;
 *)	case "$usesfio" in
 	true|$define|[yY]*)
-		echo "Sorry, cannot find sfio on this machine" >&4
-		echo "Ignoring your setting of usesfio=$usesfio" >&4
+		echo "Sorry, cannot find sfio on this machine." >&4
+		echo "Ignoring your setting of usesfio=$usesfio." >&4
+		val="$undef"
 		;;
 	esac
 	;;