From 2466dbc85ffdae792399f9f4fbff8ca60b66df29 Mon Sep 17 00:00:00 2001
From: bom <mattis.boeckle@meissa-gmbh.de>
Date: Mon, 14 Jun 2021 13:01:33 +0200
Subject: [PATCH] correct config and auth generate output

---
 src/main/cljs/dda/c4k_keycloak/browser.cljs | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/src/main/cljs/dda/c4k_keycloak/browser.cljs b/src/main/cljs/dda/c4k_keycloak/browser.cljs
index 7fb225d..57c5249 100644
--- a/src/main/cljs/dda/c4k_keycloak/browser.cljs
+++ b/src/main/cljs/dda/c4k_keycloak/browser.cljs
@@ -11,7 +11,7 @@
 
 (defn fqdn []
     (-> js/document
-      (.getElementById "fqdn")))
+        (.getElementById "fqdn")))
 
 (defn issuer []
   (-> js/document
@@ -38,8 +38,8 @@
     :issuer (issuer-from-document)})
 
 (defn auth-from-document []
-  (-> (auth)
-      (.-value)))
+  (edn/read-string (-> (auth)
+                       (.-value))))
 
 (defn set-output!
   [input]
@@ -83,8 +83,7 @@
   validation-result)
 
 (defn validate-auth! []
-  (let [auth-str (auth-from-document)
-        auth-map (edn/read-string auth-str)]
+  (let [auth-map (auth-from-document)]
     (if (s/valid? core/auth? auth-map)
       (set-auth-validation-result! "")
       (set-auth-validation-result!