svn commit: r105821 - perl/modperl/trunk/lib/ModPerl

[geoff]

Author: geoff
Date: Fri Nov 19 06:59:59 2004
New Revision: 105821

Modified:
   perl/modperl/trunk/lib/ModPerl/BuildMM.pm
Log:
skip over .svn files


Modified: perl/modperl/trunk/lib/ModPerl/BuildMM.pm
==============================================================================
--- perl/modperl/trunk/lib/ModPerl/BuildMM.pm   (original)
+++ perl/modperl/trunk/lib/ModPerl/BuildMM.pm   Fri Nov 19 06:59:59 2004
@@ -351,6 +351,7 @@
     return '' if $path =~ m/\.(pl|cvsignore)$/;
     return '' if (basename dirname $path) eq 'CVS';
     return '' if $path =~ m/~$/;
+    return '' if $path =~ /\B\.svn\b/;
 
     $path;
 }