diff -r 717e2efad352 modules/simpletest/tests/mail.test
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ modules/simpletest/tests/mail.test	Wed Feb 11 20:42:31 2009 +0100
@@ -0,0 +1,38 @@
+<?php
+
+class MailTest extends DrupalWebTestCase {
+  /**
+   * Implementation of getInfo().
+   */
+  function getInfo() {
+    return array(
+      'name' => t('Mail functionality'),
+      'description' => t('Test Mail: sending one-line mails.'),
+      'group' => t('Mail')
+    );
+  }
+  
+  /**
+   * Implementation of setUp().
+   */
+  function setUp() {
+    parent::setUp('mail_test');
+    variable_set('site_mail', 'user@example.com');
+  }
+  
+  /**
+   * Implementation of tearDown().
+   */
+  function tearDown() {
+    parent::tearDown(); 
+  }
+  
+  function testOneLineMail() {
+    $account = $this->drupalCreateUser(array('access content'));
+    $default_from = variable_get('site_mail', ini_get('sendmail_from'));
+    
+    $message = drupal_mail('mail_test', 'oneline', 'user@example.com', language_default(), array('account' => $account), NULL, FALSE);
+    
+    $this->assertTrue(strpos($message['body'], '\n')===FALSE, t('Testing a one line mail'));
+  }
+}
diff -r 717e2efad352 modules/simpletest/tests/mail_test.info
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ modules/simpletest/tests/mail_test.info	Wed Feb 11 20:42:31 2009 +0100
@@ -0,0 +1,7 @@
+name = "Mail test"
+description = "Support module for mail testing."
+package = Testing
+version = VERSION
+core = 7.x
+files[] = mail_test.module
+hidden = TRUE
diff -r 717e2efad352 modules/simpletest/tests/mail_test.module
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ modules/simpletest/tests/mail_test.module	Wed Feb 11 20:42:31 2009 +0100
@@ -0,0 +1,15 @@
+<?php
+
+/**
+ * Implementation of hook_mail
+ */
+function mail_test_mail($key, &$message, $params) {
+  $language = $message['language'];
+  $variables = user_mail_tokens($params['account'], $language);
+  switch($key) {
+    case 'oneline':
+    $message['subject'] = t('subject', $variables, $language->language);
+    $message['body'] = t('this body has one line', $variables, $language->language);
+    break;
+  }
+}