自定义 query 的显示结果


上图是我自定义的 query 查询结果,代码如下

  {:title "Recent Tasks"
    :query [:find (pull ?b [*])
            :in $ ?start ?today
            :where
            (task ?b #{"TODO" "DOING" "DONE"})
            (between ?b ?start ?today)]
   :view (fn [rows] [:table
        [:thead [:tr  [:th "block"] [:th "marker"] [:th "date"]]]
        [:tbody (for [r rows :let [mark (str (get r :block/marker))]]
        	[:tr
                
         		[:td (str mark)]
             	[:td [:a {:href (str "#/page/" (get r :block/uuid))}  (str (get (get r :block/page) :block/original-name))]]
       		])
        ]])
    :inputs [:30d :today]
    :collapsed? false}
#+END_QUERY

下图是删去 view 字段,直接查询的结果,这个结果大家应该也都熟悉,block 加 time 两列


我的问题就是如何能把普通查询的 block 字段放到图一的 block 中

我尝试设置 [:td b] 但是查询结果会直接变成图二的样子,大家有没有什么解决办法