You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
hunchenhelpers/content-types.lisp

10 lines
334 B

(in-package #:hunchenhelpers)
;; We use `hunchentoot:defconstant' because it works on SBCL
#.`(progn
,@(loop for (name . code) in
'((@plain . "text/plain")
(@json . "application/json"))
collect `(tbnl::defconstant ,name ,code)
collect `(export (quote ,name))))