lisp - 组织模式:org-agenda-files defvar 目录 "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")
      "* %?")))