--- misc.lisp 2008-12-05 02:22:56.000000000 +0200 +++ misc.lisp.old 2008-12-05 02:24:25.000000000 +0200 @@ -152,8 +152,7 @@ :element-type 'octet :if-does-not-exist nil) (setf (header-out "Last-Modified") (rfc-1123-date time) - (content-length) (file-length file) - (header-out "Content-disposition") (format nil "attachement; filename=\"~a\"" (file-namestring path))) + (content-length) (file-length file)) (let ((out (send-headers))) #+:clisp (setf (flexi-stream-element-type *hunchentoot-stream*) 'octet)