diff options
Diffstat (limited to 'src/distractionless/ui/apps/settings.cljd')
| -rw-r--r-- | src/distractionless/ui/apps/settings.cljd | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/distractionless/ui/apps/settings.cljd b/src/distractionless/ui/apps/settings.cljd index 8fa57ce..a2c1d4b 100644 --- a/src/distractionless/ui/apps/settings.cljd +++ b/src/distractionless/ui/apps/settings.cljd @@ -31,6 +31,10 @@ reloader))) .activeColor duconstants/checkbox-active-color)) +(defn countdown-setting-value [app config-file] + (get-in (dconfig/read-from-file config-file) + ["countdowns" (.-packageName app)] 0)) + (defn- countdown-setting [app config-file reloader] (m/Row .children [(m/Text "Countdown, bevor App öffnet (in Sekunden): " @@ -38,8 +42,7 @@ (m/Expanded .child (m/TextFormField .keyboardType m/TextInputType.number - .initialValue (str (get-in (dconfig/read-from-file config-file) - ["countdowns" (.-packageName app)] 0)) + .initialValue (str (countdown-setting-value app config-file)) .onChanged (fn [new-val] (dconfig/update-config! config-file #(update % "countdowns" |