Skip Menu |
 

This queue is for tickets about the Date-Japanese-Era CPAN distribution.

Report information
The Basics
Id: 116381
Status: open
Priority: 0/
Queue: Date-Japanese-Era

People
Owner: Nobody in particular
Requestors: SREZIC [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 0.06
Fixed in: (no value)



Subject: The encoding pragma is no longer supported
MIME-Version: 1.0
X-Mailer: MIME-tools 5.504 (Entity 5.504)
Content-Disposition: inline
X-RT-Interface: Web
Message-ID: <rt-4.0.18-12466-1469131942-1532.0-0-0 [...] rt.cpan.org>
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
X-RT-Encrypt: 0
X-RT-Sign: 0
Content-Length: 759
Download (untitled) / with headers
text/plain 759b
With perl 5.25.3 I see the following problem: PERL_DL_NONLAZY=1 "/bbbike/perl-5.25.3/bin/perl5.25.3" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(0, 'blib/lib', 'blib/arch')" t/*.t The encoding pragma is no longer supported at t/00_Era.t line 6. BEGIN failed--compilation aborted at t/00_Era.t line 6. # Looks like your test exited with 2 just after 1. t/00_Era.t .. Dubious, test returned 2 (wstat 512, 0x200) Failed 46/47 subtests The encoding pragma is no longer supported at t/01_Jis.t line 4. BEGIN failed--compilation aborted at t/01_Jis.t line 4. # Looks like your test exited with 2 before it could output anything. t/01_Jis.t .. Dubious, test returned 2 (wstat 512, 0x200) Failed 27/27 subtests
MIME-Version: 1.0
In-Reply-To: <rt-4.0.18-12466-1469131942-1532.0-0-0 [...] rt.cpan.org>
X-Mailer: MIME-tools 5.504 (Entity 5.504)
X-RT-Interface: Web
References: <rt-4.0.18-12466-1469131942-1532.0-0-0 [...] rt.cpan.org>
Content-Type: multipart/mixed; boundary="----------=_1469135592-16317-2"
Message-ID: <rt-4.0.18-16317-1469135592-884.116381-0-0 [...] rt.cpan.org>
X-RT-Original-Encoding: utf-8
X-RT-Encrypt: 0
X-RT-Sign: 0
Content-Length: 0
Content-Disposition: inline
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
Content-Length: 872
Download (untitled) / with headers
text/plain 872b
On Thu Jul 21 16:12:22 2016, SREZIC wrote: Show quoted text
> With perl 5.25.3 I see the following problem: > > PERL_DL_NONLAZY=1 "/bbbike/perl-5.25.3/bin/perl5.25.3" "- > MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef > *Test::Harness::Switches; test_harness(0, 'blib/lib', 'blib/arch')" > t/*.t > The encoding pragma is no longer supported at t/00_Era.t line 6. > BEGIN failed--compilation aborted at t/00_Era.t line 6. > # Looks like your test exited with 2 just after 1. > t/00_Era.t .. > Dubious, test returned 2 (wstat 512, 0x200) > Failed 46/47 subtests > The encoding pragma is no longer supported at t/01_Jis.t line 4. > BEGIN failed--compilation aborted at t/01_Jis.t line 4. > # Looks like your test exited with 2 before it could output anything. > t/01_Jis.t .. > Dubious, test returned 2 (wstat 512, 0x200) > Failed 27/27 subtests
All tests pass with this patch.
MIME-Version: 1.0
Subject: open_l8rCVuVZ.txt
X-Mailer: MIME-tools 5.504 (Entity 5.504)
Content-Type: text/plain; charset="utf-8"; name="open_l8rCVuVZ.txt"
Content-Disposition: inline; filename="open_l8rCVuVZ.txt"
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
Content-Length: 1081
diff -rup Date-Japanese-Era-0.06-fIF80F/t/00_Era.t Date-Japanese-Era-0.06-0/t/00_Era.t --- Date-Japanese-Era-0.06-fIF80F/t/00_Era.t 2006-06-14 19:02:39.000000000 -0700 +++ Date-Japanese-Era-0.06-0/t/00_Era.t 2016-07-21 14:11:50.000000000 -0700 @@ -3,7 +3,8 @@ use Test::More tests => 47; BEGIN { use_ok('Date::Japanese::Era'); } -use encoding "utf-8"; +use utf8; +use open ":std", ":utf8"; my @tests = ( [ 2001, 9, 1, '平成', 13 ], @@ -52,6 +53,7 @@ for my $fail (@fail) { } my $utf8 = "\xe6\x98\xad\xe5\x92\x8c"; # 昭和 +utf8::decode $utf8; my $era = Date::Japanese::Era->new($utf8, 52); is($era->name, $utf8, 'input / output UTF-8'); diff -rup Date-Japanese-Era-0.06-fIF80F/t/01_Jis.t Date-Japanese-Era-0.06-0/t/01_Jis.t --- Date-Japanese-Era-0.06-fIF80F/t/01_Jis.t 2006-06-14 18:29:36.000000000 -0700 +++ Date-Japanese-Era-0.06-0/t/01_Jis.t 2016-07-21 14:12:24.000000000 -0700 @@ -1,7 +1,8 @@ use strict; use Test::More tests => 27; -use encoding "utf-8"; +use utf8; +use open ':std', ':utf8'; use Date::Japanese::Era 'JIS_X0301'; my @tests = (


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.