summaryrefslogtreecommitdiff
path: root/haunt/jakob/dynamic/logging.scm
diff options
context:
space:
mode:
authorJakob L. Kreuze <zerodaysfordays@sdf.org>2022-12-05 15:26:44 -0500
committerJakob L. Kreuze <zerodaysfordays@sdf.org>2022-12-05 21:24:21 -0500
commit678ef1c3b1a3b194c4ddd9451101a77da5cd5757 (patch)
tree8e236e1e3fd2e789e85b58bc61ee1def5cfdf55c /haunt/jakob/dynamic/logging.scm
parentd3f95102ab43c7f4791dbf1ce694da773a03c254 (diff)
Write to stout when process is started
Diffstat (limited to 'haunt/jakob/dynamic/logging.scm')
-rw-r--r--haunt/jakob/dynamic/logging.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/haunt/jakob/dynamic/logging.scm b/haunt/jakob/dynamic/logging.scm
index 24b8527..17f1ecd 100644
--- a/haunt/jakob/dynamic/logging.scm
+++ b/haunt/jakob/dynamic/logging.scm
@@ -33,5 +33,5 @@
(when (dominates level (%log-level))
(let ((output-port (open-file (%log-file-name) "a"))
(now (date->string (current-date) "~4")))
- (format port "[~a] ~a: ~a~%" now level message)
+ (format output-port "[~a] ~a: ~a~%" now level message)
(close output-port))))