Clojure 如何将hiccup作为列表/向量返回

我将一个hiccup向量传递给一个函数，该函数只是将它包裹在更多hiccup中，但它并没有像我预期的那样返回它

这里有一个例子来说明我的意思：

(defn wrap-fn 
  [input]
  [div.content-box
    [input]])

(defn main-fn 
  [vector-of-hiccup]
  (foreach [hiccup from vector-of-hiccup]
    (wrap-fn hiccup-from-list)))

如何实现上面的组合foreach循环

我尝试使用“apply”将换行fn应用于每个向量参数，但它只返回第一个换行的元素。我尝试过创建各种各样的循环，我也取得了类似的成功

---

我相信有办法做到这一点，请帮我找到一个有效的方法。

您需要这样的方法：

(defn wrap-fn
  [input]
  [:div.content-box
   [input]])  ; <= you may not want to wrap `input` in a vector.

(defn main-fn
  [vector-of-hiccup]
  (vec
    (for [item vector-of-hiccup]
      (wrap-fn item))))

（defn wrap fn
[输入]
[：div.content-box
[输入]]）<代码>（映射hiccup列表）

？您可能应该添加更多详细信息，包括所需的前/后行为示例，以获得更好的答案。