X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Ftext%2Fdiffer.pl;h=77de67da68b46c562927f7f47e91723d4b1253be;hb=7e1f82556c6f92a26d4ee7982805df75d6ce0553;hp=d22b3180f3f2d9cd1db3bccb266a267694b56d10;hpb=2952ccf47b80174880141a7ecfa122089f349b8d;p=feisty_meow.git diff --git a/scripts/text/differ.pl b/scripts/text/differ.pl index d22b3180..77de67da 100644 --- a/scripts/text/differ.pl +++ b/scripts/text/differ.pl @@ -74,6 +74,7 @@ sub recurse_dirs local($src, $dest) = @_; if ($src =~ /\/CVS$/) { return; } # skip comparing repositories. +#hmmm: why is only CVS spelled out here? what about the others? if (! -d $src) { print "$src is not a directory.\n"; @@ -116,7 +117,9 @@ sub recurse_dirs # print "name is $name and to compare is $compare_name.\n"; local($new_name) = $src . "/" . $name; if ( (-d $new_name) && ($name ne ".") && ($name ne "..") - && ($name ne ".svn") ) { + && ($name ne ".svn") + && ($name ne ".git") + && ($name ne "CVS") ) { # print "recursing on: source $name and destination $compare_name.\n"; &recurse_dirs($new_name, $compare_name); }