Use scrollIntoView instead of scrollMaxY
[eow] / setup.lisp
index a3f5d90cf7a95dbf47deeda6599ec73d8f505886..ec6ba21ff18f282853ef1c0a2ca0514b8d5eb082 100644 (file)
@@ -1,7 +1,12 @@
 (asdf:oos 'asdf:load-op "eow")
 (asdf:oos 'asdf:load-op "eow")
-(setf *webserver* (hunchentoot:start-server :port 4242))
+;(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*)
 ;; (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:*show-lisp-errors-p* t)
-(setf hunchentoot:*catch-errors-p* nil)
 (empire-web:start)
 (empire-web:start)
+;(setf *break-on-signals* 'error)
+;(setf *break-on-signals* nil)