From 6a3920c07eaae58408dd27e7db22bff7ad4d1f80 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 7 Aug 2021 12:55:39 +0200 Subject: [PATCH] Make `q' in `org-agenda' work even with `debug-on-error' set * lisp/org/org-agenda.el (org-agenda-get-restriction-and-command): Using `error' here will trigger users with `debug-on-error' so use `user-error' instead (bug#49920). It would probably be preferable to rewrite this to not use the error system to do control flow. --- lisp/org/org-agenda.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el index 8a4aa2b1be0..3acc18715dd 100644 --- a/lisp/org/org-agenda.el +++ b/lisp/org/org-agenda.el @@ -3205,7 +3205,7 @@ s Search for keywords M Like m, but only TODO entries (delete-window) (org-agenda-get-restriction-and-command prefix-descriptions)) - ((equal c ?q) (error "Abort")) + ((equal c ?q) (user-error "Abort")) (t (user-error "Invalid key %c" c)))))))) (defun org-agenda-fit-window-to-buffer () -- 2.39.2