Browse Source

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 years ago
parent
commit
29afec9cd0
1 changed files with 1 additions and 1 deletions
  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