; Merge from origin/emacs-25

[gnu-emacs] / lisp / mh-e / mh-seq.el

diff --git a/lisp/mh-e/mh-seq.el b/lisp/mh-e/mh-seq.el
index 8fd477c143901c4bf71bda29cd8e0735b4d27994..5acdc2eebf94df0f093038d09e3b5f125f1472a4 100644 (file)
--- a/lisp/mh-e/mh-seq.el
+++ b/lisp/mh-e/mh-seq.el
@@ -1,6 +1,6 @@
 ;;; mh-seq.el --- MH-E sequences support
 
 ;;; mh-seq.el --- MH-E sequences support
 

-;; Copyright (C) 1993, 1995, 2001-2015 Free Software Foundation, Inc.
+;; Copyright (C) 1993, 1995, 2001-2016 Free Software Foundation, Inc.

 
 ;; Author: Bill Wohler <wohler@newt.com>
 ;; Maintainer: Bill Wohler <wohler@newt.com>
 
 ;; Author: Bill Wohler <wohler@newt.com>
 ;; Maintainer: Bill Wohler <wohler@newt.com>


@@ -390,7 +390,7 @@ then a non-empty sequence is read."
   "Read and return a sequence name.
 Prompt with PROMPT, raise an error if the sequence is empty and
 the NOT-EMPTY flag is non-nil, and supply an optional DEFAULT
   "Read and return a sequence name.
 Prompt with PROMPT, raise an error if the sequence is empty and
 the NOT-EMPTY flag is non-nil, and supply an optional DEFAULT

-sequence. A reply of '%' defaults to the first sequence
+sequence. A reply of `%' defaults to the first sequence

 containing the current message."
   (let* ((input (completing-read (format "%s sequence%s: " prompt
                                          (if default
 containing the current message."
   (let* ((input (completing-read (format "%s sequence%s: " prompt
                                          (if default


@@ -555,7 +555,7 @@ change."
 ;;;###mh-autoload
 (defun mh-valid-view-change-operation-p (op)
   "Check if the view change operation can be performed.
 ;;;###mh-autoload
 (defun mh-valid-view-change-operation-p (op)
   "Check if the view change operation can be performed.

-OP is one of 'widen and 'unthread."
+OP is one of `widen' and `unthread'."

   (cond ((eq (car mh-view-ops) op)
          (pop mh-view-ops))
         (t nil)))
   (cond ((eq (car mh-view-ops) op)
          (pop mh-view-ops))
         (t nil)))


@@ -766,7 +766,7 @@ completion is over."
   "Parse LINE to generate folder name, unseen messages and total messages.
 If CURRENT-FOLDER is non-nil then it contains the current folder
 name and it is used to avoid problems in corner cases involving
   "Parse LINE to generate folder name, unseen messages and total messages.
 If CURRENT-FOLDER is non-nil then it contains the current folder
 name and it is used to avoid problems in corner cases involving

-folders whose names end with a '+' character."
+folders whose names end with a `+' character."

   (with-temp-buffer
     (insert line)
     (goto-char (point-max))
   (with-temp-buffer
     (insert line)
     (goto-char (point-max))