From f898814f8156c0726d0bf8884718dff7612b082c Mon Sep 17 00:00:00 2001 From: Tim Date: Thu, 13 Feb 2025 19:43:26 +0100 Subject: New ui --- src/distractionless/ui/apps.cljd | 11 +++-------- 1 file changed, 3 insertions(+), 8 deletions(-) (limited to 'src/distractionless/ui/apps.cljd') diff --git a/src/distractionless/ui/apps.cljd b/src/distractionless/ui/apps.cljd index 7fd620c..02679ac 100644 --- a/src/distractionless/ui/apps.cljd +++ b/src/distractionless/ui/apps.cljd @@ -6,7 +6,7 @@ [distractionless.ui.apps.settings :as duasettings])) (defn load-installed-apps! [a] - (reset! a (await (apps/InstalledApps.getInstalledApps)))) + (reset! a (await (apps/InstalledApps.getInstalledApps false)))) (defn- render-app [app config-file ctx reloader] (m/ListTile @@ -15,12 +15,7 @@ .onTap #(do (await (apps/InstalledApps.startApp (.-packageName app))) nil) .onLongPress #(duasettings/open app config-file ctx reloader))) -(defn apps-list [apps query config-file ctx reloader] +(defn apps-list [apps config-file ctx reloader] (m/ListView - .children (for [app (if (cstr/blank? query) - apps - (filter #(cstr/includes? - (cstr/lower-case (.-name %)) - (cstr/lower-case query)) - apps))] + .children (for [app apps] (render-app app config-file ctx reloader)))) -- cgit v1.2.3