mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-06 11:55:48 +00:00
da1492a4cf
(automatically generated log message) git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--base-0
41 lines
755 B
Bash
Executable File
41 lines
755 B
Bash
Executable File
#! /bin/sh
|
|
# mkinstalldirs --- make directory hierarchy
|
|
# Author: Noah Friedman <friedman@prep.ai.mit.edu>
|
|
# Created: 1993-05-16
|
|
# Public domain
|
|
|
|
# $Id: mkinstalldirs,v 1.2 2001/02/02 13:09:26 gerd Exp $
|
|
|
|
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" && chmod a+rx "$pathcomp") || lasterr=$?
|
|
|
|
if test ! -d "$pathcomp"; then
|
|
errstatus=$lasterr
|
|
fi
|
|
fi
|
|
|
|
pathcomp="$pathcomp/"
|
|
done
|
|
done
|
|
|
|
exit $errstatus
|
|
|
|
# mkinstalldirs ends here
|