       {:name (make-name name)
        :id (make-id name)
        :value value}]))
-
-(defelem file-upload
-  "Creates a file upload input."
-  [name]
-  (input-field* "file" name nil))
 
 (defelem label
   "Creates a label for an input field with the supplied name."

                 datetime
                 datetime-local
                 email
                 hidden
                 month
                 number


(gen-input-fields)

(def file-upload file-field)

(defelem check-box
  "Creates a check box."
  ([name] (check-box name nil))
