|
|
@@ -124,6 +124,11 @@
|
|
|
(dom/remove! el-style))
|
|
|
(add-style-if-exists!))
|
|
|
|
|
|
+(defn set-file-graph-flag!
|
|
|
+ [file-graph?]
|
|
|
+ (apply (if file-graph? dom/add-class! dom/remove-class!)
|
|
|
+ [js/document.documentElement "is-file-graph"]))
|
|
|
+
|
|
|
(def *js-execed (atom #{}))
|
|
|
|
|
|
(defn exec-js-if-exists-&-allowed!
|