5 use RT::Test tests => undef;
6 my ($baseurl, $m) = RT::Test->started_ok;
7 ok $m->login, 'logged in as root';
9 diag "encoded attachment filename with parameter continuations";
11 my $mail = RT::Test->file_content(
12 RT::Test::get_relocatable_file(
13 'rfc2231-attachment-filename-continuations',
14 (File::Spec->updir(), 'data', 'emails')
18 my ( $status, $id ) = RT::Test->send_via_mailgate($mail);
19 is( $status >> 8, 0, "The mail gateway exited normally" );
20 ok( $id, "Created ticket" );
22 $m->get_ok("/Ticket/Display.html?id=$id");
23 $m->content_contains("新しいテキスト ドキュメント.txt", "found full filename");