This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Default to accepting a hinted $randfunc even when $csym
[perl5.git] / Configure
index db88d84..94fe25b 100755 (executable)
--- 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