aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2020-04-21 19:17:05 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2020-04-22 18:24:14 +0200
commit72ed843f02c7ee047ebdcf5c6bad0bd04cfea110 (patch)
treed9d8c8fa301b51c209a29318cdb4191c7b77e127
parentAdd ~Z format to datetimes. (diff)
downloadcalp-72ed843f02c7ee047ebdcf5c6bad0bd04cfea110.tar.gz
calp-72ed843f02c7ee047ebdcf5c6bad0bd04cfea110.tar.xz
Fix warning parameter.
-rw-r--r--module/util/exceptions.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/module/util/exceptions.scm b/module/util/exceptions.scm
index 90e13da3..6b45e14d 100644
--- a/module/util/exceptions.scm
+++ b/module/util/exceptions.scm
@@ -44,8 +44,7 @@
(make-parameter
(lambda (fmt . args)
(format (current-error-port)
- "WARNING: ~?~%" fmt args))
- procedure?))
+ "WARNING: ~?~%" fmt args))))
(define-public (warning fmt . args)