X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=t%2F01_mime.t;h=d103eb19e445987ac40215102c755ea3d6fa9018;hb=cc7a9cb5803ed32b8f76921c97cae873f851ab50;hp=5599b304ca25a791c441152497335ba84792f5fb;hpb=4ac94f292bfbf36863795ed9d695be7ad2b5b344;p=debbugs.git diff --git a/t/01_mime.t b/t/01_mime.t index 5599b30..d103eb1 100644 --- a/t/01_mime.t +++ b/t/01_mime.t @@ -6,28 +6,27 @@ use Test::More tests => 6; use warnings; use strict; -use utf8; use Encode; use_ok('Debbugs::MIME'); # encode_headers testing -my $test_str = <<'END'; +my $test_str = decode_utf8(<<'END'); Döñ Ärḿßtrøñĝ END -my $test_str2 = <<'END'; +my $test_str2 = decode_utf8(<<'END'); Döñ Ärḿßtrøñĝ END -my $test_str3 =<<'END'; +my $test_str3 =decode_utf8(<<'END'); foo@bar.com (J fö"ø) END # 1: test decode ok(Debbugs::MIME::decode_rfc1522(q(=?iso-8859-1?Q?D=F6n_Armstr=F3ng?= )) eq - q(Dön Armstróng ),"decode_rfc1522 decodes and converts to UTF8 properly"); + decode_utf8(q(Dön Armstróng )),"decode_rfc1522 decodes and converts to UTF8 properly"); # 2: test encode