/[public]/psiconv/trunk/mkinstalldirs
ViewVC logotype

Annotation of /psiconv/trunk/mkinstalldirs

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2 - (hide annotations)
Sun Oct 3 21:10:47 1999 UTC (25 years ago) by frodo
File MIME type: application/octet-stream
File size: 722 byte(s)
Imported sources

1 frodo 2 #! /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.13 1999/01/05 03:18:55 bje Exp $
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

Properties

Name Value
svn:executable *
svn:mime-type application/octet-stream

frodo@frodo.looijaard.name
ViewVC Help
Powered by ViewVC 1.1.26