X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=utils%2Fmkdirhier%2Fmkdirhier.sh;fp=utils%2Fmkdirhier%2Fmkdirhier.sh;h=4c5d5f73f7ec4a28cb8265aee8d93a3717a303c7;hb=fef6fe2613ea03e5405f4b5aa38d4647df44b075;hp=c6261f42e8e50a8cc90b8c45f459844076628215;hpb=b88939db1ac65aa00df79e6b945f67d63aeced30;p=ghc-hetmet.git

diff --git a/utils/mkdirhier/mkdirhier.sh b/utils/mkdirhier/mkdirhier.sh
index c6261f4..4c5d5f7 100644
--- a/utils/mkdirhier/mkdirhier.sh
+++ b/utils/mkdirhier/mkdirhier.sh
@@ -1,45 +1,4 @@
 #!/bin/sh
 
-#
-# create a hierarchy of directories
-#
-# Based on Noah Friedman's mkinstalldirs..
-#
+mkdir -p ${1+"$@"}
 
-quiet=no
-errs=0
-
-if [ "$1" = "-q" ]
-then
-    shift
-    quiet=yes
-fi
-
-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
-           if [ "$quiet" = "no" ]
-           then
-               echo "mkdir $path" 1>&2
-           fi
-
-           mkdir "$path" || lasterr=$?
-	   
-	   if test ! -d "$path"; then
-	      errs=$lasterr
-           fi 
-        fi
-	path="$path/";
-    done;
-done
-
-exit $errs
-
-# end of story