summaryrefslogtreecommitdiff
path: root/Configure
diff options
context:
space:
mode:
authorAndy Dougherty <doughera@lafayette.edu>2000-11-04 09:15:29 -0500
committerJarkko Hietaniemi <jhi@iki.fi>2000-11-04 22:40:59 +0000
commitf83701cd86be3616a770a8d28c295a3f15ac21d0 (patch)
tree68e98c453ca06b74e92bb7628478d492a6086eed /Configure
parentff4fed7c8390873fd72003ab33b27667ceea7183 (diff)
downloadperl-f83701cd86be3616a770a8d28c295a3f15ac21d0.tar.gz
Configure would use a bad $myuname from an old config.sh.
Subject: [PATCH 5.6.1-to-be and 5.7.x] Very old Configure myuname bug Message-ID: <Pine.SOL.4.10.10011041410120.982-100000@maxwell.phys.lafayette.edu> p4raw-id: //depot/perl@7546
Diffstat (limited to 'Configure')
-rwxr-xr-xConfigure8
1 files changed, 5 insertions, 3 deletions
diff --git a/Configure b/Configure
index 89df03f37f..13e52dbd28 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 Sat Nov 4 01:58:40 EET 2000 [metaconfig 3.0 PL70]
+# Generated on Sun Nov 5 00:37:41 EET 2000 [metaconfig 3.0 PL70]
# (with additional metaconfig patches by perlbug@perl.org)
cat >/tmp/c1$$ <<EOF
@@ -2264,7 +2264,10 @@ if test -f config.sh; then
rp="I see a config.sh file. Shall I use it to set the defaults?"
. UU/myread
case "$ans" in
- n*|N*) echo "OK, I'll ignore it."; mv config.sh config.sh.old;;
+ n*|N*) echo "OK, I'll ignore it."
+ mv config.sh config.sh.old
+ myuname="$newmyuname"
+ ;;
*) echo "Fetching default answers from your old config.sh file..." >&4
tmp_n="$n"
tmp_c="$c"
@@ -2675,7 +2678,6 @@ cd UU
;;
esac
test "$override" && . ./optdef.sh
-myuname="$newmyuname"
: Restore computed paths
for file in $loclist $trylist; do