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.
This commit is contained in:
parent
9a6fc63843
commit
6a3920c07e
1 changed files with 1 additions and 1 deletions
|
@ -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 ()
|
||||
|
|
Loading…
Reference in a new issue