[libconfig-model-dpkg-perl] 09/23: scanner: ignore some debian files

dod at debian.org dod at debian.org
Mon Feb 13 12:29:38 UTC 2017


This is an automated email from the git hooks/post-receive script.

dod pushed a commit to branch master
in repository libconfig-model-dpkg-perl.

commit d082d63016deb7b3684de1e14a8603c11b715acf
Author: Dominique Dumont <dod at debian.org>
Date:   Tue Jan 24 13:49:09 2017 +0100

    scanner: ignore some debian files
---
 lib/Dpkg/Copyright/Scanner.pm | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/lib/Dpkg/Copyright/Scanner.pm b/lib/Dpkg/Copyright/Scanner.pm
index 173eef5..608cb8a 100644
--- a/lib/Dpkg/Copyright/Scanner.pm
+++ b/lib/Dpkg/Copyright/Scanner.pm
@@ -105,7 +105,9 @@ $default{ignore}= << 'EOR';
 (?:^|/)(?:DEADJOE|\.cvsignore|\.arch-inventory|\.bzrignore|\.gitignore)$|
 # File or directory names that should be ignored
 (?:^|/)(?:CVS|RCS|\.pc|\.deps|\{arch\}|\.arch-ids|\.svn|\.hg|_darcs|\.git|
-\.shelf|_MTN|\.bzr(?:\.backup|tags)?)(?:$|/.*$)
+\.shelf|_MTN|\.bzr(?:\.backup|tags)?)(?:$|/.*$)|
+# skip debian files that are too confusing or too short
+(?:^|/)debian/((fix.scanned.)?copyright|changelog|NEWS|compat|.*yml|docs|source|patches/series)
 EOR
 
 # also from licensecheck
@@ -213,12 +215,14 @@ sub scan_files ( %args ) {
     foreach my $line (sort @lines) {
         chomp $line;
         # say "found: $line";
-        my ($f,$l,$c) = split /\t/, $line; 
+        my ($f,$l,$c) = split /\t/, $line;
         $f =~ s!\./!!;
-        next if $f =~ m!debian/(copyright|changelog)$!; # too confusing
         next if $files->{$f}; # file already parsed
-        if ($regexps{check} and $f !~ $regexps{check}) {
-            push @skipped, $f if $regexps{ignore} and $f !~ $regexps{ignore};
+
+        # filter out files user does not want checked
+        if ( $f !~ $regexps{check} ) {
+            # the ignore test should not be usefull as the files are ignored by licensecheck
+            push @skipped, $f unless $f =~ $regexps{ignore};
             next;
         }
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git



More information about the Pkg-perl-cvs-commits mailing list