Getting started on unit tests
[eow] / setup.lisp
index 6d9e6a9edeb426ae348ac1487139bc43a385c0f8..ec6ba21ff18f282853ef1c0a2ca0514b8d5eb082 100644 (file)
@@ -1,4 +1,7 @@
-(mb:load "eow")
+(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*
       (hunchentoot:start (make-instance 'hunchentoot:acceptor :port 4242)))
 ;; (hunchentoot:stop-server *webserver*)
 (setf *webserver*
       (hunchentoot:start (make-instance 'hunchentoot:acceptor :port 4242)))
 ;; (hunchentoot:stop-server *webserver*)