|
|
@@ -572,22 +572,19 @@
|
|
|
["Subscript" l]
|
|
|
(->elem :sub (map-inline config l))
|
|
|
["Tag" s]
|
|
|
- (if (and s (util/tag-valid? s))
|
|
|
- [:a.tag {:data-ref s
|
|
|
- :href (rfe/href :page {:name s})
|
|
|
- :on-click (fn [e]
|
|
|
- (let [repo (state/get-current-repo)
|
|
|
- page (db/pull repo '[*] [:page/name (string/lower-case (util/url-decode s))])]
|
|
|
- (when (gobj/get e "shiftKey")
|
|
|
- (state/sidebar-add-block!
|
|
|
- repo
|
|
|
- (:db/id page)
|
|
|
- :page
|
|
|
- {:page page})
|
|
|
- (.preventDefault e))))}
|
|
|
- (str "#" s)]
|
|
|
- [:span.warning.mr-1 {:title "Invalid tag, tags only accept alphanumeric characters, \"-\", \"_\", \"@\" and \"%\"."}
|
|
|
- (str "#" s)])
|
|
|
+ [:a.tag {:data-ref s
|
|
|
+ :href (rfe/href :page {:name s})
|
|
|
+ :on-click (fn [e]
|
|
|
+ (let [repo (state/get-current-repo)
|
|
|
+ page (db/pull repo '[*] [:page/name (string/lower-case (util/url-decode s))])]
|
|
|
+ (when (gobj/get e "shiftKey")
|
|
|
+ (state/sidebar-add-block!
|
|
|
+ repo
|
|
|
+ (:db/id page)
|
|
|
+ :page
|
|
|
+ {:page page})
|
|
|
+ (.preventDefault e))))}
|
|
|
+ (str "#" s)]
|
|
|
["Emphasis" [[kind] data]]
|
|
|
(let [elem (case kind
|
|
|
"Bold" :b
|