X-Git-Url: http://git.pond.sub.org/?p=eow;a=blobdiff_plain;f=setup.lisp;h=6d9e6a9edeb426ae348ac1487139bc43a385c0f8;hp=a3f5d90cf7a95dbf47deeda6599ec73d8f505886;hb=5d9cd96defbb48b12f4a2ba528ec41c7286e1a32;hpb=58c69aa5c7a9fceb42e36c9ab8d901c7cf66f643;ds=sidebyside

diff --git a/setup.lisp b/setup.lisp
index a3f5d90..6d9e6a9 100644
--- a/setup.lisp
+++ b/setup.lisp
@@ -1,7 +1,9 @@
-(asdf:oos 'asdf:load-op "eow")
-(setf *webserver* (hunchentoot:start-server :port 4242))
+(mb:load "eow")
+(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-backtraces-p* t)
 (setf hunchentoot:*show-lisp-errors-p* t)
-(setf hunchentoot:*catch-errors-p* nil)
 (empire-web:start)
+;(setf *break-on-signals* 'error)
+;(setf *break-on-signals* nil)