Subversion Repositories Scribus

Rev

Rev 454 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
3 paul 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
 
7
# $Id: mkinstalldirs 3 2003-05-13 20:59:20Z paul $
8
 
9
errstatus=0
10
 
11
for file
12
do
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"
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
36
done
37
 
38
exit $errstatus
39
 
40
# mkinstalldirs ends here