🎉 New oops page with login and request access

This commit is contained in:
Pablo Alba 2024-06-27 11:00:31 +02:00
parent d2311f066a
commit 6169f5c2e8
46 changed files with 4117 additions and 134 deletions

View file

@ -13,6 +13,7 @@
[app.main.data.events :as ev]
[app.util.browser-history :as bhistory]
[app.util.dom :as dom]
[app.util.globals :as globals]
[app.util.timers :as ts]
[beicon.v2.core :as rx]
[goog.events :as e]
@ -143,6 +144,11 @@
(= (.-hostname location) (:host referrer)))
(nav-back))))
(defn nav-root
"Navigate to the root page."
[]
(set! (.-href globals/location) "/"))
;; --- History API
(defn initialize-history

View file

@ -44,3 +44,4 @@
(defonce storage (atom (load (ex/ignoring (unchecked-get g/global "localStorage")))))
(add-watch storage :persistence #(persist js/localStorage %3 %4))