develooper Front page | perl.perl5.porters | Postings from July 2001

[PATCH Configure] perl -V broken

Thread Next
From:
Robin Barker
Date:
July 9, 2001 08:55
Subject:
[PATCH Configure] perl -V broken
Message ID:
200107091554.QAA18237@tempest.npl.co.uk
----------
X-Sun-Data-Type: text
X-Sun-Data-Description: text
X-Sun-Data-Name: text
X-Sun-Charset: us-ascii
X-Sun-Content-Lines: 60


I found that with bleadperl (installed as perl5.7.1)

	% perl5.7.1 -V
	Summary of my perl5 (revision 5.0 version 7 subversion 17) configuration:

Whereas 
	% ./myconfig
	Summary of my perl5 (revision 5.0 version 7 subversion 1 patchlevel 11224) configuration:


I tracked this down to a redefinition of patchlevel in myconfig.SH that
was not honoured by lib/Config.pm.

I have produced a patch, below.  I'm not sure is this is the right 
approach, I am a bit daunted by the maze of twisty passages which is 
Configure, config.sh, myconfig.SH, configpm, lib/Config.pm.
The necessary changes could be made in a number of places.

Robin 

P.S.  Patch attached because of the long lines which might wrap badly.

--- Configure.orig	Sun Jul  8 18:09:05 2001
+++ Configure
@@ -17383,6 +17383,11 @@
 awk '/^#define[ 	]+PERL_/ {printf "%s=%s\n",$2,$3}' $src/patchlevel.h >>config.sh
 echo "PERL_PATCHLEVEL=$perl_patchlevel" >>config.sh
 echo "PERL_CONFIG_SH=true" >>config.sh
+if $test "$perl_patchlevel" -gt 0 ; then
+    echo "mypatchlevel=' patchlevel $perl_patchlevel'" >>config.sh
+else
+    echo "mypatchlevel=''" >>config.sh
+fi
 
 : propagate old symbols
 if $test -f UU/config.sh; then
--- myconfig.SH.orig	Tue Jun 26 14:29:24 2001
+++ myconfig.SH
@@ -12,11 +12,6 @@
 	. $TOP/config.sh
 	;;
 esac
-if $test "$PERL_PATCHLEVEL" -gt 0 ; then
-    patchlevel=" patchlevel $PERL_PATCHLEVEL"
-else
-    patchlevel=""
-fi
 : This forces SH files to create target in same directory as SH file.
 : This is so that make depend always knows where to find SH derivatives.
 case "$0" in
@@ -32,7 +27,7 @@
 
 # Note that the text lines /^Summary of/ .. /^\s*$/ are copied into Config.pm.
 cat <<'!NO!SUBS!'
-Summary of my $package (revision $baserev version $PERL_VERSION subversion $PERL_SUBVERSION$patchlevel) configuration:
+Summary of my $package (revision $baserev version $PERL_VERSION subversion $PERL_SUBVERSION$mypatchlevel) configuration:
   Platform:
     osname=$osname, osvers=$osvers, archname=$archname
     uname='$myuname'
----------
X-Sun-Data-Type: default
X-Sun-Data-Description: default
X-Sun-Data-Name: mypatchlevel.patch
X-Sun-Charset: us-ascii
X-Sun-Content-Lines: 37

--- Configure.orig	Sun Jul  8 18:09:05 2001
+++ Configure
@@ -17383,6 +17383,11 @@
 awk '/^#define[ 	]+PERL_/ {printf "%s=%s\n",$2,$3}' $src/patchlevel.h >>config.sh
 echo "PERL_PATCHLEVEL=$perl_patchlevel" >>config.sh
 echo "PERL_CONFIG_SH=true" >>config.sh
+if $test "$perl_patchlevel" -gt 0 ; then
+    echo "mypatchlevel=' patchlevel $perl_patchlevel'" >>config.sh
+else
+    echo "mypatchlevel=''" >>config.sh
+fi
 
 : propagate old symbols
 if $test -f UU/config.sh; then
--- myconfig.SH.orig	Tue Jun 26 14:29:24 2001
+++ myconfig.SH
@@ -12,11 +12,6 @@
 	. $TOP/config.sh
 	;;
 esac
-if $test "$PERL_PATCHLEVEL" -gt 0 ; then
-    patchlevel=" patchlevel $PERL_PATCHLEVEL"
-else
-    patchlevel=""
-fi
 : This forces SH files to create target in same directory as SH file.
 : This is so that make depend always knows where to find SH derivatives.
 case "$0" in
@@ -32,7 +27,7 @@
 
 # Note that the text lines /^Summary of/ .. /^\s*$/ are copied into Config.pm.
 cat <<'!NO!SUBS!'
-Summary of my $package (revision $baserev version $PERL_VERSION subversion $PERL_SUBVERSION$patchlevel) configuration:
+Summary of my $package (revision $baserev version $PERL_VERSION subversion $PERL_SUBVERSION$mypatchlevel) configuration:
   Platform:
     osname=$osname, osvers=$osvers, archname=$archname
     uname='$myuname'

-- 
Robin Barker                        | Email: Robin.Barker@npl.co.uk
CMSC, Building 10,                  | Phone: +44 (0) 20 8943 7090
National Physical Laboratory,       | Fax:   +44 (0) 20 8977 7091
Teddington, Middlesex, UK. TW11 OLW | WWW:   http://www.npl.co.uk

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About