fix: quick input()will clear the current block

This commit is contained in:
Tienson Qin
2021-06-15 19:36:00 +08:00
parent 0e31cdd8bd
commit 3c0d65de0c

View File

@@ -2560,22 +2560,28 @@
value (gobj/get input "value")
c (util/nth-safe value (dec current-pos))]
(when-not (state/get-editor-show-input)
(when (and (or (= k "[") (= k "【"))
(> current-pos 0)
(= "【" (util/nth-safe value (dec (dec current-pos)))))
(when (and (= "【" c (util/nth-safe value (dec (dec current-pos))))
(> current-pos 0))
(commands/handle-step [:editor/input "[[]]" {:last-pattern "【【"
:backward-pos 2}])
(commands/handle-step [:editor/search-page])
(reset! commands/*slash-caret-pos (cursor/get-caret-pos input)))
(when (and (or (= k "(") (= k ""))
(> current-pos 0)
(= "" (util/nth-safe value (dec (dec current-pos)))))
(when (and (= "" c (util/nth-safe value (dec (dec current-pos))))
(> current-pos 0))
(commands/handle-step [:editor/input "(())" {:last-pattern ""
:backward-pos 2}])
(commands/handle-step [:editor/search-block :reference])
(reset! commands/*slash-caret-pos (cursor/get-caret-pos input)))
(when (and (= "〈" c)
(= "《" (util/nth-safe value (dec (dec current-pos))))
(> current-pos 0))
(commands/handle-step [:editor/input "<" {:last-pattern "《〈"
:backward-pos 0}])
(reset! commands/*angle-bracket-caret-pos (cursor/get-caret-pos input))
(reset! commands/*show-block-commands true))
(when (= c " ")
(when (or (= (util/nth-safe value (dec (dec current-pos))) "#")
(not (state/get-editor-show-page-search?))