fix: wrong cross boundary due to caret_pos bug

This commit is contained in:
Weihua Lu
2021-06-09 11:48:19 +08:00
committed by Tienson Qin
parent 237f4d9e1a
commit 5b119ea990
2 changed files with 38 additions and 13 deletions

View File

@@ -2249,7 +2249,6 @@
(defn keydown-up-down-handler
[direction]
(let [input (state/get-input)
line-height (util/get-textarea-line-height input)
selected-start (.-selectionStart input)
selected-end (.-selectionEnd input)
up? (= direction :up)
@@ -2260,8 +2259,8 @@
(util/set-caret-pos! input selected-start)
(util/set-caret-pos! input selected-end))
(or (and up? (util/textarea-cursor-first-row? input line-height))
(and down? (util/textarea-cursor-end-row? input line-height)))
(or (and up? (cursor/textarea-cursor-first-row? input))
(and down? (cursor/textarea-cursor-last-row? input)))
(move-cross-boundrary-up-down direction)
:else