Stop generating access logs

4 years ago · 220e660c84
parent e8198bd1e4
commit 220e660c84
1 changed files with 3 additions and 1 deletions
--- a/src/main.lisp
+++ b/src/main.lisp
@ -6,7 +6,9 @@
  (set-flags)
  (defvar +serb+ (make-instance 'hunchentoot:easy-acceptor
                                :port 4242
-                                :document-root (cconf 'www-root)))
+                                :document-root (cconf 'www-root)
+                                :access-log-destination nil
+                                :message-log-destination #p"/var/log/bantflags/erorr.log"))
  (hunchentoot:start +serb+))

 (defun main ()