遍历一个列表来查找数据，并构造一个字符串

如何解决遍历一个列表来查找数据，并构造一个字符串

Elisp 新手，寻求帮助。

我有这个变量：

(setq bibtex-completion-additional-search-fields '(tags keywords))

然后我有一个函数，如果设置了这个变量，那么需要遍历这些字段名称，并在数据记录中查找它们，将结果值连接成一个字符串，然后返回。

以下是数据的样子：

("2009-03-01 Zukin,Sharon and Trujillo,Valerie and Frase,Peter and Jackson,Danielle and Recuber,Tim and Walker,Abraham gentrification New Retail Capital and Neighborhood Change: Boutiques and Gentrification in New York City article zukin_new_2009"
 ("date" . "2009-03-01")
 ("author" . "Zukin,Abraham")
 ("tags" . "gentrification,retail")
 ("title" . "New {{Retail Capital}} and {{Neighborhood Change}}: {{Boutiques}} and {{Gentrification}} in {{New York City}}")
 ("=type=" . "article")
 ("=key=" . "zukin_new_2009"))

这就是我对 ATM 功能的理解，我知道这是错误的。但是我无法理解如何在 elisp 中执行此操作（我在 Python 和 Ruby 方面有更多经验）。

(defun bibtex-completion--get-extra-search-data (candidate)
  "Return extended search Metadata as string."
  (if bibtex-completion-additional-search-fields
      ; if the data is present,pull its value(s),join into a single string
      ; Todo FIX ME,this is wrong
      (format "%s" (cl-loop
                    for field in bibtex-completion-additional-search-fields
                    collect
                    (cdr (assoc field (cdr candidate)))
                    ))))

因此，对于上面的示例数据，该函数应返回该字符串“gentrification，retail”。如果该记录的关键字字段带有“foo”，则返回字符串将是“gentrification、retail、foo”（或者可能只是空格分隔；不确定是否重要）。

解决方法

首先，数据结构中的键是字符串，而不是符号。因此，您可以更改查找字段，

(setq bibtex-completion-additional-search-fields '("tags" "keywords"))

但是，在 car 数据结构中使用符号作为 candidate 可能更好（我相信效率方面）。

将列表加入字符串的规范elisp是 (mapconcat #'identity ...),

(mapconcat
 #'identity
 (delq nil
       (cl-loop for field in bibtex-completion-additional-search-fields
             collect (cdr (assoc field (cdr candidate)))))
 ",")