How to tell Hunchentoot where to find static web pages to serve?

Question

The Hunchentoot documentation states:

"The method for ACCEPTOR tries to serve a static file relative to it's ACCEPTOR-DOCUMENT-ROOT."

acceptor-document-root acceptor => (or pathname null)

(setf (acceptor-document-root acceptor ) new-value)

http://weitz.de/hunchentoot/

I am having trouble in translating this documentation into actual Lisp code.

Can someone please give me an example of how to tell Hunchentoot where to look for static web pages to serve?

Answer 1

Here is a snippet which serves a single static webpage:

(push (create-static-file-dispatcher-and-handler
       "/stylesheet.css" "~/projects/project-x/stylesheet.css")
      *dispatch-table*)

To make a whole folder available try create-folder-dispatcher-and-handler.

Answer 2

The simplest translation to code will be this:

(hunchentoot:start (make-instance 'hunchentoot:acceptor :port 4242
                                  :document-root #p"<path to static files dir>"))