added forgotten init-line for *HTTP-SYSLOG?* in INIT-HTTP-SYSLOG!
This commit is contained in:
parent
75970e8842
commit
3a14b095e2
|
@ -85,6 +85,7 @@
|
||||||
(define (init-http-syslog! syslog?)
|
(define (init-http-syslog! syslog?)
|
||||||
(if syslog?
|
(if syslog?
|
||||||
(let ((http-syslog-lock (make-lock)))
|
(let ((http-syslog-lock (make-lock)))
|
||||||
|
(set! *http-syslog?* #t)
|
||||||
(set! http-syslog
|
(set! http-syslog
|
||||||
(lambda (level fmt . args)
|
(lambda (level fmt . args)
|
||||||
(obtain-lock http-syslog-lock)
|
(obtain-lock http-syslog-lock)
|
||||||
|
|
Loading…
Reference in New Issue