Re: [hunchentoot-devel] Accessor Function for Form Fields

Hi-- I had something like: (defmacro with-parameters (parameters &body body) `(let ,(mapcar (lambda (p) `(,p (hunchentoot:parameter ,(string-downcase (symbol-name p))))) parameters) ,@body)) (macroexpand-1 '(with-parameters (id title description) (format t "Id is ~A, title ~A, desc, ~A" id title description))) (LET ((ID (HUNCHENTOOT:PARAMETER "id")) (TITLE (HUNCHENTOOT:PARAMETER "title")) (DESCRIPTION (HUNCHENTOOT:PARAMETER "description"))) (FORMAT T "Id is ~A, title ~A, desc, ~A" ID TITLE DESCRIPTION)) regards T