Bug #89619 for Encode-Locale:

Sat Oct 19 04:41:45 2013 dailylama [...] gmail.com - Ticket created

Subject:
Date:	Sat, 19 Oct 2013 11:41:18 +0300
To:	bug-Encode-Locale [...] rt.cpan.org
From:	Afanasiy Fet <dailylama [...] gmail.com>

R:\ae\perl>echo use LWP::Simple; > lwp.pl R:\ae\perl>perl -Wc lwp.pl Name "Encode::Locale::ENCODING_CP1251" used only once: possible typo at R:/strawberry/perl/vendor/lib/Encode/Locale.pm line 106. lwp.pl syntax OK R:\ae\perl>cpanm Encode::Locale Encode::Locale is up to date. (1.03) R:\ae\perl>perl -v This is perl 5, version 16, subversion 3 (v5.16.3) built for MSWin32-x64-multi-t hread quick fix _init(); Encode::Alias::define_alias(sub { no strict 'refs'; no warnings 'once'; my $a = defined ${"ENCODING_" . uc(shift)}; if ($a) { return ${"ENCODING_" . uc(shift)}; } return "ENCODING_UTF8"; }, "locale");

Message body is not shown because sender requested not to inline it.

Sat Oct 19 05:42:25 2013 GAAS [...] cpan.org - Correspondence added

This warning is exactly the one that "no warnings 'once';" is supposed to suppress. Why isn't that happening? Isn't that the real bug?

Sat Oct 19 05:42:26 2013 The RT System itself - Status changed from 'new' to 'open'

Wed Nov 06 05:45:53 2013 SREZIC [...] cpan.org - Correspondence added

On 2013-10-19 05:42:25, GAAS wrote: Show quoted text

> This warning is exactly the one that "no warnings 'once';" is supposed to > suppress. Why isn't that happening? Isn't that the real bug?

The original poster is using "-W", which (citing perlrun.pod) 'Enables all warnings regardless of "no warnings"'. I don't think users should use -W. Regards, Slaven

Mon Jan 12 16:41:06 2015 GAAS [...] cpan.org - Status changed from 'open' to 'rejected'