MediaWiki 1.30.2

[autoinstallsdev/mediawiki.git] / vendor / pear / mail_mime / tests / test_Bug_13444.phpt

diff --git a/vendor/pear/mail_mime/tests/test_Bug_13444.phpt b/vendor/pear/mail_mime/tests/test_Bug_13444.phpt
new file mode 100644 (file)
index 0000000..a962aa3
--- /dev/null
+++ b/vendor/pear/mail_mime/tests/test_Bug_13444.phpt
@@ -0,0 +1,30 @@
+--TEST--
+Bug #9725   multipart/related & alternative wrong order
+--SKIPIF--
+--FILE--
+<?php
+include("Mail/mime.php");
+
+$mime = new Mail_mime();
+$mime->setTXTBody("test");
+$mime->setHTMLBody("test");
+$mime->addHTMLImage("test", 'application/octet-stream', '', false);
+$body = $mime->get();
+$head = $mime->headers();
+$headCT = $head['Content-Type'];
+$headCT = explode(";", $headCT);
+$headCT = $headCT[0];
+
+$ct = preg_match_all('|Content-Type: ([^;\r\n]+)|', $body, $matches);
+print($headCT);
+print("\n");
+foreach ($matches[1] as $match){
+    print($match);
+    print("\n");
+}
+--EXPECT--
+multipart/alternative
+text/plain
+multipart/related
+text/html
+application/octet-stream