aboutsummaryrefslogtreecommitdiff
path: root/src/genpass/core.cljs
diff options
context:
space:
mode:
Diffstat (limited to 'src/genpass/core.cljs')
-rw-r--r--src/genpass/core.cljs20
1 files changed, 12 insertions, 8 deletions
diff --git a/src/genpass/core.cljs b/src/genpass/core.cljs
index e6b33ca..c65714f 100644
--- a/src/genpass/core.cljs
+++ b/src/genpass/core.cljs
@@ -1,15 +1,19 @@
(ns genpass.core
- (:require
- [reagent.core :as r]))
+ (:require
+ [reagent.core :as r]
+ [genpass.gen :refer [genpwd]]))
-;; -------------------------
-;; Views
+(def password (r/atom (genpwd)))
(defn home-page []
- [:div [:h2 "Welcome to Reagent"]])
-
-;; -------------------------
-;; Initialize app
+ [:div.columns>div.column
+ [:div.field>div.control>input.input.is-primary
+ {:type "text"
+ :value @password}]
+ [:div.field>div.control>input.button.is-primary
+ {:value "Generate"
+ :type "button"
+ :on-click #(reset! password (genpwd))}]])
(defn mount-root []
(r/render [home-page] (.getElementById js/document "app")))