X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=makedir.SH;h=19a6ad61b6ffb5c0def395e5a019250d77604ef4;hb=c372d929e82a56503fe8b3b070d05d130fc3d0d9;hp=54a0c11b2a8d5e908b9e466da1cb15405c1acc9c;hpb=8d063cd8450e59ea1c611a2f4f5a21059a2804f1;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/makedir.SH b/makedir.SH
old mode 100644
new mode 100755
index 54a0c11..19a6ad6
--- a/makedir.SH
+++ b/makedir.SH
@@ -1,31 +1,22 @@
-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
-    . config.sh
+    fi 2>/dev/null
+    . ./config.sh
     ;;
 esac
 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 1.0 87/12/18 13:05:32 root Exp $
-# 
-# $Log:	makedir.SH,v $
-# Revision 1.0  87/12/18  13:05:32  root
-# Initial revision
-# 
-# Revision 4.3.1.1  85/05/10  11:35:14  lwall
-# Branch for patches.
-# 
-# Revision 4.3  85/05/01  11:42:31  lwall
-# Baseline for release with 4.3bsd.
+# makedir.SH
 # 
 
 export PATH || (echo "OOPS, this isn't sh.  Desperation time.  I will feed myself to sh."; sh \$0; kill \$\$)
@@ -74,4 +65,4 @@ for dir do
 done
 !GROK!THIS!
 $eunicefix makedir
-chmod 755 makedir
+chmod +x makedir