From ee479714504d61347a512e906273d1deea54ec8f Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dominik=20Pant=C5=AF=C4=8Dek?= Date: Tue, 11 Apr 2023 21:01:27 +0200 Subject: [PATCH] Fix logging conditions. --- src/logging.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/logging.scm b/src/logging.scm index c04c740..1d38af0 100644 --- a/src/logging.scm +++ b/src/logging.scm @@ -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"))