Blame pc/mkinstal.sh

Packit 575503
#! /bin/sh
Packit 575503
# mkinstalldirs --- make directory hierarchy
Packit 575503
# Author: Noah Friedman <friedman@prep.ai.mit.edu>
Packit 575503
# Created: 1993-05-16
Packit 575503
# Last modified: 1994-03-25
Packit 575503
# Public domain
Packit 575503
Packit 575503
errstatus=0
Packit 575503
Packit 575503
for file in ${1+"$@"} ; do 
Packit 575503
   #set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
Packit 575503
   set fnord `echo "$file" | sed 's/\([^:]\)\//\1 /g'`
Packit 575503
   shift
Packit 575503
Packit 575503
   pathcomp=
Packit 575503
   for d in ${1+"$@"} ; do
Packit 575503
     pathcomp="$pathcomp$d"
Packit 575503
     case "$pathcomp" in
Packit 575503
       -* ) pathcomp=./$pathcomp ;;
Packit 575503
     esac
Packit 575503
Packit 575503
     if test ! -d "$pathcomp"; then
Packit 575503
        echo "mkdir $pathcomp" 1>&2
Packit 575503
        mkdir "$pathcomp" || errstatus=$?
Packit 575503
     fi
Packit 575503
Packit 575503
     pathcomp="$pathcomp/"
Packit 575503
   done
Packit 575503
done
Packit 575503
Packit 575503
exit $errstatus
Packit 575503
Packit 575503
# mkinstalldirs ends here