组织模式:org-agenda-files defvar目录“评估”?

时间:2013-06-10 08:53:24

标签: lisp elisp org-mode

我的.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")
      "* %?")))

1 个答案:

答案 0 :(得分: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")
      "* %?")))