greatbody
/
logseq
mirror of https://github.com/logseq/logseq
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fix scroll error

pull/645/head
Tienson Qin 2020-06-22 14:57:33 +08:00
parent 9e0f85498d
commit f8de28b127
2 changed files with 19 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
web/src/main/frontend/handler.cljs
View File

@ -536,7 +536,7 @@
[name path-params]
(case name
:home
"Journals"
"Logseq"
:repos
"Repos"
:repo-add

35
web/src/main/frontend/util.cljs
View File

@ -282,28 +282,29 @@
(+ (.. js/document -body -scrollTop) (.. js/document -documentElement -scrollTop)))
(defn element-top [elem top]
(if (.-offsetParent elem)
(let [client-top (or (.-clientTop elem) 0)
offset-top (.-offsetTop elem)]
(+ top client-top offset-top (element-top (.-offsetParent elem) top)))
top))
(when elem
(if (.-offsetParent elem)
(let [client-top (or (.-clientTop elem) 0)
offset-top (.-offsetTop elem)]
(+ top client-top offset-top (element-top (.-offsetParent elem) top)))
top)))
(defn scroll-to-element
[elem-id]
(when-not (re-find #"^/\d+$" elem-id)
(when elem-id
(let [elem (.getElementById js/document elem-id)
hop-count (/ speed moving-frequency)
doc-top (cur-doc-top)
gap (/ (- (element-top elem 0) doc-top) hop-count)
main (gdom/getElement "main-content")]
(doseq [i (range 1 (inc hop-count))]
(let [hop-top-pos (* gap i)
move-to (- hop-top-pos doc-top 68)
timeout (* moving-frequency i)]
(js/setTimeout (fn []
(.scrollTo main 0 move-to))
timeout)))))))
(when-let [elem (.getElementById js/document elem-id)]
(let [hop-count (/ speed moving-frequency)
doc-top (cur-doc-top)
gap (/ (- (element-top elem 0) doc-top) hop-count)
main (gdom/getElement "main-content")]
(doseq [i (range 1 (inc hop-count))]
(let [hop-top-pos (* gap i)
move-to (- hop-top-pos doc-top 68)
timeout (* moving-frequency i)]
(js/setTimeout (fn []
(.scrollTo main 0 move-to))
timeout))))))))
(defn scroll-to-top
[]