Blame pc/mkinstal.sh

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