     (throw (Exception. (str "Value should be one of "
                             (string/join "|" (:enum-values flag)))))))
 
-(defn enum-serializer [value]
-  (str value))
-
 (defn define-enum
   "Registers a flag whose value can be any string from enum_values."
   [name default enum-values help & args]
   (apply define enum-parser name default  (or help "an enum value")
-         :serializer enum-serializer
          :enum-values enum-values
          args))
 

    *ns*))


(defn define-string
  "Registers a flag whose value can be any string."
  [name default help & args]
  (apply define string-parser name default help
         :serializer string-serializer
         args))



  [name default help & args]
  (apply define (make-multi-parser string-parser)
         name default help
         args))


