X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=utils%2Fmkdirhier%2Fmkdirhier.sh;h=4c5d5f73f7ec4a28cb8265aee8d93a3717a303c7;hb=c800c1633c97a7ead022a142d015bf8db14f04f6;hp=3ae24b3c6eb111be73ec55d433f9f38ab5fef2c1;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/utils/mkdirhier/mkdirhier.sh b/utils/mkdirhier/mkdirhier.sh
index 3ae24b3..4c5d5f7 100644
--- a/utils/mkdirhier/mkdirhier.sh
+++ b/utils/mkdirhier/mkdirhier.sh
@@ -1,34 +1,4 @@
 #!/bin/sh
 
-#
-# create a hierarchy of directories
-#
-# Based on Noah Friedman's mkinstalldirs..
-#
-errs=0
+mkdir -p ${1+"$@"}
 
-for f in $*; do
-    parts=`echo ":$f" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
-    path="";
-    for p in $parts; do
-        path="$path$p"
-        case "$path" in
-          -* ) path=./$path ;;
-        esac
-
-        if test ! -d "$path"; then
-           echo "mkdir $path" 1>&2
-
-           mkdir "$path" || lasterr=$?
-	   
-	   if test ! -d "$path"; then
-	      errs=$lasterr
-           fi 
-        fi
-	path="$path/";
-    done;
-done
-
-exit $errs
-
-# end of story