mirror of
https://gitlab.alpinelinux.org/alpine/aports.git
synced 2025-08-06 05:47:13 +02:00
34 lines
993 B
Diff
34 lines
993 B
Diff
Patch-Source: https://sources.debian.org/data/main/libe/libencode-imaputf7-perl/1.05-3/debian/patches/perl-5.40.patch
|
|
--
|
|
Description: fix import warnings with perl 5.40
|
|
Origin: vendor
|
|
Bug: https://rt.cpan.org/Ticket/Display.html?id=149091
|
|
Forwarded: https://rt.cpan.org/Ticket/Display.html?id=149091
|
|
Bug-Debian: https://bugs.debian.org/1078061
|
|
Author: gregor herrmann <gregoa@debian.org>
|
|
Last-Update: 2024-08-07
|
|
|
|
--- a/t/0-test.t
|
|
+++ b/t/0-test.t
|
|
@@ -6,7 +6,8 @@
|
|
use Test::More tests => 2;
|
|
use Test::NoWarnings;
|
|
|
|
-use Encode::IMAPUTF7 qw(encode decode);
|
|
+use Encode qw(encode decode);
|
|
+use Encode::IMAPUTF7;
|
|
|
|
use File::Spec;
|
|
use File::Basename;
|
|
--- a/t/1-ampersand.t
|
|
+++ b/t/1-ampersand.t
|
|
@@ -7,7 +7,7 @@
|
|
use Test::More tests => 6;
|
|
use Test::NoWarnings;
|
|
|
|
-use Encode::IMAPUTF7 qw(encode decode);
|
|
+use Encode::IMAPUTF7;
|
|
|
|
is(Encode::IMAPUTF7->encode("&"), "&-", "Single ampersand");
|
|
is(Encode::IMAPUTF7->encode("A&B"), "A&-B", "Ampersand surrounded by two US-ASCII chars");
|