1. Steve Losh
  2. newseasons

Commits

Steve Losh  committed 77f9ac5

Clean up a bit.

  • Participants
  • Parent commits d6f1f9d
  • Branches default

Comments (0)

Files changed (2)

File resources/public/css/style.less

View file
-// Mixins
+// Nick Sergeant Mixins
 .border-radius(@radius: 5px) {
     -webkit-background-clip: padding-box;
     -webkit-border-radius: @radius;

File src/newseasons/views/main.clj

View file
 
 ; Utils -----------------------------------------------------------------------
 (def email-regex #"[a-zA-Z0-9._+-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,4}")
-(def none-are (comp not some))
 (defn all-are [pred coll]
   (= (count coll)
      (count (filter pred coll))))
      (do ~@body)))
 
 (defn check-login [{:keys [email password]}]
-  (if-not (none-are empty? [email password])
+  (if (some empty? [email password])
     (flash! "Both fields are required.  This really shouldn't be difficult.")
     (if-not (re-find email-regex email)
       (flash! "That's not an email address!")