source: git/kernel/mkinstalldirs @ d0f98e

spielwiese
Last change on this file since d0f98e was 35aab3, checked in by Hans Schönemann <hannes@…>, 20 years ago
This commit was generated by cvs2svn to compensate for changes in r6879, which included commits to RCS files with non-trunk default branches. git-svn-id: file:///usr/local/Singular/svn/trunk@6880 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100755
File size: 649 bytes
Line 
1#!/bin/sh
2# mkinstalldirs --- make directory hierarchy
3# Author: Noah Friedman <friedman@prep.ai.mit.edu>
4# Created: 1993-05-16
5# Last modified: 1994-03-25
6# Public domain
7
8errstatus=0
9
10for file in ${1+"$@"} ; do 
11   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
12   shift
13
14   pathcomp=
15   for d in ${1+"$@"} ; do
16     pathcomp="$pathcomp$d"
17     case "$pathcomp" in
18       -* ) pathcomp=./$pathcomp ;;
19     esac
20
21     if test ! -d "$pathcomp"; then
22        echo "mkdir $pathcomp" 1>&2
23        mkdir "$pathcomp" || errstatus=$?
24     fi
25
26     pathcomp="$pathcomp/"
27   done
28done
29
30exit $errstatus
31
32# mkinstalldirs ends here
Note: See TracBrowser for help on using the repository browser.