emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master 2e3a336 2/3: mh-e: use user-error rather than debug


From: Glenn Morris
Subject: [Emacs-diffs] master 2e3a336 2/3: mh-e: use user-error rather than debug-ignored-errors
Date: Mon, 17 Apr 2017 20:16:43 -0400 (EDT)

branch: master
commit 2e3a33659fb85330ec76a67b2113472e7e0b546a
Author: Glenn Morris <address@hidden>
Commit: Glenn Morris <address@hidden>

    mh-e: use user-error rather than debug-ignored-errors
    
    * lisp/mh-e/mh-alias.el (mh-alias-grab-from-field):
    * lisp/mh-e/mh-utils.el (mh-get-msg-num): Use user-error.
    (debug-ignored-errors): No longer modify.
---
 lisp/mh-e/mh-alias.el | 2 +-
 lisp/mh-e/mh-utils.el | 4 +---
 2 files changed, 2 insertions(+), 4 deletions(-)

diff --git a/lisp/mh-e/mh-alias.el b/lisp/mh-e/mh-alias.el
index e2f747c..82602ee 100644
--- a/lisp/mh-e/mh-alias.el
+++ b/lisp/mh-e/mh-alias.el
@@ -589,7 +589,7 @@ filing messages."
       (set-buffer (get-buffer-create mh-temp-buffer))
       (insert-file-contents (mh-msg-filename (mh-get-msg-num t))))
      ((eq major-mode 'mh-folder-mode)
-      (error "Cursor not pointing to a message")))
+      (user-error "Cursor not pointing to a message")))
     (let* ((address (or (mh-extract-from-header-value)
                         (error "Message has no From: header")))
            (alias (mh-alias-suggest-alias address)))
diff --git a/lisp/mh-e/mh-utils.el b/lisp/mh-e/mh-utils.el
index 3bc5fef..1ed2e0f 100644
--- a/lisp/mh-e/mh-utils.el
+++ b/lisp/mh-e/mh-utils.el
@@ -349,11 +349,9 @@ the cursor is not pointing to a message."
            (string-to-number (buffer-substring (match-beginning 1)
                                                (match-end 1))))
           (error-if-no-message
-           (error "Cursor not pointing to message"))
+           (user-error "Cursor not pointing to message"))
           (t nil))))
 
-(add-to-list 'debug-ignored-errors "^Cursor not pointing to message$")
-
 
 
 ;;; Folder Cache and Access



reply via email to

[Prev in Thread] Current Thread [Next in Thread]