如何告诉 Hunchentoot 在哪里可以找到要提供的静态网页？

Question

Hunchentoot 文档指出：

“ACCEPTOR 的方法尝试提供相对于其 ACCEPTOR-DOCUMENT-ROOT 的静态文件。”

acceptor-document-root 接受器 => （或路径名 null）

（setf（接受器-文档-根接受器）新值）

http://weitz.de/hunchentoot/

我在将此文档翻译成实际的 Lisp 代码时遇到了麻烦。

有人可以给我一个例子，告诉我如何告诉 Hunchentoot 在哪里寻找静态网页来提供服务吗？

Answer 1

最简单的代码翻译如下：

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

Answer 2

下面是一个提供单个静态网页的代码片段：

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

要使整个文件夹可用，请尝试 create-folder-dispatcher-and-handler。