From: Stefan Kangas <stefankangas@gmail.com>
Date: Mon, 8 Jul 2024 15:39:51 +0000 (+0200)
Subject: Checkdoc fixes in `mh-e/*.el`
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=91bcc049ceb4c47cbadebdb34ff451722aa6c40d;p=emacs.git

Checkdoc fixes in `mh-e/*.el`

* lisp/mh-e/mh-e.el (mh-tool-bar):
* lisp/mh-e/mh-folder.el (mh-folder-mode):
* lisp/mh-e/mh-search.el (mh-pick-menu, mh-search-mode):
* lisp/mh-e/mh-show.el (mh-show-mode): Checkdoc fixes.

(cherry picked from commit 3977aa0756860d771442c69ee018fa7e925d0a62)
---

diff --git a/lisp/mh-e/mh-e.el b/lisp/mh-e/mh-e.el
index 1a535620602..3d686b4a777 100644
--- a/lisp/mh-e/mh-e.el
+++ b/lisp/mh-e/mh-e.el
@@ -1104,7 +1104,7 @@ and GNU mailutils."
   :package-version '(MH-E . "8.0"))
 
 (defgroup mh-tool-bar nil
-  "The tool bar"
+  "The tool bar."
   :link '(custom-manual "(mh-e)Tool Bar")
   :prefix "mh-"
   :group 'mh-e
diff --git a/lisp/mh-e/mh-folder.el b/lisp/mh-e/mh-folder.el
index 1dae9a600fd..c90537f1502 100644
--- a/lisp/mh-e/mh-folder.el
+++ b/lisp/mh-e/mh-folder.el
@@ -520,8 +520,8 @@ font-lock is done highlighting.")
 ;; Autoload cookie needed by desktop.el
 ;;;###autoload
 (define-derived-mode mh-folder-mode fundamental-mode "MH-Folder"
-  "Major MH-E mode for \"editing\" an MH folder scan listing.\\<mh-folder-mode-map>
-
+  "Major MH-E mode for \"editing\" an MH folder scan listing.
+\\<mh-folder-mode-map>
 You can show the message the cursor is pointing to, and step through
 the messages. Messages can be marked for deletion or refiling into
 another folder; these commands are executed all at once with a
diff --git a/lisp/mh-e/mh-search.el b/lisp/mh-e/mh-search.el
index 59dad161c11..5ee70ae081d 100644
--- a/lisp/mh-e/mh-search.el
+++ b/lisp/mh-e/mh-search.el
@@ -539,7 +539,7 @@ group of results."
 ;;; Search Menu
 
 (easy-menu-define
-  mh-pick-menu mh-search-mode-map "Menu for MH-E Search"
+  mh-pick-menu mh-search-mode-map "Menu for MH-E Search."
   '("Search"
     ["Perform Search"       mh-index-do-search t]
     ["Search with pick"     mh-pick-do-search t]))
@@ -594,8 +594,8 @@ as well.")
 (put 'mh-search-mode 'mode-class 'special)
 
 (define-derived-mode mh-search-mode fundamental-mode "MH-Search"
-  "Mode for creating search templates in MH-E.\\<mh-search-mode-map>
-
+  "Mode for creating search templates in MH-E.
+\\<mh-search-mode-map>
 Edit this template by entering your search criteria in an
 appropriate header field that is already there, or create a new
 field yourself. If the string you're looking for could be
diff --git a/lisp/mh-e/mh-show.el b/lisp/mh-e/mh-show.el
index 0f90fd6f057..96b148ab49c 100644
--- a/lisp/mh-e/mh-show.el
+++ b/lisp/mh-e/mh-show.el
@@ -818,8 +818,8 @@ operation."
 
 ;;;###mh-autoload
 (define-derived-mode mh-show-mode text-mode "MH-Show"
-  "Major mode for showing messages in MH-E.\\<mh-show-mode-map>
-
+  "Major mode for showing messages in MH-E.
+\\<mh-show-mode-map>
 Email addresses and URLs in the message are highlighted if the
 option `goto-address-highlight-p' is on, which it is by default.
 To view the web page for a highlighted URL or to send a message