summaryrefslogtreecommitdiff
path: root/lisp/progmodes/xref.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-11-14 21:13:12 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-11-14 21:13:33 +0000
commitd24e7833e56eb9ce8731975518da0c7fda3d00f2 (patch)
tree5c2f29f990f1d8cfad783f1c3212d67246a4c700 /lisp/progmodes/xref.el
parent278d8c8e6c92729e4a00ae61699bc8f95342ea81 (diff)
downloademacs-d24e7833e56eb9ce8731975518da0c7fda3d00f2.tar.gz
* lisp/progmodes/xref.el (xref-pop-marker-stack): Downgrade errors
Signal user-errors instead.
Diffstat (limited to 'lisp/progmodes/xref.el')
-rw-r--r--lisp/progmodes/xref.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index 6a3b42ff646..1962614f16d 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -345,10 +345,10 @@ elements is negated."
(interactive)
(let ((ring xref--marker-ring))
(when (ring-empty-p ring)
- (error "Marker stack is empty"))
+ (user-error "Marker stack is empty"))
(let ((marker (ring-remove ring 0)))
(switch-to-buffer (or (marker-buffer marker)
- (error "The marked buffer has been deleted")))
+ (user-error "The marked buffer has been deleted")))
(goto-char (marker-position marker))
(set-marker marker nil nil)
(run-hooks 'xref-after-return-hook))))