looking for a little help with my function. I'm trying to create a loop-while that'll return a list of files back to org-agenda-files. It's just not working though and i keep getting errors. Any ideas how I can get this to work? Any using a loop-while could be completely wrong, i'm just looking for something that'll work.
(setq org-gtd-task-files '("next.org" "coding.org" "personal.org")) (setq org-gtd-folder '"~/.org/gtd/") (push (format "%s%s" org-gtd-folder (loop-while org-gtd-task-files (pop org-gtd-task-files))) org-agenda-files)
Another method I tried was:
(let ((files org-gtd-task-files) (dir org-gtd-folder)) (loop-while files (setq org-agenda-files (list (format "%s%s" org-gtd-folder (prog1 (car org-gtd-task-files) (setq org-gtd-task-files (cdr org-gtd-task-files))))))) (org-agenda nil "t") (print org-agenda-files))