view mkinstalldirs @ 340:0d9cfc3579a5

[gaim-migrate @ 350] More changes to the applet. Now, you can have it remember the position and not have it near the applet, or not remember the position and not near the applet, or near the applet. Also, if you want it near the applet, the login box will appear near the applet. committer: Tailor Script <[e-mail]>

+
鐃緒申#! /bin/sh
+
鐃緒申# mkinstalldirs --- make directory hierarchy
+
鐃緒申# Author: Noah Friedman <[e-mail]>
+
鐃緒申# Created: 1993-05-16
+
鐃緒申# Public domain
+
鐃緒申
+
鐃緒申# $Id: mkinstalldirs 14 2000-03-23 03:23:41Z robflynn $
+
鐃緒申
+
鐃緒申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