This is an automated email from the git hooks/post-receive script. fsfs pushed a commit to branch master in repository libical-parser-html-perl.
commit 0ffd81421479c1f0ac0c1ba89e80eca54dc76598 Author: Florian Schlichting <f...@debian.org> Date: Wed Apr 23 16:32:26 2014 +0200 Use Test::LongString for more useful failure output --- debian/control | 1 + debian/patches/series | 1 + debian/patches/test-longstring.patch | 40 ++++++++++++++++++++++++++++++++++++ 3 files changed, 42 insertions(+) diff --git a/debian/control b/debian/control index c9f0373..1f40023 100644 --- a/debian/control +++ b/debian/control @@ -7,6 +7,7 @@ Build-Depends: devscripts, cdbs (>= 0.4.78~), debhelper, dh-buildinfo, + libtest-longstring-perl, libxml-libxml-perl, libxml-libxslt-perl, libical-parser-sax-perl diff --git a/debian/patches/series b/debian/patches/series index a8647c9..ad40a12 100644 --- a/debian/patches/series +++ b/debian/patches/series @@ -1,3 +1,4 @@ normlize-test-output.patch this-month.patch perl5.18.patch +test-longstring.patch diff --git a/debian/patches/test-longstring.patch b/debian/patches/test-longstring.patch new file mode 100644 index 0000000..9ccfb04 --- /dev/null +++ b/debian/patches/test-longstring.patch @@ -0,0 +1,40 @@ +Description: use Test::LongString for more readable failure output +Author: Florian Schlichting <f...@debian.org> +Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=94968 + +--- a/t/01parse.t ++++ b/t/01parse.t +@@ -1,5 +1,6 @@ + # -*- cperl -*- + use Test::More; ++use Test::LongString; + use iCal::Parser::HTML; + + my $parser=iCal::Parser::HTML->new; +@@ -23,7 +24,7 @@ + $got =~ s/^ *//gm; # $got is indented + $expect =~ s/^ *//gm; # $expect is not intendet but once + $expect =~ s/; charset=utf-8/; charset=UTF-8/; +- is($got,$expect,"$f -> $type"); ++ is_string($got,$expect,"$f -> $type"); + } + } + #multiple calendar input +@@ -38,7 +39,7 @@ + $got =~ s/^ *//gm; # $got is indented + $expect =~ s/^ *//gm; # $expect is not intendet but once + $expect =~ s/; charset=utf-8/; charset=UTF-8/; +- is($got,$expect,"multical -> $type"); ++ is_string($got,$expect,"multical -> $type"); + } + #no link output + foreach my $type ( qw(day week month) ) { +@@ -52,7 +53,7 @@ + $got =~ s/^ *//gm; # $got is indented + $expect =~ s/^ *//gm; # $expect is not intendet but once + $expect =~ s/; charset=utf-8/; charset=UTF-8/; +- is($got,$expect,"multical -> $type (no links)"); ++ is_string($got,$expect,"multical -> $type (no links)"); + } + sub dump_html { + my($expect,$got)=@_; -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libical-parser-html-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