Removes old login page, more progress on transactions

This commit is contained in:
2025-03-10 14:09:45 -07:00
parent 8429d8516c
commit 7373ef41d1
16 changed files with 270 additions and 137 deletions

View File

@@ -1,15 +1,18 @@
(ns auto-ap.routes.auth
(:require
[auto-ap.datomic.users :as users]
[auto-ap.logging :as alog]
[auto-ap.session-version :as session-version]
[auto-ap.routes.dashboard :as dashboard]
[auto-ap.ssr-routes :as ssr-routes]
[bidi.bidi :as bidi]
[buddy.sign.jwt :as jwt]
[clj-http.client :as http]
[clj-time.core :as time]
[auto-ap.logging :as alog]
[config.core :refer [env]]
[com.brunobonacci.mulog :as mu]
[clojure.java.io :as io]
[clojure.edn :as edn]
[auto-ap.session-version :as session-version]))
[clojure.java.io :as io]
[com.brunobonacci.mulog :as mu]
[config.core :refer [env]]))
(def google-client-id "264081895820-0nndcfo3pbtqf30sro82vgq5r27h8736.apps.googleusercontent.com")
(def google-client-secret "OC-WemHurPXYpuIw5cT-B90g")
@@ -91,7 +94,9 @@
(if-let [jwt (user->jwt user token)]
{:status 301
:headers {"Location" (str (or (not-empty state) "/") "?jwt="
:headers {"Location" (str (or (not-empty state)
(bidi/path-for ssr-routes/only-routes
::dashboard/page)) "?jwt="
(jwt/sign jwt
(:jwt-secret env)
{:alg :hs512}))}