4 use RT::Test nodata => 1, tests => undef;
8 diag "normal mime encoding conversion: utf8 => iso-8859-1";
10 my $mime = MIME::Entity->build(
11 Type => 'text/plain; charset=utf-8',
16 RT::I18N::SetMIMEEntityToEncoding( $mime, 'iso-8859-1', );
18 [ qr/does not map to iso-8859-1/ ], 'got one "not map" error';
19 is( $mime->stringify_body, 'À中文', 'body is not changed' );
20 is( $mime->head->mime_attr('Content-Type'), 'application/octet-stream' );
23 diag "mime encoding conversion: utf8 => iso-8859-1";
25 my $mime = MIME::Entity->build(
26 Type => 'text/plain; charset=utf-8',
29 is( $mime->stringify_body, 'À中文', 'body is not changed' );