(asdf:oos 'asdf:load-op "eow")
-(hunchentoot:start-server :port 4242)
+(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)
(empire-web:start)