Mercurial > noffle
annotate mkinstalldirs @ 466:e769484a87c3 noffle
[svn] fixed removal of old config dir
| author | godisch | 
|---|---|
| date | Sat, 26 Jul 2003 08:37:07 +0100 | 
| parents | 2842f50feb55 | 
| children | 
| rev | line source | 
|---|---|
| 
43
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
1 #! /bin/sh | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
2 # mkinstalldirs --- make directory hierarchy | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
3 # Author: Noah Friedman <friedman@prep.ai.mit.edu> | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
4 # Created: 1993-05-16 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
5 # Public domain | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
6 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
7 # $Id: mkinstalldirs 49 2000-05-05 21:45:56Z uh1763 $ | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
8 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
9 errstatus=0 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
10 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
11 for file | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
12 do | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
13 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
14 shift | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
15 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
16 pathcomp= | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
17 for d | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
18 do | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
19 pathcomp="$pathcomp$d" | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
20 case "$pathcomp" in | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
21 -* ) pathcomp=./$pathcomp ;; | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
22 esac | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
23 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
24 if test ! -d "$pathcomp"; then | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
25 echo "mkdir $pathcomp" | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
26 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
27 mkdir "$pathcomp" || lasterr=$? | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
28 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
29 if test ! -d "$pathcomp"; then | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
30 errstatus=$lasterr | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
31 fi | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
32 fi | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
33 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
34 pathcomp="$pathcomp/" | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
35 done | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
36 done | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
37 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
38 exit $errstatus | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
39 | 
| 
 
2842f50feb55
[svn]  * client.c, client.h, common.h, config.c, config.h, content.c, content.h,
 
uh1763 
parents:  
diff
changeset
 | 
40 # mkinstalldirs ends here | 
