为什么在这种情况下 `assoc' return nil？

Question

我正在尝试为 Emacs 组织模式编写导出后端。此模式源自 ox-latex.el Exporter。我希望导出器将所有 *.css 和 *.js 文件嵌入到生成的 .html 文件中。

Exporter 运行但没有在我的函数中给出任何输出，因为这个

assoc(t (("readthedocs" ("css" "htmlize.css" "readtheorg.css") ("js" "readtheorg.js" "jquery.js" "bootstrap.js"))))

call（来自调试器）returns nil。

我在这里错过了什么？

任何帮助表示感谢:)完整代码可以在这里找到https://pastebin.com/N475Uk9Z

编辑：

(defconst org-static-html-themes
  '(("readthedocs" . (("css" . ("htmlize.css"
                                "readtheorg.css"))
                      ("js" . ("readtheorg.js"
                               "jquery.js"
                               "bootstrap.js"))))))

(defun org-static-html--build-head (info)
  "Return information for the <head>..</head> of the HTML output.
INFO is a plist used as a communication channel."
  (progn
    (debug)

    (org-element-normalize-string
     (concat
      (org-element-normalize-string (plist-get info :html-head))
      (org-element-normalize-string (plist-get info :html-head-extra))
      (org-element-normalize-string
       (mapconcat (lambda (css)
                    (org-static-html-inline-css
                     (concat org-static-html-resource-path "/css/" css)))
                  (cdr (assoc "css"
                              (assoc
                               (plist-get info :static-html-theme)
                               org-static-html-themes))) "\n"))))))

此函数应该获取与相应主题关联的所有 css 文件，然后 return 连接并包装在样式标签中。

我应该说我使用的是 Emacs 版本 27.0.50。

Answer 1

您的关联列表仅包含一个关联：介于 "readthedocs" 和 (("css" "htmlize.css" "readtheorg.css") ("js" "readtheorg.js" "jquery.js" "bootstrap.js")) 之间。由于没有任何内容与 t、(assoc t ...) returns nil.

为什么在这种情况下 `assoc' return nil？

Why does `assoc' return nil in this case?

elisp

org-mode