diff options
Diffstat (limited to 'login.lisp')
| -rw-r--r-- | login.lisp | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/login.lisp b/login.lisp new file mode 100644 index 0000000..2e7c652 --- /dev/null +++ b/login.lisp @@ -0,0 +1,21 @@ +;;;; login.lisp + +(in-package :vampire) + +(defun login-page (body) + (with-clog-create body + (div () + (div () + (section (:h3 :content "LOGIN")) + (form () + (form-element (:text :bind name-input)) + (br ()) + (form-element (:password :bind pw-input)) + (br ()) + (button (:bind btn :content "Click here to log in")))) + (div () + (:p () + (:a (:link "/new-account" :content "Create an account"))))) + (setf (place-holder name-input) "Name" + (place-holder pw-input) "Password"))) + |