[libconfig-model-dpkg-perl] 07/07: Added test to check white space issue (depends on libconfig-model-tester >= 2.044)

dod at debian.org dod at debian.org
Sat Sep 7 14:56:28 UTC 2013


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 30ece96ced16469c4b3d15894b2c2bd8816c7d96
Author: Dominique Dumont <dod at debian.org>
Date:   Sat Sep 7 16:56:14 2013 +0200

    Added test to check white space issue (depends on libconfig-model-tester >= 2.044)
---
 .../dpkg-copyright-examples/white-space            |   22 ++++++++++++++++++++
 t/model_tests.d/dpkg-copyright-test-conf.pl        |   19 ++++++++++++++++-
 2 files changed, 40 insertions(+), 1 deletion(-)

diff --git a/t/model_tests.d/dpkg-copyright-examples/white-space b/t/model_tests.d/dpkg-copyright-examples/white-space
new file mode 100644
index 0000000..641b000
--- /dev/null
+++ b/t/model_tests.d/dpkg-copyright-examples/white-space
@@ -0,0 +1,22 @@
+Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Source: http://some.where.com
+Copyright:    
+License: 
+
+Files: *
+Copyright: 
+ 1993, John Doe
+ 1993, Joe Average
+License: MPL-1.1 
+
+Files: src/js/fdlibm/*
+Copyright: 
+ 1993, J-Random Corporation
+License: MPL-1.1
+
+
+License: MPL-1.1
+ [MPL-1.1 LICENSE TEXT]
+ 
+ 
+ 
\ No newline at end of file
diff --git a/t/model_tests.d/dpkg-copyright-test-conf.pl b/t/model_tests.d/dpkg-copyright-test-conf.pl
index 2f4d1df..f762aad 100644
--- a/t/model_tests.d/dpkg-copyright-test-conf.pl
+++ b/t/model_tests.d/dpkg-copyright-test-conf.pl
@@ -102,7 +102,7 @@ $skip = ( $@ or not -r '/etc/debian_version') ? 1 : 0 ;
             Format => "http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/", 
             'Files:"*" Copyright' => 'Copyright 1998 John Doe <jdoe at example.com>',
             'Files:"debian/*" License short_name' => 'other',
-            },
+        },
     },
     {
         # test nb 8
@@ -208,6 +208,23 @@ in ‘/usr/share/common-licenses/GPL-1’.",
         'File:"sources/extra/orpheus/modules/lua-signal/lsignal.c" License short_name'
             => 'MIT/X11'
     },
+    {
+        # Debian bug #721832
+        name => 'white-space' ,
+        load_warnings => [ (qr/deprecated/) x 1 ],
+
+        check => {
+            'License:MPL-1.1 text' => "[MPL-1.1 LICENSE TEXT]",
+            'Files:"*" License short_name' => "MPL-1.1",
+            'Files:"src/js/fdlibm/*" License short_name'   => "MPL-1.1",
+        },
+        file_contents_like => {
+            'debian/copyright' => qr/Copyright:\n/ ,
+        },
+        file_contents_unlike => {
+            'debian/copyright' =>  [ qr/Copyright:\s+\n/ , qr/\n\n$/, qr/Copyright:\s*\nLicense/ ],
+        }
+    },
 );
 
 1;

-- 
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