CRM_Mailing_Form_Test - Email formatting

diff --git a/CRM/Mailing/Form/Test.php b/CRM/Mailing/Form/Test.php
index 677de42610d56d973b4a24275294c9c07007b274..0f953363e85e6281a468a5bc9d03851df6a80c3b 100644 (file)
--- a/CRM/Mailing/Form/Test.php
+++ b/CRM/Mailing/Form/Test.php
@@ -214,7 +214,7 @@ class CRM_Mailing_Form_Test extends CRM_Core_Form {
         foreach ($emailAdd as $key => $value) {
           $email = trim($value);
           $testParams['emails'][] = $email;
-          $emails .= $emails ? ",'$email'" : "'$email'";
+          $emails .= ($emails ? ',' : '') . "'" . CRM_Core_DAO::escapeString($email)  . "'";
           if (!CRM_Utils_Rule::email($email)) {
             CRM_Core_Session::setStatus(ts('Please enter a valid email addresses.'), ts('Test not sent.'), 'error');
             $error = TRUE;