[p5sagit/p5-mst-13.2.git] / doSH

#!/bin/sh

: if this fails, just run all the .SH files by hand
. ./config.sh

echo " "
echo "Doing variable substitutions on .SH files..."
set x `awk '{print $1}' <MANIFEST | grep '\.SH'`
shift
case $# in
0) set x *.SH; shift;;
esac
if test ! -f $1; then
    shift
fi
for file in $*; do
    set X
    shift
    chmod +x $file
    case "$file" in
    */*)
	dir=`expr X$file : 'X\(.*\)/'`
	file=`expr X$file : 'X.*/\(.*\)'`
	(cd $dir && . $file)
	;;
    *)
	. $file
	;;
    esac
done
if test -f config.h.SH; then
    if test ! -f config.h; then
	: oops, they left it out of MANIFEST, probably, so do it anyway.
	. config.h.SH
    fi
fi
Commit	Line	Data
6e21c824	1	#!/bin/sh
	2
	3	: if this fails, just run all the .SH files by hand
	4	. ./config.sh
	5
	6	echo " "
	7	echo "Doing variable substitutions on .SH files..."
	8	set x `awk '{print $1}' <MANIFEST \| grep '\.SH'`
	9	shift
	10	case $# in
	11	0) set x *.SH; shift;;
	12	esac
	13	if test ! -f $1; then
	14	shift
	15	fi
	16	for file in $*; do
	17	set X
	18	shift
	19	chmod +x $file
	20	case "$file" in
	21	/)
	22	dir=`expr X$file : 'X\(.*\)/'`
	23	file=`expr X$file : 'X./\(.\)'`
	24	(cd $dir && . $file)
	25	;;
	26	*)
	27	. $file
	28	;;
	29	esac
	30	done
	31	if test -f config.h.SH; then
	32	if test ! -f config.h; then
	33	: oops, they left it out of MANIFEST, probably, so do it anyway.
	34	. config.h.SH
	35	fi
	36	fi