This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Introduce myconfig.SH.
authorAndy Dougherty <doughera@lafayette.edu>
Tue, 30 Mar 1999 12:41:29 +0000 (07:41 -0500)
committerJarkko Hietaniemi <jhi@iki.fi>
Fri, 2 Apr 1999 12:06:22 +0000 (12:06 +0000)
To: Jarkko Hietaniemi <jhi@iki.fi>
Cc: Nick Ing-Simmons <nik@tiuk.ti.com>, Perl Porters <perl5-porters@perl.org>
Subject: [PATCH] myconfig.SH (was Re: perl install bug on AIX 4.3.1.0)
Message-Id: <Pine.GSU.4.05.9903301222280.15987-100000@newton.phys>

p4raw-id: //depot/cfgperl@3200

MANIFEST
myconfig.SH [moved from myconfig with 67% similarity, mode: 0644]

index 2b69bc2..60612f2 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -857,7 +857,7 @@ mpeix/mpeixish.h    MPE/iX port
 mpeix/nm               MPE/iX port
 mpeix/relink           MPE/iX port
 mv-if-diff             Script to mv a file if it changed
-myconfig               Prints summary of the current configuration
+myconfig.SH            Prints summary of the current configuration
 nostdio.h              Cause compile error on stdio calls
 op.c                   Opcode syntax tree code
 op.h                   Opcode syntax tree header
old mode 100755 (executable)
new mode 100644 (file)
similarity index 67%
rename from myconfig
rename to myconfig.SH
index 02ee0a6..dd2b914
--- a/myconfig
@@ -1,22 +1,32 @@
-#!/bin/sh
+case $CONFIG in
+'')
+       if test -f config.sh; then TOP=.;
+       elif test -f ../config.sh; then TOP=..;
+       elif test -f ../../config.sh; then TOP=../..;
+       elif test -f ../../../config.sh; then TOP=../../..;
+       elif test -f ../../../../config.sh; then TOP=../../../..;
+       else
+           echo "Can't find the perl config.sh file produced by Configure"; 
+           exit 1
+       fi
+       . $TOP/config.sh
+       ;;
+esac
+: 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
+*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
+esac
+echo "Extracting myconfig (with variable substitutions)"
+$spitshell >myconfig <<!GROK!THIS!
+$startsh
 
 # This script is designed to provide a handy summary of the configuration
 # information being used to build perl. This is especially useful if you
 # are requesting help from comp.lang.perl.misc on usenet or via mail.
 
-if test -f config.sh; then TOP=.;
-elif test -f ../config.sh; then TOP=..;
-elif test -f ../../config.sh; then TOP=../..;
-elif test -f ../../../config.sh; then TOP=../../..;
-elif test -f ../../../../config.sh; then TOP=../../../..;
-else
-       echo "Can't find the perl config.sh file produced by Configure"; exit 1
-fi
-. $TOP/config.sh
-
 # Note that the text lines /^Summary of/ .. /^\s*$/ are copied into Config.pm.
-
-$spitshell <<!GROK!THIS!
+cat <<'!NO!SUBS!'
 Summary of my $package (revision $baserev version $PERL_VERSION subversion $PERL_SUBVERSION) configuration:
   Platform:
     osname=$osname, osvers=$osvers, archname=$archname
@@ -42,4 +52,7 @@ Summary of my $package (revision $baserev version $PERL_VERSION subversion $PERL
     dlsrc=$dlsrc, dlext=$dlext, d_dlsymun=$d_dlsymun, ccdlflags='$ccdlflags'
     cccdlflags='$cccdlflags', lddlflags='$lddlflags'
 
+!NO!SUBS!
 !GROK!THIS!
+chmod 755 myconfig
+$eunicefix myconfig