import rt 3.8.7

1 files changed, 45 insertions, 0 deletions

diff --git a/rt/t/api/attachment.t b/rt/t/api/attachment.t
new file mode 100644
index 000000000..07c46bad0
--- /dev/null
+++ b/rt/t/api/attachment.t
@@ -0,0 +1,45 @@
+
+use strict;
+use warnings;
+use RT;
+use RT::Test tests => 4;
+
+
+{
+
+ok (require RT::Attachment);
+
+
+}
+
+{
+
+my $test1 = "From: jesse";
+my @headers = RT::Attachment->_SplitHeaders($test1);
+is ($#headers, 0, $test1 );
+
+my $test2 = qq{From: jesse
+To: bobby
+Subject: foo
+};
+
+@headers = RT::Attachment->_SplitHeaders($test2);
+is ($#headers, 2, "testing a bunch of singline multiple headers" );
+
+
+my $test3 = qq{From: jesse
+To: bobby,
+ Suzie,
+    Sally,
+    Joey: bizzy,
+Subject: foo
+};
+
+@headers = RT::Attachment->_SplitHeaders($test3);
+is ($#headers, 2, "testing a bunch of singline multiple headers" );
+
+
+
+}
+
+1;