-(asdf:oos 'asdf:load-op "eow")
-(hunchentoot:start-server :port 4242)
-(setf hunchentoot:*show-lisp-backtraces-p* t)
+(mb:load "eow")
+(setf hunchentoot:*message-log-pathname* "/tmp/hunchentoot-message.log")
+(setf hunchentoot:*access-log-pathname* "/tmp/hunchentoot-access.log")
+(setf *webserver*
+ (hunchentoot:start (make-instance 'hunchentoot:acceptor :port 4242)))
+;; (hunchentoot:stop-server *webserver*)
+;(setf hunchentoot:*show-lisp-backtraces-p* t)
(setf hunchentoot:*show-lisp-errors-p* t)
(empire-web:start)
+;(setf *break-on-signals* 'error)
+;(setf *break-on-signals* nil)