Pārlūkot izejas kodu

org-agenda.el (org-agenda-prepare): Let `throw' display an error

* org-agenda.el (org-agenda-prepare): Let `throw' display an
error.
Bastien Guerry 13 gadi atpakaļ
vecāks
revīzija
29afec9cd0
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      lisp/org-agenda.el

+ 1 - 1
lisp/org-agenda.el

@@ -3376,7 +3376,7 @@ generating a new one."
 	(org-agenda-prepare-window (get-buffer org-agenda-buffer-name))
 	(message "Sticky Agenda buffer, use `r' to refresh")
 	(or org-agenda-multi (org-fit-agenda-window))
-	(throw 'exit nil))
+	(throw 'exit "Sticky Agenda buffer, use `r' to refresh"))
     (setq org-todo-keywords-for-agenda nil)
     (setq org-drawers-for-agenda nil)
     (unless org-agenda-persistent-filter