From: Don Armstrong Date: Sat, 7 Jul 2012 18:57:08 +0000 (-0700) Subject: decode_rfc1522 now outputs perl internal format X-Git-Tag: release/2.6.0~376^2~7 X-Git-Url: https://git.donarmstrong.com/?p=debbugs.git;a=commitdiff_plain;h=5efa704a6ef44aca70afbcf0b784ca02c422257c decode_rfc1522 now outputs perl internal format --- diff --git a/t/01_mime.t b/t/01_mime.t index 5a1aa60..5599b30 100644 --- a/t/01_mime.t +++ b/t/01_mime.t @@ -27,15 +27,15 @@ END # 1: test decode ok(Debbugs::MIME::decode_rfc1522(q(=?iso-8859-1?Q?D=F6n_Armstr=F3ng?= )) eq - encode_utf8(q(Dön Armstróng )),"decode_rfc1522 decodes and converts to UTF8 properly"); + q(Dön Armstróng ),"decode_rfc1522 decodes and converts to UTF8 properly"); # 2: test encode -ok(Debbugs::MIME::decode_rfc1522(Debbugs::MIME::encode_rfc1522($test_str)) eq encode_utf8($test_str), +ok(Debbugs::MIME::decode_rfc1522(Debbugs::MIME::encode_rfc1522($test_str)) eq $test_str, "encode_rfc1522 encodes strings that decode_rfc1522 can decode"); -ok(Debbugs::MIME::decode_rfc1522(Debbugs::MIME::encode_rfc1522($test_str2)) eq encode_utf8($test_str2), +ok(Debbugs::MIME::decode_rfc1522(Debbugs::MIME::encode_rfc1522($test_str2)) eq $test_str2, "encode_rfc1522 encodes strings that decode_rfc1522 can decode"); -ok(Debbugs::MIME::decode_rfc1522(Debbugs::MIME::encode_rfc1522($test_str3)) eq encode_utf8($test_str3), +ok(Debbugs::MIME::decode_rfc1522(Debbugs::MIME::encode_rfc1522($test_str3)) eq $test_str3, "encode_rfc1522 properly handles parentesis and \"");