summaryrefslogtreecommitdiff
path: root/rt/t/mail/rfc2231-attachment.t
diff options
context:
space:
mode:
Diffstat (limited to 'rt/t/mail/rfc2231-attachment.t')
-rw-r--r--rt/t/mail/rfc2231-attachment.t28
1 files changed, 28 insertions, 0 deletions
diff --git a/rt/t/mail/rfc2231-attachment.t b/rt/t/mail/rfc2231-attachment.t
new file mode 100644
index 000000000..fc74c4720
--- /dev/null
+++ b/rt/t/mail/rfc2231-attachment.t
@@ -0,0 +1,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;
+