diff --git a/httpd-core.scm b/httpd-core.scm
index 5789606..5a2af03 100644
--- a/httpd-core.scm
+++ b/httpd-core.scm
@@ -85,6 +85,7 @@
 (define (init-http-syslog! syslog?)
   (if syslog?
       (let ((http-syslog-lock (make-lock)))
+	(set! *http-syslog?* #t)
 	(set! http-syslog
 	      (lambda (level fmt . args)
 		(obtain-lock http-syslog-lock)