www2
index▾
nil
↻
edn
data
view
query
links
markdown
view
cljs
css
fiddle
edn
·
new▾
env
login
stage:
$ (default)
$ (default) transact!
query
pull
static
schema:
$ (default)
[:where ; Navigation is a tree of nav-items [?e :hyperblog.post/title] ; any titled entity (not [?e :hyperblog.post/tag :blog]) (not [_ :hyperblog.nav/children ?e]) ; that is not already inside one or more lists (not [_ :hyperblog.post/related ?e]) ; this is wrong, can relate a post in the nav imo :find ; Table of contents has <ol> semantics, except a tree [(pull ?e [:hyperblog.post/sort-index1 ; the list is sorted, not the content ? :hyperblog.post/title :hyperblog.post/published ; the content is published, not the list :hyperblog.post/hidden ; legacy? :fiddle/ident {:hyperblog.nav/children 1} ; Each nav-item has optional children (sub links) ;{:hyperblog.post/related 1} :db/id ]) ...]]
stage:
$ (default)
$ (default) transact!