Platon Technologies
not logged in Login Registration
EnglishSlovak
open source software development celebrating 10 years of open source development! Friday, April 19, 2024

File: [Platon] / libplaton / mkinstalldirs (download)

Revision 1.1, Thu Oct 18 16:13:23 2001 UTC (22 years, 6 months ago) by host8

Little improvements in .cvsignore. Added file mkinstalldirs -- will be
used in the future.

#! /bin/sh
# mkinstalldirs --- make directory hierarchy
# Author: Noah Friedman <friedman@prep.ai.mit.edu>
# Created: 1993-05-16
# Public domain

# $Log: mkinstalldirs,v $
# Revision 1.1  2001/10/18 16:13:23  host8
# Little improvements in .cvsignore. Added file mkinstalldirs -- will be
# used in the future.
#
# Revision 1.2  2001/09/20 14:41:31  host8
# Added $Log: mkinstalldirs,v $
# Added Revision 1.1  2001/10/18 16:13:23  host8
# Added Little improvements in .cvsignore. Added file mkinstalldirs -- will be
# Added used in the future.
# Added feature
#

errstatus=0

for file
do
   set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
   shift

   pathcomp=
   for d
   do
     pathcomp="$pathcomp$d"
     case "$pathcomp" in
       -* ) pathcomp=./$pathcomp ;;
     esac

     if test ! -d "$pathcomp"; then
        echo "mkdir $pathcomp" 1>&2

        mkdir "$pathcomp" || lasterr=$?

        if test ! -d "$pathcomp"; then
        errstatus=$lasterr
        fi
     fi

     pathcomp="$pathcomp/"
   done
done

exit $errstatus

# mkinstalldirs ends here

Platon Group <platon@platon.org> http://platon.org/
Copyright © 2002-2006 Platon Group
Site powered by Metafox CMS
Go to Top