v1
ui
code
(ns radar-v1
(:require
[reagent.core :as r]
[datascript.core :as d]
[roam.datascript.reactive :as dr]
[clojure.pprint :as pp]))
(defn get-pages []
"Gets all pages"
(flatten @(dr/q '[:find (pull ?e [:node/title
:edit/time
:create/time])
:where [?e :node/title] ]))
)
(defn main [{:keys [block-uid]} & args]
;;(pp/pprint (take 1 (sorted-set-by :create/time (get-pages))) )
(pp/pprint "done")
[:div ]
)
v2
ui
code
(ns radar-v2
(:require
[reagent.core :as r]
[datascript.core :as d]
[roam.datascript.reactive :as dr]
[clojure.pprint :as pp]))
(defn main [{:keys [block-uid]} & args]
)