@@ -1,7 +1,10 @@
(ns frontend.debug
- (:require [cljs.pprint :as pprint]))
+ (:require [cljs.pprint :as pprint]
+ [frontend.config :as config]
+ [frontend.state :as state]))
(defn pprint
[& xs]
- (doseq [x xs]
- (pprint/pprint x)))
+ (when (or config/dev? (state/developer-mode?))
+ (doseq [x xs]
+ (pprint/pprint x))))
@@ -1026,6 +1026,10 @@
(set-state! :ui/developer-mode? value)
(storage/set "developer-mode" (str value)))
+(defn developer-mode?
+ []
+ (:ui/developer-mode? @state))
+
(defn get-notification-contents
[]
(get @state :notification/contents))