aboutsummaryrefslogtreecommitdiff
path: root/module/util
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2020-04-02 23:14:02 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2020-04-02 23:14:02 +0200
commit3dbdc3e893bd4203707b1f0a6c30683a74c7e88c (patch)
treef23334ab44c06624e4b48f4f1098f174276c5d70 /module/util
parentweek-day-name rethrow with better error. (diff)
downloadcalp-3dbdc3e893bd4203707b1f0a6c30683a74c7e88c.tar.gz
calp-3dbdc3e893bd4203707b1f0a6c30683a74c7e88c.tar.xz
Remove ensure? for configs, built in instead.
Diffstat (limited to 'module/util')
-rw-r--r--module/util/config.scm9
1 files changed, 0 insertions, 9 deletions
diff --git a/module/util/config.scm b/module/util/config.scm
index fbf2bebe..68758ad0 100644
--- a/module/util/config.scm
+++ b/module/util/config.scm
@@ -15,15 +15,6 @@
:use-module (util)
)
-(define-public (ensure pred?)
- (lambda (v)
- (unless (pred? v)
- (error (format #f "Value [~s] doesn't satisfy condition ~a"
- v (or (procedure-name pred?) ""))))
- v))
-
-
-
(define-once config-values (make-hash-table))
(define-record-type <config>