Function: with-form-field-names

Source

(defun with-form-field-names (form-name values html)
  ;; what's the point of accumulating the fields of a form into one hash, as in RoR? 
  `(let (,@(mapcar (fn (value)
		    `(,value (strcat "(" ',form-name " " ',value ")")))
		  values))
     ,html))