Fix logging conditions.
This commit is contained in:
parent
8abf44b2c8
commit
ee47971450
1 changed files with 2 additions and 2 deletions
|
@ -67,8 +67,8 @@
|
|||
|
||||
;; Handles the actual logging
|
||||
(define ((log-line level) fmt . args)
|
||||
(when (or (not (*log-file*))
|
||||
(not (log-file)))
|
||||
(when (or (*log-file*)
|
||||
(log-file))
|
||||
(when (not (log-file))
|
||||
(log-file (open-output-file (*log-file*) #:append))
|
||||
(log-info "Logging started"))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue