Bug#734858: libperl-critic-perl: label prevents disabling Variables::ProhibitReusedNames

[Jakub Wilk]

Package: libperl-critic-perl
Version: 1.121-1

Please see the attached test file.

$ perlcritic --verbose '%p at %l\n' -2 reused-names.pl
Variables::ProhibitReusedNames at 12
Miscellanea::ProhibitUselessNoCritic at 12

So it reports both ProhibitReusedNames at line 12, and that there's no 
ProhibitReusedNames to disable on line 12... If I remove the label, the 
problem goes away:

$ sed -e '/^LABEL/d' reused-names.pl > reused-names-nolabel.pl
$ perlcritic -2 reused-names-nolabel.pl
reused-names-nolabel.pl source OK


-- System Information:
Debian Release: jessie/sid
   APT prefers unstable
   APT policy: (990, 'unstable'), (500, 'experimental')
Architecture: i386 (x86_64)
Foreign Architectures: amd64

Kernel: Linux 3.12-1-amd64 (SMP w/2 CPU cores)
Locale: LANG=C, LC_CTYPE=pl_PL.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash

Versions of packages libperl-critic-perl depends on:
ii  libb-keywords-perl        1.13-1
ii  libconfig-tiny-perl       2.14-1
ii  libemail-address-perl     1.900-1
ii  libexception-class-perl   1.37-1
ii  libfile-homedir-perl      1.00-1
ii  libfile-which-perl        1.09-1
ii  libio-string-perl         1.08-3
ii  liblist-moreutils-perl    0.33-1+b2
ii  libmodule-pluggable-perl  4.8-1
ii  libpod-spell-perl         1.12-1
ii  libppi-perl               1.215-1
ii  libppix-regexp-perl       0.036-1
ii  libppix-utilities-perl    1.001000-1
ii  libreadonly-perl          1.04-1
ii  libreadonly-xs-perl       1.05-1
ii  libstring-format-perl     1.17-1
ii  libtask-weaken-perl       1.04-1
ii  perl                      5.18.1-5
ii  perltidy                  20120701-1

-- 
Jakub Wilk
-------------- next part --------------
A non-text attachment was scrubbed...
Name: reused-names.pl
Type: text/x-perl
Size: 148 bytes
Desc: not available
URL: <http://lists.alioth.debian.org/pipermail/pkg-perl-maintainers/attachments/20140110/6ce9c277/attachment.pl>