diff options
Diffstat (limited to 'src/distractionless/ui/apps/settings.cljd')
| -rw-r--r-- | src/distractionless/ui/apps/settings.cljd | 30 |
1 files changed, 15 insertions, 15 deletions
diff --git a/src/distractionless/ui/apps/settings.cljd b/src/distractionless/ui/apps/settings.cljd index 1b4de0a..c6d1c67 100644 --- a/src/distractionless/ui/apps/settings.cljd +++ b/src/distractionless/ui/apps/settings.cljd @@ -15,21 +15,21 @@ .iconSize 30.0)])) (defn- favourite-setting [app config-file reloader] - (m/Row - .children [(m/Checkbox - .value (contains? (get (dconfig/read-from-file config-file) "favourites") - (.-packageName app)) - .onChanged (fn [new-val] - (if new-val - (dconfig/update-config! config-file - #(update % "favourites" conj (.-packageName app)) - reloader) - (dconfig/update-config! config-file - (fn [config] - (update config "favourites" disj (.-packageName app))) - reloader))) - .activeColor duconstants/checkbox-active-color) - (m/Text "Favorit")])) + (m/CheckboxListTile + .title (m/Text "Favorit" + .style duconstants/text-style) + .value (contains? (get (dconfig/read-from-file config-file) "favourites") + (.-packageName app)) + .onChanged (fn [new-val] + (if new-val + (dconfig/update-config! config-file + #(update % "favourites" conj (.-packageName app)) + reloader) + (dconfig/update-config! config-file + (fn [config] + (update config "favourites" disj (.-packageName app))) + reloader))) + .activeColor duconstants/checkbox-active-color)) (defn open [app config-file ctx reloader] (m/showDialog |