[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 3ef1d9a: * lisp/emacs-lisp/ert.el (ert--results-m
From: |
Artur Malabarba |
Subject: |
[Emacs-diffs] emacs-25 3ef1d9a: * lisp/emacs-lisp/ert.el (ert--results-move): Change error to user-error |
Date: |
Mon, 25 Jan 2016 10:56:48 +0000 |
branch: emacs-25
commit 3ef1d9aea96521c7aeb5795f09d0550722c450f4
Author: Artur Malabarba <address@hidden>
Commit: Artur Malabarba <address@hidden>
* lisp/emacs-lisp/ert.el (ert--results-move): Change error to user-error
---
lisp/emacs-lisp/ert.el | 6 +++---
1 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el
index f4be947..7a914da 100644
--- a/lisp/emacs-lisp/ert.el
+++ b/lisp/emacs-lisp/ert.el
@@ -2128,12 +2128,12 @@ To be used in the ERT results buffer."
"Move point from NODE to the previous or next node.
EWOC-FN specifies the direction and should be either `ewoc-prev'
-or `ewoc-next'. If there are no more nodes in that direction, an
-error is signaled with the message ERROR-MESSAGE."
+or `ewoc-next'. If there are no more nodes in that direction, a
+user-error is signaled with the message ERROR-MESSAGE."
(cl-loop
(setq node (funcall ewoc-fn ert--results-ewoc node))
(when (null node)
- (error "%s" error-message))
+ (user-error "%s" error-message))
(unless (ert--ewoc-entry-hidden-p (ewoc-data node))
(goto-char (ewoc-location node))
(cl-return))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-25 3ef1d9a: * lisp/emacs-lisp/ert.el (ert--results-move): Change error to user-error,
Artur Malabarba <=