fix: click search result doesn't scroll to the corresponding block

pull/1736/head
Tienson Qin 2021-04-29 22:21:46 +08:00
parent 6d4c97a1b7
commit 53ba28ae89
1 changed files with 2 additions and 23 deletions

View File

@ -32,7 +32,8 @@
(-write writer (str "\"" (.toString sym) "\"")))))
#?(:cljs (defonce ^js node-path nodePath))
#?(:cljs (defn app-scroll-container-node [] js/document.documentElement))
#?(:cljs (defn app-scroll-container-node []
(gdom/getElement "left-container")))
#?(:cljs
(defn ios?
@ -350,28 +351,6 @@
(let [fragment (get-fragment)]
(str "#" fragment "?anchor=" anchor))))
;; (defn scroll-into-view
;; [element]
;; (let [scroll-top (gobj/get element "offsetTop")
;; scroll-top (if (zero? scroll-top)
;; (-> (gobj/get element "parentElement")
;; (gobj/get "offsetTop"))
;; scroll-top)]
;; (prn {:scroll-top scroll-top})
;; (when-let [main (gdom/getElement "main-content")]
;; (prn {:main main})
;; (.scroll main #js {:top scroll-top
;; ;; :behavior "smooth"
;; }))))
;; (defn scroll-to-element
;; [fragment]
;; (when fragment
;; (prn {:fragment fragment})
;; (when-not (string/blank? fragment)
;; (when-let [element (gdom/getElement fragment)]
;; (scroll-into-view element)))))
(def speed 500)
(def moving-frequency 15)