enhance: preload more blocks

src/main/frontend/components/block.cljs

@@ -2800,7 +2800,7 @@
   (boolean
    (when ref
      (let [top (.-top (.getBoundingClientRect ref))]
-       (not (<= top (+ js/window.innerHeight 500)))))))
+       (not (<= top (+ js/window.innerHeight 1000)))))))
 
 (rum/defcs ^:large-vars/cleanup-todo block-container-inner < rum/reactive db-mixins/query
   (rum/local nil ::ref)

src/main/frontend/handler/common.cljs

@@ -84,5 +84,5 @@
                          (gobj/get "scrollTop")))
                     (reset! *scroll-timer (js/setTimeout
                                            (fn [] (state/set-state! :ui/scrolling? false)) 500)))
-        debounced-on-scroll (debounce on-scroll 50)]
+        debounced-on-scroll (debounce on-scroll 100)]
     (.addEventListener element "scroll" debounced-on-scroll false)))