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 5c68b5a0efbadadfa0d7581fb18e859c58b80aba
Author: Dominique Dumont <d...@debian.org>
Date: Thu Mar 26 18:34:26 2015 +0100
fix pack_copyright test
---
t/scanner/pack_copyright.t | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/t/scanner/pack_copyright.t b/t/scanner/pack_copyright.t
index 06c0542..7b19410 100644
--- a/t/scanner/pack_copyright.t
+++ b/t/scanner/pack_copyright.t
@@ -15,18 +15,19 @@ my @tests = (
'2002-2006, Charles Kerr <char...@rebelbase.com>'
],
[
- '2011 Heinrich Müller <henm...@src.gnome.org> / 2002-2006 Charles Kerr
<char...@rebelbase.com>',
- "2011, Heinrich Müller <henmull\@src.gnome.org>\n 2002-2006, Charles
Kerr <charles\@rebelbase.com>"
+ '2011 Heinrich Muller <henm...@src.gnome.org> / 2002-2006 Charles Kerr
<char...@rebelbase.com>',
+ "2011, Heinrich Muller <henmull\@src.gnome.org>\n 2002-2006, Charles
Kerr <charles\@rebelbase.com>"
],
[
- '2002-2006 Charles Kerr <char...@rebelbase.com> / 2002, 2003, 2004,
2005, 2007, 2008, 2010 Free Software / 2011 Heinrich Müller
<henm...@src.gnome.org> / 2002 vjt (irssi project)',
- "2011, Heinrich Müller <henmull\@src.gnome.org>\n 2002-2006, Charles
Kerr <charles\@rebelbase.com>\n 2002-2005, 2007, 2008, 2010, Free Software\n
2002, vjt (irssi project)"
+ '2002-2006 Charles Kerr <char...@rebelbase.com> / 2002, 2003, 2004,
2005, 2007, 2008, 2010 Free Software / 2011 Heinrich Muller
<henm...@src.gnome.org> / 2002 vjt (irssi project)',
+ "2011, Heinrich Muller <henmull\@src.gnome.org>\n 2002-2006, Charles
Kerr <charles\@rebelbase.com>\n 2002-2005, 2007, 2008, 2010, Free Software\n
2002, vjt (irssi project)"
]
);
foreach my $t (@tests) {
my ($in,$expect) = @$t;
-
is(Dpkg::Copyright::Scanner::__pack_copyright($in),$expect,"__pack_copyright
'$in'");
+ my $label = length $in > 50 ? substr($in,0,50).'...' : $in ;
+
is(Dpkg::Copyright::Scanner::__pack_copyright($in),$expect,"__pack_copyright
'$label'");
}
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
