blob: fc74c4720823c91cbb2bb8db877b249eb03c8e5e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
use strict;
use warnings;
use utf8;
use RT::Test tests => undef;
my ($baseurl, $m) = RT::Test->started_ok;
ok $m->login, 'logged in as root';
diag "encoded attachment filename with parameter continuations";
{
my $mail = RT::Test->file_content(
RT::Test::get_relocatable_file(
'rfc2231-attachment-filename-continuations',
(File::Spec->updir(), 'data', 'emails')
)
);
my ( $status, $id ) = RT::Test->send_via_mailgate($mail);
is( $status >> 8, 0, "The mail gateway exited normally" );
ok( $id, "Created ticket" );
$m->get_ok("/Ticket/Display.html?id=$id");
$m->content_contains("新しいテキスト ドキュメント.txt", "found full filename");
}
undef $m;
done_testing;
|