diff --git a/doc/conf/LSaddon/LSaddon_mail.docbook b/doc/conf/LSaddon/LSaddon_mail.docbook
index 78ba7c21..5cde8aa3 100644
--- a/doc/conf/LSaddon/LSaddon_mail.docbook
+++ b/doc/conf/LSaddon/LSaddon_mail.docbook
@@ -1,8 +1,10 @@
 <sect2 id="config-LSaddon_mail">
   <title>LSaddon_mail</title>
-  <para>Cet &LSaddon; est utilisé pour gérer l'envoie de mail. Le module
-  &PEAR; Mail doit être installé. Il doit être configuré en éditant son
-  fichier de configuration <literal>config.LSaddons.mail.php</literal>.</para>
+  <para>Cet &LSaddon; est utilisé pour gérer l'envoie de mail. Il utilise
+  pour cela les librairies &PEAR; <emphasis>Mail</emphasis> et <emphasis>
+  Mail_Mime</emphasis> qui doivent être installés. Cet &LSaddon; doit être
+  configuré en éditant son fichier de configuration
+  <literal>config.LSaddons.mail.php</literal>.</para>
 
   <programlisting linenumbering="unnumbered">
 <citetitle>Structure du fichier</citetitle>/*
@@ -79,6 +81,7 @@ $MAIL_HEARDERS = array(
     <paramdef>array <parameter>$attachments</parameter></paramdef>
     <paramdef>string <parameter>$eol</parameter></paramdef>
     <paramdef>string <parameter>$encoding</parameter></paramdef>
+    <paramdef>boolean <parameter>$html</parameter></paramdef>
 </funcprototype>
 </funcsynopsis>
 </para>
diff --git a/src/includes/addons/LSaddons.mail.php b/src/includes/addons/LSaddons.mail.php
index 4fa7a634..07f859fb 100644
--- a/src/includes/addons/LSaddons.mail.php
+++ b/src/includes/addons/LSaddons.mail.php
@@ -74,7 +74,7 @@ LSerror :: defineError('MAIL_01',
   *
   * @retval boolean true si MAIL est pleinement supporté, false sinon
   */
-  function sendMail($to, $subject, $msg, $headers=array(), $attachments=array(), $eol="\n", $encoding="utf8") {
+  function sendMail($to, $subject, $msg, $headers=array(), $attachments=array(), $eol="\n", $encoding="utf8", $html=false) {
     global $MAIL_SEND_PARAMS, $MAIL_HEARDERS;
     $mail_obj = Mail::factory(MAIL_SEND_METHOD, (isset($MAIL_SEND_PARAMS)?$MAIL_SEND_PARAMS:null));
 
@@ -111,7 +111,7 @@ LSerror :: defineError('MAIL_01',
     $mime = new Mail_mime(
       array(
         'eol' => $eol,
-        'text_charset' => $encoding,
+        ($html?'html_charset':'text_charset') => $encoding,
         'head_charset' => $encoding,
       )
     );
@@ -122,7 +122,10 @@ LSerror :: defineError('MAIL_01',
     if ($subject)
       $mime->setSubject($subject);
 
-    $mime->setTXTBody($msg);
+    if ($html)
+      $mime->setHTMLBody($msg);
+    else
+      $mime->setTXTBody($msg);
 
     if (is_array($attachments) && !empty($attachments)) {
       $finfo = new finfo(FILEINFO_MIME_TYPE);