add viewport offset case .

zxhycxq · Nov 2, 2020 · 7c8c7aa · 7c8c7aa
1 parent e5da5a7
commit 7c8c7aa
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/main/frontend/ui.cljs b/src/main/frontend/ui.cljs
@@ -209,7 +209,7 @@
             type "resize"
             handler
             (fn []
-              (let [vh (.-height viewport)
+              (let [vh (+ (.-offsetTop viewport) (.-height viewport))
                     rule (.. sheet -rules (item 0))
                     set-top #(set! (.. rule -style -top) (str % "px"))]
                 (set-top vh)