[Lispweb] Araneida static-file-handler patch
Brian Campbell
lambda at mac.com
Thu May 12 15:11:58 CDT 2005
The static-file-handler in Araneida doesn't unescape URLs, so it
can't deal with file names with spaces in them. Here's a patch.
Index: static-file-handler.lisp
===================================================================
RCS file: /cvs/araneida/static-file-handler.lisp,v
retrieving revision 1.14
diff -u -r1.14 static-file-handler.lisp
--- static-file-handler.lisp 24 May 2004 20:19:27 -0000 1.14
+++ static-file-handler.lisp 12 May 2005 19:48:41 -0000
@@ -77,7 +77,7 @@
nil "/"))
if (string-equal (car p) "..")
do (setf p (cdr p))
- else collect (car p) into v
+ else collect (urlstring-unescape (car p))
into v
finally (return (nreverse v)))))
(name (let ((n (car (last path))))
(if (> (length n) 0) n nil)))
More information about the lispweb
mailing list