在Luminus/Compojure中用map处理多个字段

Question

我有这个：

(defn my-page []
  (layout/render
   "page1.html" ({:articles (map
                             #(update % :field1 (fn [d] (something.... )))
                              (db/get-all-articles))})))
                            ; how can I call map again to process other fields?
                            ; (map for :field2 .... ???? how?)
                            ; (map for :field3 .... ???? how?)     

我还想对其他领域进行预处理。我怎么才能正确地做到这一点？我的意思是，既然我已经有了变量:文章和函数映射，那么对于其他字段，比如:field2 2和field3，如何再进行映射呢？

Answer 1

使用线程宏：

(def m {:field1 1
        :field2 2
        :field3 3})

(-> m
  (update :field1 (fn [v1] ...))
  (update :field2 (fn [v2] ...))
  (update :field3 (fn [v3] ...)))

相当于：

(update
  (update 
    (update m :field1 (fn [v1] ...))
    (fn [v2] ...))
  (fn [v3] ...))

您可以将这样的逻辑包含在一个函数中，并使用它来映射所有的文章。

Answer 2

您还可以简化这些更新：

user> (def items {:field1 1
                  :field2 2
                  :field3 3})
#'user/items
user> (reduce-kv update items {:field1 inc
                               :field2 dec
                               :field3 #(* % 2)})
{:field1 2, :field2 1, :field3 6}