Another approach is to add an dispachtable slot to an customized acceptor class (as it was before Hunchentoot version 1.0): (in-package :hunchentoot) (defun pre1-list-request-dispatcher (request) (loop for dispatcher in (acceptor-dispatch-table *acceptor*) for action = (funcall dispatcher request) when action return (funcall action) finally (setf (return-code *reply*) +http-not-found+))) (defclass pre1-acceptor (acceptor) ((pre1-dispatch-table :initarg :dispatch-table :accessor acceptor-dispatch-table)) (:default-initargs :request-dispatcher #'pre1-list-request-dispatcher :dispatch-table nil)) ;; (setf *myserver1* (make-instance 'pre1-acceptor :port 42001)) ;; (setf (acceptor-dispatch-table *myserver1*) (list (create-prefix- dispatcher "/mypage1.html" #'mypage1)))