branch: externals/nano-agenda
commit 37b458725676c86c14f127f439374e434bc39c9a
Author: Wojciech Siewierski <wojci...@siewierski.eu>
Commit: Wojciech Siewierski <wojci...@siewierski.eu>
Respect all the org-agenda-files formats
org-agenda-files can be not only a list of files. It can be:
- a list of files (currently supported)
- a path to a directory with the agenda files
- a path to a file with the agenda files listed one per line
The function with the same name handles all these cases.
---
nano-agenda.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/nano-agenda.el b/nano-agenda.el
index 4d4f3f3..27caace 100644
--- a/nano-agenda.el
+++ b/nano-agenda.el
@@ -339,7 +339,7 @@ for efficiency."
(if entry
(cadr entry)
(progn
- (dolist (file org-agenda-files)
+ (dolist (file (org-agenda-files))
(dolist (entry (org-agenda-get-day-entries file date))
(if (nano-agenda-select-entry entry)
(setq level (+ level 1)))))
@@ -373,7 +373,7 @@ for efficiency."
;; Body (only timed entries)
;; Collect all entries with 'time-of-day
- (dolist (file org-agenda-files)
+ (dolist (file (org-agenda-files))
(dolist (entry (org-agenda-get-day-entries file date))
(if (nano-agenda-select-entry entry)
(add-to-list 'entries entry))))
