From 859401f1cded8680b2289d999e3f047a2de34314 Mon Sep 17 00:00:00 2001
From: adam <adam>
Date: Thu, 24 Nov 2005 00:20:45 +0000
Subject: [PATCH] hack stow to ignore CVS/ dirs

---
 stow.in | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/stow.in b/stow.in
index 2110951..35a3297 100755
--- a/stow.in
+++ b/stow.in
@@ -23,6 +23,11 @@
 # $Date$
 # $Author$
 
+# !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+# Wed Nov 23 2005 Adam Spiers
+# This version is hacked to ignore CVS/ directories.
+# !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
 require 5.005;
 use POSIX;
 
@@ -333,7 +338,9 @@ sub StowContents {
   @contents = readdir(DIR);
   closedir(DIR);
   foreach $content (@contents) {
-    next if (($content eq '.') || ($content eq '..'));
+    # Wed Nov 23 2005 Adam Spiers
+    # hack to 
+    next if $content eq '.' or $content eq '..' or $content eq 'CVS';
     if (-d &JoinPaths($Stow, $dir, $content)) {
       &StowDir(&JoinPaths($dir, $content), $stow);
     } else {