Elisp,alist和弦乐;类型混乱

时间:2012-02-26 00:15:52

标签: emacs elisp org-mode

我正在尝试将组织项目发布为html,并使用以下组织项目定义自动完成任务:

(defconst home (file-name-directory (or load-file-name buffer-file-name)))

(require 'org-publish)
(setq org-publish-project-alist
      '(
        ;; add all the components here
        ;; *notes* - publishes org files to html
        ("org-notes"
         :base-directory (concat home "org/")
         :base-extension "org"  ; Filename suffix without dot
         :publishing-directory (concat home "../public_html/")
         :recursive t           ; includes subdirectories
         :publishing-function org-publish-org-to-html
         :headline-levels 4             ; Just the default for this project.
         :auto-preamble t
         :auto-sitemap t                ; generate automagically
         :sitemap-filename "sitemap.org"
         :sitemap-title "Sitemap"
         )

        ;; *static* - copies files to directories
        ("org-static"
         :base-directory (concat home "org/")
         :base-extension "css\\|js\\|png\\|jpg\\|gif\\|pdf\\|mp3\\|ogg\\|swf"
         :publishing-directory (concat home "../public_html/")
         :recursive t
         :publishing-function org-publish-attachment
         )

        ;; *publish* with M-x org-publish-project RET emacsclub RET
        ("emacsclub" :components ("org-notes" "org-static"))
        ))

但是,在导出项目时,我收到错误

  

错误的类型参数:stringp,(concat home“org”)

从Elisp的角度来看,到底发生了什么? concat的输出不是字符串吗?在哪种情况下,为什么会失败?我用concat参数自己尝试 stringp ,它返回true。

我正在尝试完成的其他事情是在评估此文件时导出整个项目。我尝试过类似的东西     (命令执行org-publish-all) 但它也抱怨错误的类型论点。我可以用什么来完成这项工作?

1 个答案:

答案 0 :(得分:10)

问题是引用(setq org-publish-project-alist '(...))中的第二个参数意味着将不会评估该列表结构中的任何内容。换句话说,Emacs告诉你值(concat home "org")不是一个字符串:实际上它是一个包含三个元素的列表(如果被评估会给你一个字符串)。

一种可能的解决方法可能是使用“反引号”或“quasiquote”机制,这与quote'类似,但允许您使用{{选择性地拼接已评估的Lisp代码的位。 1}}和,。 (有关详细信息,请参阅“信息”手册中的,@)。因此,您可以将上面的代码更改为

(elisp)Backquote

请注意,在评估(setq org-publish-project-alist `( ; note ` instead of ' ("org-notes" ;; Note commas , in front of code to evaluate :base-directory ,(concat home "org/") :base-extension "org" :publishing-directory ,(concat home "../public_html/") .... 表单时,不会对未引用的部分进行评估并将其拼接到列表中:换句话说,如果您需要动态更改这些值,这将无法帮助您不同的项目目录。但是,既然你将(setq ...)定义为常数可能无关紧要?

PS:如果您需要更详细地了解home错误的来源,请尝试wrong-type-argument或评估M-x toggle-debug-on-error以获得详细的回溯。