mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-29 07:58:21 +00:00
Code

org.el: Fix org-diary' again by checking org-agenda-buffer' correctly.

Browse Source
This commit is contained in:
Bastien Guerry 2012-04-30 00:04:20 +02:00
parent bea597be96
commit 237c65b1f7
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/org-agenda.el
View File

@ -4748,7 +4748,8 @@ function from a program - use `org-agenda-get-day-entries' instead."
;; list is then no longer a global variable. ;; list is then no longer a global variable.
(org-agenda-reset-markers)) (org-agenda-reset-markers))
;; Prevent `org-compile-prefix-format' to fail when there is no agenda ;; Prevent `org-compile-prefix-format' to fail when there is no agenda
(when org-agenda-buffer (org-compile-prefix-format 'agenda)) (when (buffer-live-p org-agenda-buffer)
(org-compile-prefix-format 'agenda))
(org-set-sorting-strategy 'agenda) (org-set-sorting-strategy 'agenda)
(setq args (or args '(:deadline :scheduled :timestamp :sexp))) (setq args (or args '(:deadline :scheduled :timestamp :sexp)))
(let* ((files (if (and entry (stringp entry) (string-match "\\S-" entry)) (let* ((files (if (and entry (stringp entry) (string-match "\\S-" entry))