diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-07 23:56:04 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-07 23:56:04 +0200 |
| commit | a8fc20e32b2ce14d32c8dfdb060451641958bbe1 (patch) | |
| tree | ebc8f2d4fe91f499e31087319e42e95686c3f5b5 | |
| parent | Parse EXDATES, basic handling of repeated keys. (diff) | |
| download | calp-a8fc20e32b2ce14d32c8dfdb060451641958bbe1.tar.gz calp-a8fc20e32b2ce14d32c8dfdb060451641958bbe1.tar.xz | |
Minor notes and fixes.
| -rw-r--r-- | module/output/text.scm | 1 | ||||
| -rw-r--r-- | module/util/config.scm | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/module/output/text.scm b/module/output/text.scm index a0a70f22..dacec4f8 100644 --- a/module/output/text.scm +++ b/module/output/text.scm @@ -63,6 +63,7 @@ ;; TODO for some cases the final delim should be `or' instead of `and' +;; TODO more options for infix strings (define*-public (add-enumeration-punctuation list optional: (final-delim "&")) (cond [(null? list) ""] diff --git a/module/util/config.scm b/module/util/config.scm index 98582b7c..33da9980 100644 --- a/module/util/config.scm +++ b/module/util/config.scm @@ -31,7 +31,7 @@ (define-macro (define-config name default-value documentation valid-value?) `(let ((make-config (@@ (util config) make-config)) (config-values (@@ (util config) config-values)) - (config? (@@ (util config) config?)) + ;; (config? (@@ (util config) config?)) (get-value (@@ (util config) get-value))) (cond [(hashq-ref config-values (quote ,name)) => (lambda (value) |