Add a game state log dumping facility that produces a (load)able sexpr-log.

[eow] / setup.lisp

diff --git a/setup.lisp b/setup.lisp
index 2dc29d662ee0f13ca9bb73f40f6a627f4b6bbf4e..ee5bacec6c95ea37bca5b6c843c49f3dde3e1fba 100644 (file)
--- a/setup.lisp
+++ b/setup.lisp
@@ -1,9 +1,9 @@
-;(asdf:oos 'asdf:load-op "eow")
-(mb:load "eow")
-(setf hunchentoot:*message-log-pathname* "/tmp/hunchentoot-message.log")
-(setf hunchentoot:*access-log-pathname* "/tmp/hunchentoot-access.log")
+(asdf:oos 'asdf:load-op "eow")
+;(mb:load "eow")
+;(setf hunchentoot:*message-log-pathname* "/tmp/hunchentoot-message.log")
+;(setf hunchentoot:*access-log-pathname* "/tmp/hunchentoot-access.log")

 (setf *webserver*
 (setf *webserver*

-      (hunchentoot:start (make-instance 'hunchentoot:acceptor :port 4242)))
+      (hunchentoot:start (make-instance 'hunchentoot:easy-acceptor :port 4242)))

 ;; (hunchentoot:stop-server *webserver*)
 ;(setf hunchentoot:*show-lisp-backtraces-p* t)
 (setf hunchentoot:*show-lisp-errors-p* t)
 ;; (hunchentoot:stop-server *webserver*)
 ;(setf hunchentoot:*show-lisp-backtraces-p* t)
 (setf hunchentoot:*show-lisp-errors-p* t)