Return to mkinstalldirs CVS log

Up to [local] / OpenXM_contrib2 / asir2018

Annotation of OpenXM_contrib2/asir2018/mkinstalldirs, Revision 1.1

1.1     ! noro        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.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