tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Fix last commit.

Browse source
This commit is contained in:
Bastien Guerry 2013-01-24 15:05:41 +01:00
parent cf1b5169de
commit 9d11d5f3ec
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
lisp/org-agenda.el
View file

@ -5225,11 +5225,11 @@ function from a program - use `org-agenda-get-day-entries' instead."
(while (setq file (pop files))
(setq rtn (apply 'org-agenda-get-day-entries file date args))
(setq results (append results rtn)))
(if results
(setq results
(mapcar (lambda (i) (replace-regexp-in-string
org-bracket-link-regexp "\\3" i)) results))
(concat (org-agenda-finalize-entries results) "\n"))))
(when results
(setq results
(mapcar (lambda (i) (replace-regexp-in-string
org-bracket-link-regexp "\\3" i)) results))
(concat (org-agenda-finalize-entries results) "\n"))))
(autoload 'org-diary "org-agenda" "\
Return diary information from org files.