fix: alias to tag a node

This commit is contained in:
Tienson Qin
2024-09-05 04:09:27 +08:00
parent 20b607f845
commit d0e04000f5
4 changed files with 37 additions and 23 deletions

View File

@@ -230,10 +230,12 @@
(ldb/whiteboard? entity)
"whiteboard"
:else
"page")]
"page")
title (title/block-unique-title page)
title' (if source-page (str title " -> alias: " (:block/title source-page)) title)]
(hash-map :icon icon
:icon-theme :gray
:text (title/block-unique-title page)
:text title'
:source-page (or source-page page))))
(defn- block-item