Add mudballs definition

[eow] / setup.lisp

diff --git a/setup.lisp b/setup.lisp
index 9fe8ae92c743cf4a46820e071a5a43bc4336e4b2..5a161845c909e30a351e44732f4b00621c235068 100644 (file)
--- a/setup.lisp
+++ b/setup.lisp
@@ -1,5 +1,7 @@
-(asdf:oos 'asdf:load-op "eow")
-(hunchentoot:start-server :port 4242)
+(mb:load "eow")
+(setf *webserver* (hunchentoot:start-server :port 4242))
+;; (hunchentoot:stop-server *webserver*)

 (setf hunchentoot:*show-lisp-backtraces-p* t)
 (setf hunchentoot:*show-lisp-errors-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)
 (empire-web:start)