[project @ 1996-09-24 16:36:40 by simonm]
[ghc-hetmet.git] / glafp-utils / scripts / mkdirhier.sh
diff --git a/glafp-utils/scripts/mkdirhier.sh b/glafp-utils/scripts/mkdirhier.sh
deleted file mode 100644 (file)
index 739535e..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-#!/bin/sh
-
-#
-# create a heirarchy of directories
-#
-
-for f in $*; do
-    parts=`echo $f | sed 's,\(.\)/\(.\),\1 \2,g' | sed 's,/$,,'`;
-    path="";
-    for p in $parts; do
-       if [ x"$path" = x ]; then
-           dir=$p;
-       else
-           dir=$path/$p;
-       fi;
-       if [ ! -d $dir ]; then
-           echo mkdir $dir; 
-           mkdir $dir;
-           chmod a+rx $dir; 
-       fi;
-       path=$dir;
-    done;
-done
-