Merge branch 'main' into null-fn-hint

athensresearch · Oct 10, 2022 · 1a3f822 · 1a3f822
2 parents dac2bbe + f8b0fb1
commit 1a3f822
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/cljs/athens/util.cljs b/src/cljs/athens/util.cljs
@@ -264,21 +264,21 @@
   []
   (when config/debug?
     (let [el-10x (getElement "--re-frame-10x--")
-          display-10x (.. el-10x -style -display)]
+          display-10x (and el-10x (.. el-10x -style -display))]
       (not (= "none" display-10x)))))
 
 
 (defn open-10x
   []
   (when config/debug?
-    (let [el (js/document.querySelector "#--re-frame-10x--")]
+    (when-let [el (js/document.querySelector "#--re-frame-10x--")]
       (setProperties el (clj->js {"style" "display: block"})))))
 
 
 (defn hide-10x
   []
   (when config/debug?
-    (let [el (js/document.querySelector "#--re-frame-10x--")]
+    (when-let [el (js/document.querySelector "#--re-frame-10x--")]
       (setProperties el (clj->js {"style" "display: none"})))))