From 142d91f21829a422befa1a9cda5ab0f3033bc587 Mon Sep 17 00:00:00 2001
From: "Dirk-Jan C. Binnema" <djcb@djcbsoftware.nl>
Date: Fri, 17 May 2024 18:45:15 +0300
Subject: [PATCH] mu4e: some flycheck fixes

---
 mu4e/mu4e-compose.el  |  7 ++++---
 mu4e/mu4e-contacts.el | 14 +++++++-------
 mu4e/mu4e-draft.el    |  7 ++++---
 3 files changed, 15 insertions(+), 13 deletions(-)

diff --git a/mu4e/mu4e-compose.el b/mu4e/mu4e-compose.el
index 6135ef5c..f2b6f890 100644
--- a/mu4e/mu4e-compose.el
+++ b/mu4e/mu4e-compose.el
@@ -380,15 +380,16 @@ non-nil, make it a \"wide\" reply (a.k.a. \"reply-to-all\")."
 
 ;;;###autoload
 (defun mu4e-compose-reply (&optional wide)
-  "Reply to the message at point. If WIDE is
-non-nil, make it a \"wide\" reply (a.k.a. \"reply-to-all\")."
+  "Reply to the message at point.
+If WIDE is non-nil, make it a \"wide\" reply (a.k.a.
+\"reply-to-all\")."
   (interactive "P")
   (mu4e-compose-reply-to nil wide))
 
 ;;;###autoload
 (defun mu4e-compose-wide-reply ()
   "Wide reply to the message at point.
-(a.k.a. \"reply-to-all\")."
+I.e., \"reply-to-all\"."
   (interactive)
   (mu4e-compose-reply-to nil t))1
 
diff --git a/mu4e/mu4e-contacts.el b/mu4e/mu4e-contacts.el
index ab6079cf..025cac44 100644
--- a/mu4e/mu4e-contacts.el
+++ b/mu4e/mu4e-contacts.el
@@ -1,6 +1,6 @@
 ;;; mu4e-contacts.el --- Dealing with contacts -*- lexical-binding: t -*-
 
-;; Copyright (C) 2022-2023 Dirk-Jan C. Binnema
+;; Copyright (C) 2022-2024 Dirk-Jan C. Binnema
 
 ;; Author: Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
 ;; Maintainer: Dirk-Jan C. Binnema <djcb@djcbsoftware.nl>
@@ -69,7 +69,7 @@ Lowering this variable reduces start-up time and memory usage."
   :group 'mu4e-compose)
 
 ;; names and mail-addresses can be mapped onto their canonical
-;; counterpart.  use the customizeable function
+;; counterpart.  Use the customizable function
 ;; mu4e-canonical-contact-function to do that.  below the identity
 ;; function for mapping a contact onto the canonical one.
 (defun mu4e-contact-identity (contact)
@@ -84,9 +84,9 @@ their canonical counterpart; useful as an example."
   (lambda(addr)
     (cond
      ((string-match-p "reply" addr)
-      ;; no-reply adresses are not useful of course, but neither are are
-      ;; reply-xxxx addresses since they're autogenerated only useful for direct
-      ;; replies.
+      ;; no-reply addresses are not useful of course, but neither are are
+      ;; reply-xxxx addresses since they're auto-generated only useful for
+      ;; direct replies.
       nil)
      (t addr)))
   "Function for processing contact information for use in auto-completion.
@@ -157,7 +157,7 @@ That is, does it match either `mu4e-personal-address-p' or
 `message-alternative-emails'.
 
 Note that this expanded definition of user-addresses is only used
-in emacs, not in `mu' (e.g. when indexing).
+in Emacs, not in `mu' (e.g., when indexing).
 
 Also see `mu4e-personal-or-alternative-address-or-empty-p'."
   (let ((alts message-alternative-emails))
@@ -175,7 +175,7 @@ return t for _empty_ ADDR. This can be useful for use with
 `message-dont-reply-to-names' since it can receive empty strings;
 those can be filtered-out by returning t here.
 
-See #2680 for further details. "
+See #2680 for further details."
   (or (and addr (string= addr ""))
       (mu4e-personal-or-alternative-address-p addr)))
 
diff --git a/mu4e/mu4e-draft.el b/mu4e/mu4e-draft.el
index 3b94cdd3..64b2f1a6 100644
--- a/mu4e/mu4e-draft.el
+++ b/mu4e/mu4e-draft.el
@@ -612,13 +612,13 @@ COMPOSE-TYPE and PARENT are as in `mu4e--draft'."
   (undo-boundary))
 
 ;;
-;; mu4e-compose-pos-hook helpers
+;; mu4e-compose-post-hook helpers
 
 (defvar mu4e--before-draft-window-config nil
   "The window configuration just before creating the draft.")
 
 (defun mu4e-compose-post-restore-window-configuration()
-  "Function that perhaps restores the window configuration.
+  "Function that might restore the window configuration.
 I.e. the configuration just before the draft buffer appeared.
 This is for use in `mu4e-compose-post-hook'.
 See `set-window-configuration' for further details."
@@ -632,7 +632,7 @@ See `set-window-configuration' for further details."
 Used internally for mu4e-compose-post-kill-frame.")
 
 (defun mu4e-compose-post-kill-frame ()
-  "Function that perhaps kills the composition frame.
+  "Function that might kill the composition frame.
 This is for use in `mu4e-compose-post-hook'."
   (let ((msgframe (selected-frame)))
     ;;(message "kill frame? %s %s" mu4e--draft-activation-frame msgframe)
@@ -744,3 +744,4 @@ but note the different order."
    parent))
 
 (provide 'mu4e-draft)
+;;; mu4e-draft.el ends here