brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix logging conditions.

Browse source
This commit is contained in:
Dominik Pantůček 2023-04-11 21:01:27 +02:00
parent 8abf44b2c8
commit ee47971450
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/logging.scm
View file

@ -67,8 +67,8 @@
;; Handles the actual logging ;; Handles the actual logging
(define ((log-line level) fmt . args) (define ((log-line level) fmt . args)
(when (or (not (*log-file*)) (when (or (*log-file*)
(not (log-file))) (log-file))
(when (not (log-file)) (when (not (log-file))
(log-file (open-output-file (*log-file*) #:append)) (log-file (open-output-file (*log-file*) #:append))
(log-info "Logging started")) (log-info "Logging started"))