source: trunk/third/moira/mkinstalldirs @ 24319

Revision 24319, 727 bytes checked in by broder, 15 years ago (diff)
New Moira snapshot from SVN.
  • Property svn:executable set to *
RevLine 
[23095]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
[24319]7# $Id: mkinstalldirs 3956 2010-01-05 20:56:56Z zacheiss $
[23095]8
9errstatus=0
10
11for file
12do
13   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
14   shift
15
16   pathcomp=
17   for d
18   do
19     pathcomp="$pathcomp$d"
20     case "$pathcomp" in
21       -* ) pathcomp=./$pathcomp ;;
22     esac
23
24     if test ! -d "$pathcomp"; then
25        echo "mkdir $pathcomp" 1>&2
26
27        mkdir "$pathcomp" || lasterr=$?
28
29        if test ! -d "$pathcomp"; then
30          errstatus=$lasterr
31        fi
32     fi
33
34     pathcomp="$pathcomp/"
35   done
36done
37
38exit $errstatus
39
40# mkinstalldirs ends here
Note: See TracBrowser for help on using the repository browser.