diff options
author | Artur Malabarba <bruce.connor.am@gmail.com> | 2016-01-25 08:54:34 +0000 |
---|---|---|
committer | Artur Malabarba <bruce.connor.am@gmail.com> | 2016-01-25 08:55:17 +0000 |
commit | 3ef1d9aea96521c7aeb5795f09d0550722c450f4 (patch) | |
tree | 06b8e33e1bc057038879e169074ae2e6136504b6 /lisp/emacs-lisp | |
parent | 6475f9265ecf21a8d49bc3ac0dc66010c9ec6b05 (diff) | |
download | emacs-3ef1d9aea96521c7aeb5795f09d0550722c450f4.tar.gz emacs-3ef1d9aea96521c7aeb5795f09d0550722c450f4.tar.bz2 emacs-3ef1d9aea96521c7aeb5795f09d0550722c450f4.zip |
* lisp/emacs-lisp/ert.el (ert--results-move): Change error to user-error
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | 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 f4be9473394..7a914da3977 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)))) |