This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to branch master
in repository libparse-debianchangelog-perl.

commit 348fd9e0069234fe0f7224d5b35360dcdcca6997
Author: Frank Lichtenheld <fr...@lichtenheld.de>
Date:   Mon Apr 4 17:33:01 2011 +0200

    Improve Parse-DebianChangelog.t
    
    - Output version number used
    - Give better test output if "no errors" check fails
---
 t/Parse-DebianChangelog.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/t/Parse-DebianChangelog.t b/t/Parse-DebianChangelog.t
index bc52339..f3b8270 100644
--- a/t/Parse-DebianChangelog.t
+++ b/t/Parse-DebianChangelog.t
@@ -27,6 +27,8 @@ BEGIN {
     use_ok('Parse::DebianChangelog::ChangesFilters', ':all' );
 };
 
+diag("Testing Parse::DebianChangelog $Parse::DebianChangelog::VERSION");
+
 #########################
 
 my $test = Parse::DebianChangelog->init( { infile => '/nonexistant',
@@ -44,7 +46,7 @@ foreach my $file (qw(Changes t/examples/countme 
t/examples/shadow)) {
 #    use Data::Dumper;
 #    diag(Dumper($changes));
 
-    ok( !$errors, "Parse example changelog $file without errors" );
+    is( $errors, "", "Parse example changelog $file without errors" );
 
     my @data = $changes->data;
 

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/pkg-perl/packages/libparse-debianchangelog-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

Reply via email to