[hunchentoot-devel] Bugreport (and patch)

Hello, during some moderate WebDAV conformance tests is stumbled over the following bug/typo: --- handlers.lisp 2007-04-18 02:29:07.000000000 +0200 +++ /LISP/ediware/cl-webdav/handlers.lisp 2007-05-19 17:05:45.000000000 +0200 @@ -314,7 +314,7 @@ (let ((resource (get-resource))) (when (resource-exists resource) (setf (header-out :allow) - (format nil "~{~A~^~, ~}" + (format nil "~{~A~^, ~}" (set-difference *allowed-methods* '(:get :head :mkcol)))) (method-not-allowed)) (let ((parent (resource-parent resource))) MKCOL on an existing resource created an 500 status instead of the expected 405. Cheers, RalfD