Thanks, this is finally in the repository now. Sorry for the delay.
On Wed, Dec 15, 2010 at 12:07 PM, Nicolas Neuss neuss@kit.edu wrote:
Hello,
since some time I use a patch for DEFINE-EASY-HANDLER which makes it work correctly with multiple accessors (I hope). Here it is.
(I am not quite sure if it has not been corrected yet. The patch is against Hunchentoot-1.1.1 from Quicklisp.)
Thanks, Nicolas
--- easy-handlers.lisp~ 2010-11-30 10:34:27.000000000 +0100 +++ easy-handlers.lisp 2010-11-30 10:46:39.000000000 +0100 @@ -288,8 +288,11 @@ `(progn (setq *easy-handler-alist* (delete-if (lambda (list)
- (or (equal ,uri (first list))
- (eq ',name (third list))))
- (and (or (equal ,uri (first list))
- (eq ',name (third list)))
- (or (eq ,acceptor-names t)
- (intersection ,acceptor-names
- (second list)))))
*easy-handler-alist*)) (push (list ,uri ,acceptor-names ',name) *easy-handler-alist*))))) (defun ,name (&key ,@(loop for part in lambda-list
tbnl-devel site list tbnl-devel@common-lisp.net http://common-lisp.net/mailman/listinfo/tbnl-devel