
Hello. I havent used hunchentoot for a while now, so I checked out the svn-repository on http://bknr.net/svn/ediware/ (I hope this is the correct one) and Installed the packages. The server seems to work, but unfortunately, the following code seems not to do: (defun http-seite () (with-html-output (out (send-headers)) (:html (:head (:title "Hallo-Welt-Seite")) (:body (:h1 "Hallo Welt"))))) (setf *dispatch-table* (list (create-prefix-dispatcher "/hallo-welt" 'http-seite))) (defvar *server* (start-server :port 8000)) When calling http://localhost:8000/hallo-welt, I only get an empty page. For any other URL, i get a "not found" error. When defining the function differently, returning a string, say (defun http-seite () (with-html-output-to-string (bla) (:html (:head (:title "Hallo-Welt-Seite")) (:body (:h1 "Hallo Welt"))))) the whole thing works. Also the more trivial functions (defun http-2 () (write-char #\A (send-headers))) and (defun http-2 () (write-char #\A (send-headers)) (finish-output (send-headers))) do not produce any output. I read the included documentation, but it seems like (send-headers) hasnt changed its meening according to it, and also the code doesnt say anything else. Any Ideas what I could be doing wrong? Greetings Christoph