diff --git a/lib/modules/Protocols.pmod/SMTP.pmod b/lib/modules/Protocols.pmod/SMTP.pmod
index c1c675cc288753b12bc8a9fb7356aff2ea09374e..f1788e4e76b0cf95ed64f13fbb6a1f9807db8bce 100644
--- a/lib/modules/Protocols.pmod/SMTP.pmod
+++ b/lib/modules/Protocols.pmod/SMTP.pmod
@@ -102,6 +102,8 @@ class client
 
   void simple_mail(string to, string subject, string from, string msg)
   {
+    if (search(msg,"\r\n")==-1)
+      msg=replace(msg,"\n","\r\n"); // *simple* mail /Mirar
     send_message(parse_addr(from), ({ parse_addr(to) }),
 		 (string)MIME.Message(msg, (["mime-version":"1.0",
 					     "subject":subject,