summaryrefslogtreecommitdiff
path: root/haunt/jakob/dynamic/logging.scm
diff options
context:
space:
mode:
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))))