source: trunk/third/libgsf/mkinstalldirs @ 20487

Revision 20487, 729 bytes checked in by ghudson, 20 years ago (diff)
This commit was generated by cvs2svn to compensate for changes in r20486, which included commits to RCS files with non-trunk default branches.
  • Property svn:executable set to *
Line 
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,v 1.1.1.1 2004-05-19 02:40:51 ghudson Exp $
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"
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.