X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=makedir.SH;h=19a6ad61b6ffb5c0def395e5a019250d77604ef4;hb=4964fccb418626bbfc96e446747345a4f3e41961;hp=215661a6eea33a26d03155d304b210ec76e235e5;hpb=378cc40b38293ffc7298c6a7ed3cd740ad79be52;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/makedir.SH b/makedir.SH
old mode 100644
new mode 100755
index 215661a..19a6ad6
--- a/makedir.SH
+++ b/makedir.SH
@@ -1,11 +1,11 @@
-case $CONFIG in
+case $PERL_CONFIG_SH in
 '')
     if test ! -f config.sh; then
 	ln ../config.sh . || \
 	ln ../../config.sh . || \
 	ln ../../../config.sh . || \
 	(echo "Can't find config.sh."; exit 1)
-    fi
+    fi 2>/dev/null
     . ./config.sh
     ;;
 esac
@@ -13,14 +13,10 @@ case "$0" in
 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
 esac
 echo "Extracting makedir (with variable substitutions)"
+rm -f makedir
 $spitshell >makedir <<!GROK!THIS!
 $startsh
-# $Header: makedir.SH,v 2.0 88/06/05 00:09:13 root Exp $
-# 
-# $Log:	makedir.SH,v $
-# Revision 2.0  88/06/05  00:09:13  root
-# Baseline version 2.0.
-# 
+# makedir.SH
 # 
 
 export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)