动态更改org-agenda export中的文件名

Question

我想根据当前日期将议程视图导出到具有唯一名称的单独文件中。基于此示例代码：

(setq org-agenda-custom-commands
    '(("X" agenda "" nil ("agenda.ps")))
)

最后一个参数是文件名，所以我想我可以放入concat函数的输出，例如：

(setq org-agenda-custom-commands
    '(("X" agenda "" nil (concat (format-time-string "%Y-%m-%d") "-agenda.html")))
)

不幸的是，这种方法失败了，因为解释器从字面上获取concat，并且没有生成字符串(预期的数据类型)。我对LISP不是很熟悉，所以非常感谢您的帮助。

Answer 1

首先，最后一个参数不是文件名，而是一个名称列表，因此必须添加一些额外的括号。

正如您已经注意到的，由于该函数不计算列表的值，所以除了最后一个元素(concat quote )之外，您不想计算它也没什么问题。为此，您可以使用backquote

(setq org-agenda-custom-commands
    `(("X" agenda "" nil (,(concat (format-time-string "%Y-%m-%d") "-agenda.html"))))
)

顺便说一下，我不是org-mode的专家，我只是在回答你提出的问题，但我有一种感觉，可以用一种更简单的方式实现你的目标。不知道是如何实现的，但也许您可以深入研究一下org-mode的文档，或许您会发现一些有趣的东西。