Change 34188 by [EMAIL PROTECTED] on 2008/08/08 14:18:30
Subject: [perl #24198] Bad default-domainname extraction in
Configure-Script may cause infinite loops in perl-tests
From: "Bram via RT" <[EMAIL PROTECTED]>
Date: Thu, 07 Aug 2008 06:00:47 -0700
Message-ID: <[EMAIL PROTECTED]>
Affected files ...
... //depot/perl/Configure#701 edit
Differences ...
==== //depot/perl/Configure#701 (xtext) ====
Index: perl/Configure
--- perl/Configure#700~34126~ 2008-07-11 06:06:21.000000000 -0700
+++ perl/Configure 2008-08-08 07:18:30.000000000 -0700
@@ -25,7 +25,7 @@
# $Id: Head.U 6 2006-08-25 22:21:46Z rmanfredi $
#
-# Generated on Thu Jul 10 17:14:53 CEST 2008 [metaconfig 3.5 PL0]
+# Generated on Fri Aug 8 16:16:43 CEST 2008 [metaconfig 3.5 PL0]
# (with additional metaconfig patches by [EMAIL PROTECTED])
cat >c1$$ <<EOF
@@ -8703,11 +8703,11 @@
echo "(Attempting domain name extraction from
$tans)"
dflt=.`$sed -n -e 's/ / /g' \
-e 's/^search *\([^ ]*\).*/\1/p' $tans \
- | ./tr '[A-Z]' '[a-z]' 2>/dev/null`
+ -e 1q 2>/dev/null`
case "$dflt" in
.) dflt=.`$sed -n -e 's/ / /g' \
-e 's/^domain *\([^ ]*\).*/\1/p' $tans \
- | ./tr '[A-Z]' '[a-z]' 2>/dev/null`
+ -e 1q 2>/dev/null`
;;
esac
fi
End of Patch.
