Org-mode: org-agenda files defvar directory "evaluation"？

Question

我的.emacs中有以下设置...

(defvar org-dir "/home/mash/read/org/")

并在周围使用它，例如...

(setq org-directory org-dir)
(setq org-default-notes-file (concat org-dir "mash.org"))

现在我知道您可以指定一个目录，例如...

(setq org-agenda-files '("/home/mash/read/org/"))

但是我该如何使用这个变量呢？

(setq org-agenda-files '(org-dir))
(setq org-agenda-files '(,(org-dir))

任何想法，因为我想在我的捕获模板中使用它也…

(setq org-capture-templates
  '(("t" "Test" entry (file+headline (concat org-dir "test.org" "test")
      "* %?")))

Answer 1

'(foo bar)语法等同于编写(list 'foo 'bar)。所以你可以像这样设置org-agenda-files：

(setq org-agenda-files (list org-dir))

或者，您可以将撇号'替换为反引号`以创建列表，然后使用逗号计算该列表的一部分

(setq org-capture-templates
  `(("t" "Test" entry (file+headline ,(concat org-dir "test.org" "test")
      "* %?")))