[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

[SCM] Debian package checker branch, master, updated. 2.5.12-116-gc14599a



The following commit has been merged in the master branch:
commit c14599ad53318246027666faee73c957b5f1ff26
Author: Niels Thykier <niels@thykier.net>
Date:   Wed May 22 23:54:31 2013 +0200

    c/cruft: Strip common pod2man formatting
    
    Use some regular expressions provided by Russ Allbery to strip common
    pod2man formatting sequences.
    
    Signed-off-by: Niels Thykier <niels@thykier.net>

diff --git a/checks/cruft b/checks/cruft
index fce4309..8cef84b 100644
--- a/checks/cruft
+++ b/checks/cruft
@@ -464,6 +464,11 @@ sub find_cruft {
             push @queue, $window;
             $block =  join '', @queue;
 
+            # Remove formatting commonly added by pod2man
+            $block =~ s{ \\ & }{}gxsm;
+            $block =~ s{ \\s (?:0|-1) }{}gxsm;
+            $block =~ s{ \\ \* \( [LR] \" }{\"}gxsm;
+
             given ($block) {
                 # json evil license
                 when (m/Software\s+shall\s+be\s+used\s+for\s+Good\s*,?\s*not\s+Evil/is) {
@@ -480,7 +485,7 @@ sub find_cruft {
                 # if the "redeeming" part is in the next block.
                 #
                 # See cruft-gfdl-fp-sliding-win for the test case
-                when(m/GNU (?:\s+|\s*<\/span>\s*|\s*\\s\d\s*|\s*\}\s+)? Free \s+ Documentation \s+ License (?'gfdlsections'.{0,1024})
+                when(m/GNU (?:\s+|\s*<\/span>\s*|\s*\}\s+)? Free \s+ Documentation \s+ License (?'gfdlsections'.{0,1024})
                          A \s+ copy \s+ of \s+ the \s+ license \s+ is \s+ included/xis) {
                     if (!exists $licenseproblemhash{'gfdl-invariants'}) {
                         # local space

-- 
Debian package checker


Reply to: