          [:label {:for "checkbox1"} "Keep Me Signed in"]]
         [:input.btn-primary
          {:name "login"
+          :class (when-not submit-enabled? "btn-disabled")
+          :disabled (not submit-enabled?)
           :value "Continue"
           :type "submit"
           :on-click on-submit}]

;; Login
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defn- login-render
  [own local]
  (letfn [(on-submit []
            (rs/emit! (da/login {:username "cirilla"
                                 :password "secret"})))]
    (html
     [:div.login
      [:div.login-body

(ns uxbox.ui.auth
  (:require [sablono.core :as html :refer-macros [html]]
            [lentes.core :as l]
            [cuerdas.core :as str]
            [rum.core :as rum]
            [uxbox.router :as r]
            [uxbox.state :as s]
            [uxbox.rstore :as rs]
            [uxbox.data.auth :as da]
            [uxbox.util.dom :as dom]
            [uxbox.ui.icons :as i]
            [uxbox.ui.messages :as uum]
            [uxbox.ui.navigation :as nav]
