mu4e: fix some compiler warnings

mu4e/mu4e-draft.el

@@ -347,16 +347,17 @@ one. Code borrowed from `message-shorten-1'."
 
 
 (defun mu4e~fontify-signature ()
-  "Give the message signatures a distinctive color. This is used in
+  "Give the message signatures a distinctive color. This is used
-the view and compose modes and will color each signature in digest messages adhering to RFC 1153."
+in the view and compose modes and will color each signature in
+digest messages adhering to RFC 1153."
   (let ((inhibit-read-only t))
     (save-excursion
       ;; give the footer a different color...
       (goto-char (point-min))
       (while (re-search-forward "^-- *$" nil t)
         (let ((p (point))
-              (end (or
+              (end (or ;; 30 by RFC1153
-                    (re-search-forward "\\(^-\\{30\\}.*$\\)" nil t) ;; 30 by RFC1153
+                    (re-search-forward "\\(^-\\{30\\}.*$\\)" nil t)
                     (point-max))))
           (add-text-properties p end '(face mu4e-footer-face)))))))
 

mu4e/mu4e-message.el

@@ -1,4 +1,4 @@
-;;; mu4e-message.el -- part of mu4e, the mu mail user agent -*- lexical-binding: t -*-
+;;; mu4e-message.el -- part of mu4e -*- lexical-binding: t -*-
 
 ;; Copyright (C) 2012-2020 Dirk-Jan C. Binnema
 
@@ -97,7 +97,8 @@ Like `mu4e-message-field-nil', but will sanitize nil values:
 - all string field except body-txt/body-html: nil -> \"\"
 - numeric fields + dates                    : nil -> 0
 - all others                                : return the value
-Thus, function will return nil for empty lists, non-existing body-txt or body-html."
+Thus, function will return nil for empty lists, non-existing body-txt
+or body-html."
   (let ((val (mu4e-message-field-raw msg field)))
     (cond
      (val