Sync to HEAD
[bpt/emacs.git] / mkinstalldirs
CommitLineData
2b6bac15
DL
1#! /bin/sh
2# mkinstalldirs --- make directory hierarchy
3# Author: Noah Friedman <friedman@prep.ai.mit.edu>
4# Created: 1993-05-16
5# Public domain
6
2b6bac15
DL
7errstatus=0
8
9for file
10do
11 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
12 shift
13
14 pathcomp=
15 for d
16 do
17 pathcomp="$pathcomp$d"
18 case "$pathcomp" in
19 -* ) pathcomp=./$pathcomp ;;
20 esac
21
22 if test ! -d "$pathcomp"; then
23 echo "mkdir $pathcomp" 1>&2
24
1b66ab0e 25 (mkdir "$pathcomp" && chmod a+rx "$pathcomp") || lasterr=$?
2b6bac15
DL
26
27 if test ! -d "$pathcomp"; then
28 errstatus=$lasterr
29 fi
30 fi
31
32 pathcomp="$pathcomp/"
33 done
34done
35
36exit $errstatus
37
38# mkinstalldirs ends here