X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=distclean.sh;h=861996f3049865aea6d04869712a5849f6896992;hb=babd45f7788c2f50c9d6193c1c7108e0a6b3a547;hp=33034f9f3fba83159a1b5d072783fb4c5b3e1694;hpb=8dc064d2296902f01afd9107e89a81146e3771fe;p=sbcl.git

diff --git a/distclean.sh b/distclean.sh
index 33034f9..861996f 100644
--- a/distclean.sh
+++ b/distclean.sh
@@ -1,4 +1,5 @@
 #!/bin/sh
+set -e
 
 # a superset of clean.sh, cleaning up not only automatically 
 # generated files but other things (e.g. customization files)
@@ -12,5 +13,15 @@ rm -rf doc/cmucl
 # miscellaneous other customizations which shouldn't be propagated
 rm -rf customize-target-features.lisp
 
+# Since the CVS/ subdirectories on my (WHN) machine have CVS/Root
+# containing
+#    :ext:wnewman@cvs.sbcl.sourceforge.net:/cvsroot/sbcl
+# they're not useful for anyone else, so blow them away. (And even 
+# if we could set them up to refer to CVS in a way that someone else 
+# could use, perhaps referring to SourceForge anoncvs, what'd be the 
+# point? I'd expect a comfortable majority of those who want to do 
+# CVS operations would be inclined to start with "cvs co" anyway.)
+find . \( -type d -a -name CVS \) -print | xargs rm -r
+
 # Fall through to ordinary cleanup.
 sh clean.sh