Subject: | False positive in TestingAndDebugging::RequireTestLabels |
Date: | Tue, 13 Feb 2007 14:56:25 +0100 |
To: | bug-Perl-Critic [...] rt.cpan.org |
From: | Bernhard Schmalhofer <Bernhard.Schmalhofer [...] biomax.com> |
Hi,
when running Perl::Critic 1.02 over my test scripts, I probably ran
accross a false positive in
TestingAndDebugging::RequireTestLabels.
I boiled it down to a short test:
Show quoted text
devel> perlcritic --severity=3 t.pl
.
.
Test without a label at line 13, column 1. Add a label argument to all
Test::More functions. (Severity: 3)
.
.
.
Best regards,
Berhard
--
**************************************************
Dipl.-Physiker Bernhard Schmalhofer
Senior Developer
Biomax Informatics AG
Lochhamer Str. 11
82152 Martinsried, Germany
Tel: +49 89 895574-839
Fax: +49 89 895574-825
eMail: Bernhard.Schmalhofer@biomax.com
Website: www.biomax.com
**************************************************
use strict;
use warnings;
use Test::More;
plan( tests => 1 );
sub get_key_val_pairs
{
return 'key1' => 'val2', 'key2' => 'val2';
}
is_deeply( { get_key_val_pairs() }, { 'key1' => 'val2', 'key2' => 'val2' }, 'Boldly criticize where nobody has criticize before.' );