From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 1 Dec 1998 10:51:37 +0000 (+0000)
Subject: Default to accepting a hinted $randfunc even when $csym
X-Git-Tag: perl-5.6.0~5^2~1248
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/c7404c214c8382be08fc3c8ba7390a940642c871?hp=620e46c53f8c7c9f3fd77bcea9cd19e919047cba;ds=sidebyside

Default to accepting a hinted $randfunc even when $csym
does not find it.  (the previous defaylt behaviour was not
to accept).

p4raw-id: //depot/cfgperl@2427
---

diff --git a/Configure b/Configure
index db88d84..94fe25b 100755
--- a/Configure
+++ b/Configure
@@ -10510,8 +10510,8 @@ while $test "$cont"; do
 	if set $ans val -f; eval $csym; $val; then
 		cont=''
 	else
-		dflt=n
-		rp="Function $ans does not exist. Use that name anyway?"
+                dflt=y
+                rp="I cannot find function $ans.  Use that name anyway?"
 		. ./myread
 		dflt=rand
 		case "$ans" in