                                       (inclusion-of :PasswordConfirm
                                                     :in #{(:Password @form)})
                                       (presence-of :FirstName)
-                                      (presence-of :LastName))
+                                      (presence-of :LastName)
+                                      (length-of   :Password :within (range 8 100)))
             errors                   (validator @form)]
         [:div.eight.wide.centered.column
          [:div.ui.segment

                                     inclusion-of
                                     numericality-of
                                     presence-of
                                     valid?
                                     validation-set]])
    (:require-macros [elevent-client.core :refer [endpoints]])

                        (when handler (handler json)))
                      (fn [json]
                        (when handler (handler json))
                        (when-not (= operation :create-no-read)
                          (dispatch! :read nil nil nil))))

                    :error-handler
                    (fn [error]
