refactor(tabs): simplify max-main-tabs function and update usages

This commit is contained in:
charlie
2026-05-22 12:49:26 +08:00
parent 37d878e6de
commit f5050e99e4
3 changed files with 6 additions and 5 deletions

View File

@@ -273,14 +273,14 @@
(mobile-tabs/selected-tab-ids
(storage/get :ls-mobile-tabs)
{:flashcards? (state/enable-flashcards?)}
(mobile-tabs/max-main-tabs (mobile-util/native-iphone?))))
(mobile-tabs/max-main-tabs)))
(defn configure
[]
(let [tabs (->> (mobile-tabs/tab-configs
(storage/get :ls-mobile-tabs)
{:flashcards? (state/enable-flashcards?)}
(mobile-tabs/max-main-tabs (mobile-util/native-iphone?)))
(mobile-tabs/max-main-tabs))
(mapv translated-tab))]
(configure-tabs
(cond-> tabs

View File

@@ -173,7 +173,7 @@
(let [[custom-tab-ids set-custom-tab-ids!] (hooks/use-state
(storage/get :ls-mobile-tabs))
features {:flashcards? (state/enable-flashcards?)}
max-tabs (mobile-tabs/max-main-tabs (mobile-util/native-iphone?))
max-tabs (mobile-tabs/max-main-tabs)
selected-tab-ids (mobile-tabs/selected-tab-ids custom-tab-ids features max-tabs)
selected-tab-id-set (set selected-tab-ids)
available-tabs (mobile-tabs/available-tabs features)

View File

@@ -29,8 +29,9 @@
(def required-tab-id "home")
(defn max-main-tabs
[native-iphone?]
(if native-iphone? 4 5))
"Maximum number of configurable main tabs shown across mobile platforms."
[]
4)
(defn available-tabs
[{:keys [flashcards?]}]