fix: can't read properties of null

This commit is contained in:
Tienson Qin
2022-09-01 12:11:55 +08:00
parent 2f5f84e9de
commit e7008b5387

View File

@@ -521,8 +521,8 @@
(str " page-property-key block-property"))
:data-ref page-name
:on-mouse-down (fn [e] (open-page-ref e page-name redirect-page-name page-name-in-block contents-page?))
:on-key-up (fn [e] ((when (= (.-key e) "Enter")
(open-page-ref e page-name redirect-page-name page-name-in-block contents-page?))))}
:on-key-up (fn [e] (when (and e (= (.-key e) "Enter"))
(open-page-ref e page-name redirect-page-name page-name-in-block contents-page?)))}
(if (and (coll? children) (seq children))
(for [child children]