diff options
| author | Tim <contact@bytim.eu> | 2025-06-06 19:01:26 +0200 |
|---|---|---|
| committer | Tim <contact@bytim.eu> | 2025-06-06 19:01:26 +0200 |
| commit | ef29e1cde2265dfd26a276e6e75b5733981fefa7 (patch) | |
| tree | 0596518302383c1178f98d2f9d0fb92af273dbe1 /src/distractionless/core.cljd | |
| parent | aca895de6901c01a7eeacaacc1d7f226d7c5e84e (diff) | |
| download | distractionless-ef29e1cde2265dfd26a276e6e75b5733981fefa7.tar.xz distractionless-ef29e1cde2265dfd26a276e6e75b5733981fefa7.zip | |
Diffstat (limited to 'src/distractionless/core.cljd')
| -rw-r--r-- | src/distractionless/core.cljd | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/src/distractionless/core.cljd b/src/distractionless/core.cljd index f40e4cd..f8c0929 100644 --- a/src/distractionless/core.cljd +++ b/src/distractionless/core.cljd @@ -23,8 +23,7 @@ query (atom "") :as *query data-dir (await (path-provider/getApplicationDocumentsDirectory)) _ (atom 0) :as reloader - show-all-apps? (atom false) :as *show-all-apps? - app-in-queue (atom nil) :as *app-in-queue] + show-all-apps? (atom false) :as *show-all-apps?] :managed [_ (duapps/load-installed-apps! *apps) ; loads apps on app startup config-file (io/File. (str (.-path data-dir) "/config.edn")) _ (dconfig/init-config! config-file nil) ; Init config on app startup @@ -70,14 +69,11 @@ (cstr/lower-case query)) show-all-apps? (fn [_] true) :else #(.contains favourites (.-packageName %))) apps) - config-file ctx reloader *app-in-queue)) + config-file ctx reloader)) (when (not (cstr/blank? query)) (m/ListTile .title (m/Text (str "Nach \"" query "\" im Internet suchen") .style duconstants/text-style) .onTap #(do (await (url-launcher-str/launchUrlString (str "https://google.com/search?q=" (cstr/replace query " " "+")) .mode url-launcher/LaunchMode.externalApplication)) - nil))) - (when (some? app-in-queue) - (m/Text (str "Starte gleich " (.-name app-in-queue) "...") - .style duconstants/text-style))])))))) + nil)))])))))) |