3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-05-15 04:36:37 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Add the ability to check roles to openid integration.

Browse source
This commit is contained in:
Andrey Antukh 2021-04-16 13:07:41 +02:00 • committed by Andrés Moya
parent 465a25145d
commit 2828ccda7f
5 changed files with 93 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

19
frontend/src/app/util/i18n.cljs
View file

@ -29,8 +29,7 @@
(defn- parse-locale
[locale]
(let [locale (-> (.-language globals/navigator)
(str/lower)
(let [locale (-> (str/lower locale)
(str/replace "-" "_"))]
(cond-> [locale]
(str/includes? locale "_")
@ -66,11 +65,17 @@
(set! translations data))
(defn set-locale!
[lang]
(if lang
(do
(swap! storage assoc ::locale lang)
(reset! locale lang))
[lname]
(if lname
(let [supported (into #{} (map :value supported-locales))
lname (loop [locales (seq (parse-locale lname))]
(if-let [locale (first locales)]
(if (contains? supported locale)
locale
(recur (rest locales)))
cfg/default-language))]
(swap! storage assoc ::locale lname)
(reset! locale lname))
(do
(swap! storage dissoc ::locale)
(reset! locale (autodetect)))))