Bug#721252: [PATCH 2/3] Silent false positive in po file of gtk-doc

[Bastien ROUCARIÈS <roucaries.bastien@gmail.com>]

Gtk-doc use some <_:link-1> for no invariant section. Silent this false positive.
---
 checks/cruft.pm                                    |   14 +++++++++++++
 .../debian/src/oldfalsepositive/gtk-doc.po         |   21 ++++++++++++++++++++
 2 files changed, 35 insertions(+)
 create mode 100644 t/tests/cruft-gfdl-invariants/debian/src/oldfalsepositive/gtk-doc.po

diff --git a/checks/cruft.pm b/checks/cruft.pm
index aeee3ea..d9fd2f6 100644
--- a/checks/cruft.pm
+++ b/checks/cruft.pm
@@ -618,6 +618,20 @@ sub find_cruft {
                             tag 'license-problem-gfdl-invariants',$name;
                             $licenseproblemhash{'gfdl-invariants'} = 1;
                         }
+                    } elsif (
+                        $gfdlsections =~ m{
+                            \A with \s+ the \s* <_: \s* link-\d+ \s* /> \s*
+                            being \s+ list \s+ their \s+ titles \s*,? \s*
+                            with \s+ the \s* <_: \s* link-\d+ \s* /> \s*
+                            being \s+ list \s*,\s*
+                            (?:and\s+)? with \s+ the \s* <_:\s* link-\d+ \s* /> \s*
+                            being \s+ list}xiso
+                    ) {
+                        # fix a false positive in .po file
+                        unless ($name =~ m/\.po$/) {
+                            tag 'license-problem-gfdl-invariants',$name;
+                            $licenseproblemhash{'gfdl-invariants'} = 1;
+                        }
                     } else {
                         tag 'license-problem-gfdl-invariants', $name, "\"$gfdlsections\"";
                         $licenseproblemhash{'gfdl-invariants'} = 1;
diff --git a/t/tests/cruft-gfdl-invariants/debian/src/oldfalsepositive/gtk-doc.po b/t/tests/cruft-gfdl-invariants/debian/src/oldfalsepositive/gtk-doc.po
new file mode 100644
index 0000000..2f6f58d
--- /dev/null
+++ b/t/tests/cruft-gfdl-invariants/debian/src/oldfalsepositive/gtk-doc.po
@@ -0,0 +1,21 @@
+#: C/fdl-appendix.xml:79(sect1/para)
+msgid ""
+"A <_:quote-1/> is a named appendix or a front-matter section of the <_:"
+"link-2/> that deals exclusively with the relationship of the publishers or "
+"authors of the Document to the Document's overall subject (or to related "
+"matters) and contains nothing that could fall directly within that overall "
+"subject. (For example, if the Document is in part a textbook of mathematics, "
+"a Secondary Section may not explain any mathematics.) The relationship could "
+"be a matter of historical connection with the subject or with related "
+"matters, or of legal, commercial, philosophical, ethical or political "
+"position regarding them."
+msgstr ""
+"Une <_:quote-1/> désigne une annexe au <_:link-2/>, ou toute information "
+"indiquant les rapports entre l'auteur ou l'éditeur et le sujet (ou tout "
+"autre sujet connexe) du Document, sans toutefois être en rapport direct avec "
+"le sujet lui-même (par exemple, si le Document est un manuel de "
+"mathématiques, une Section secondaire ne traitera d'aucune notion "
+"mathématique). Cette section peut contenir des informations relatives à "
+"l'historique du Document, des sources documentaires, des dispositions "
+"légales, commerciales, philosophiques, ou des positions éthiques ou "
+"politiques susceptibles de concerner le sujet traité."
-- 
1.7.10.4