allow Configure -S to run non-interactively (spotted by Greg Hudson

<ghudson@mit.edu>)

p4raw-id: //depot/perl@5980

diff --git a/Configure b/Configure
index 9538137..7c5c134 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -1341,10 +1341,15 @@ esac
 case "$fastread$alldone" in
 yescont|yesexit) ;;
 *)
-       if test ! -t 0; then
-               echo "Say 'sh Configure', not 'sh <Configure'"
-               exit 1
-       fi
+       case "$extractsh" in
+       true) ;;
+       *)
+               if test ! -t 0; then
+                       echo "Say 'sh Configure', not 'sh <Configure'"
+                       exit 1
+               fi
+               ;;
+       esac
        ;;
 esac