aboutsummaryrefslogtreecommitdiff
path: root/dump
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-07-21 12:54:47 +0300
committerBonfaceKilz2023-07-30 12:29:56 +0300
commit1b72a21848524806411ea55ba5e7be2657ddc8cc (patch)
tree4a731c4429599b5ed108bb7230c0df25708d56eb /dump
parent16ebe166618b7e36d92bcc6c3e497dcfa188ce90 (diff)
downloadgn-transform-databases-1b72a21848524806411ea55ba5e7be2657ddc8cc.tar.gz
Dump prefixes correctly when auto-generating docs
Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'dump')
-rw-r--r--dump/special-forms.scm8
1 files changed, 7 insertions, 1 deletions
diff --git a/dump/special-forms.scm b/dump/special-forms.scm
index 39c8c80..1c0b15c 100644
--- a/dump/special-forms.scm
+++ b/dump/special-forms.scm
@@ -588,7 +588,13 @@ The above query results to triples that have the form:
(format #t "# ~a" name)
(for-each
(lambda (proc)
- (proc db #f #f prefix-thunk))
+ (proc db #f #f
+ (lambda () (for-each
+ (match-lambda
+ ((k v)
+ (begin
+ (prefix k v #f))))
+ prefixes))))
inputs))
#:encoding "utf8")