view lispintro/mkinstalldirs @ 81512:1214f1b9e278

(vc-bzr-dir-state): Use setq rather than set. Use vc-bzr-command rather than the ill defined vc-bzr-command*. (vc-bzr-command*): Remove both (incompatible) versions. (vc-bzr-do-command*): Remove. (vc-bzr-with-process-environment, vc-bzr-std-process-invocation): Remove by folding into its only caller vc-bzr-command. (vc-bzr-command): Always set the environment, even when ineffective. (vc-bzr-version): Minor fix up. (vc-bzr-admin-dirname): New var. (vc-bzr-bzr-dir): Remove. (vc-bzr-root-dir): New fun. (vc-bzr-registered): Use it. Add an autoloaded version. (vc-bzr-responsible-p): Use vc-bzr-root-dir as well. (vc-bzr-view-log-function): Remove. (vc-bzr-log-view-mode): New major mode to replace it. (vc-bzr-print-log): Only activate the old hack if needed.

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

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