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

Question

Hunchentoot文档指出：

  

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

     

acceptor-document-root acceptor =＆gt; （或路径名为null）

     

（setf（acceptor-document-root acceptor）new-value）

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。