subclass UCW's form classes in the editor layer.
[clinton/lisp-on-lines.git] / src / presentations.lisp
index 901548a..b463210 100644 (file)
 (defmethod find-default-criteria (c mewa-string-slot-presentation)
   'string-contains)
 
-
-
 (defmethod render-criteria ((res response) (s mewa-presentation-search))
   (setf (criteria-input s) "")
   (<:ul