[hunchentoot-devel] Bugreport (and patch)

[Ralf Mattes]

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