view lispref/mkinstalldirs @ 88144:9c50ab53e31f

(rmail): Error if file is Babyl format. (rmail-process-new-messages, rmail-reply-callback, rmail-mark-message) (rmail-narrow-to-message): Doc fix. (rmail-reply, rmail-forward, rmail-resend, rmail-retry-failure) (rmail-browse-body): Immediate error if file is empty. (rmail-convert-file, rmail-insert-rmail-file-header) (rmail-convert-to-babyl-format): Functions deleted. (rmail-mode): Don't call rmail-convert-file.

#! /bin/sh
# mkinstalldirs --- make directory hierarchy
# Author: Noah Friedman <[e-mail]>
# Created: 1993-05-16
# Public domain

# $Id: mkinstalldirs,v 1.10 1996/05/03 07:37:52 friedman Exp $

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