# HG changeset patch # User Glenn Morris # Date 1189052524 0 # Node ID 2e38ef4443ea2f296a1ff721e6ae53b0ba7fda36 # Parent aa6ce8057bdbd3301161051afa75295f5058fe9d Move here from ../../lispref diff -r aa6ce8057bdb -r 2e38ef4443ea doc/lispref/mkinstalldirs --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/doc/lispref/mkinstalldirs Thu Sep 06 04:22:04 2007 +0000 @@ -0,0 +1,38 @@ +#! /bin/sh +# mkinstalldirs --- make directory hierarchy +# Author: Noah Friedman +# Created: 1993-05-16 +# Public domain + +errstatus=0 + +for file +do + set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` + shift + + pathcomp= + for d + do + pathcomp="$pathcomp$d" + case "$pathcomp" in + -* ) pathcomp=./$pathcomp ;; + esac + + if test ! -d "$pathcomp"; then + echo "mkdir $pathcomp" 1>&2 + + mkdir "$pathcomp" || lasterr=$? + + if test ! -d "$pathcomp"; then + errstatus=$lasterr + fi + fi + + pathcomp="$pathcomp/" + done +done + +exit $errstatus + +# mkinstalldirs ends here