Re: [PATCH] Exclude .svn and _darcs from IPC::SysV's Makefile.PL libscan

Message-ID: <20080109195811.2c5353e5@r2d2>

Make libscan() in IPC::SysV's Makefile.PL inherit EU::MM's
libscan() behaviour.

p4raw-id: //depot/perl@32926

diff --git a/ext/IPC/SysV/Makefile.PL b/ext/IPC/SysV/Makefile.PL
index ca921d7..e3dfd07 100644 (file)
--- a/ext/IPC/SysV/Makefile.PL
+++ b/ext/IPC/SysV/Makefile.PL
@@ -76,9 +76,14 @@ sub configure
 
 sub MY::libscan
 {
- my($self, $path) = @_;
- return '' if $path =~ m! /(RCS|CVS|SCCS)/ | [~%]$ | \.(swp|orig|rej)$ !x;
- $path;
+  package MY;
+  my($self, $path) = @_;
+  return $path if $self->SUPER::libscan($path) and
+                  $path !~ m! [~%]$
+                            | \.(cache\.cm|swp|orig|rej)$
+                            | regen\.pl$
+                            !x;
+  return '';
 }
 
 sub MY::postamble