Method: (GET-PARAMETER HTTPD-REQUEST T)

Source

(defmethod get-parameter ((request httpd-request) name)
  (let ((cons (assoc name (parameters request) :test #'string=)))
    (when cons
      (if (stringp (cdr cons))
          (copy-seq (cdr cons))
          (cdr cons)))))