Skip to content

Instantly share code, notes, and snippets.

@fukamachi

fukamachi/gist:2514290

Created April 27, 2012 23:36
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 1 You must be signed in to fork a gist
  • Save fukamachi/2514290 to your computer and use it in GitHub Desktop.
Save fukamachi/2514290 to your computer and use it in GitHub Desktop.
Download ZIP
Clack uploading sample
Raw
gistfile1.lisp
(import 'clack.request:make-request 'clack.request:body-parameter)
(clack:clackup
#'(lambda (env)
(format t "~S~%"
(body-parameter (make-request env)))
'(200
(:content-type "text/html")
("<form method='POST' enctype='multipart/form-data'><input type='file' name='pdf'><input type='submit'></form>"))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment