當我使用lisp來建立我的網絡時出現錯誤

Question

當我編寫我的網頁時，我選擇使用通用的lisp來構建它。但我得到的只是一個網頁的源代碼。 但是，當我將網頁複製到我的emacs並重新打開時，它可以正常工作。我不知道什麼是錯的。

我在Lisp代碼是

(defmacro standard-page ((&key title) &body body) 

(with-html-output-to-string(*standard-output* nil :prologue t :indent t) 

(:html :xmlns "http://www.w3.org/1999/xhtml" 
    :xml\:lang "en" 
    :lang "en" 
    (:head 
    (:meta :http-equiv "Content-Type" :content "text/html;charset=utf-8") 
    (:title ,title) 
    (:link :type "text/css" :rel "stylesheet" :href "/site.css")) 
    (:body 
    ,@body)))) 

(hunchentoot:define-easy-handler (hello :uri "/hello") (name) 
    (setf (hunchentoot:content-type*) "text/plain") 
    (standard-page (:title "something new") 
      (:h1 "can i do this?"))) 

Answer 1

這看起來錯：

(setf (hunchentoot:content-type*) "text/plain") 

我認爲這應該是text/html而不是text/plain。