aboutsummaryrefslogtreecommitdiff
path: root/dump
diff options
context:
space:
mode:
authorMunyoki Kilyungi2023-07-11 15:22:18 +0300
committerMunyoki Kilyungi2023-07-21 14:36:38 +0300
commitbaec0ede474a974ef3160423b7dc82773b1f5a50 (patch)
tree69a438bdcbd240f96a669f09773facd5d1c1b3da /dump
parent5661067312cc6f56c1b6b0678c1715c791c90238 (diff)
downloadgn-transform-databases-baec0ede474a974ef3160423b7dc82773b1f5a50.tar.gz
Rename auto-documentation-port -> path
We don't need to pass around ports as part of a configuration when we can instead pass in a path that can be used to open a port. Signed-off-by: Munyoki Kilyungi <me@bonfacemunyoki.com>
Diffstat (limited to 'dump')
-rw-r--r--dump/special-forms.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/dump/special-forms.scm b/dump/special-forms.scm
index b62eb09..a4d1c12 100644
--- a/dump/special-forms.scm
+++ b/dump/special-forms.scm
@@ -441,9 +441,9 @@ must be remedied."
(triple 'predicate 'rdfs:domain #,subject-type))))
(_ (error "Invalid predicate clause:" predicate-clause))))
#'(predicate-clauses ...))))
- (when (dump-configuration-auto-documentation-port dump-configuration)
+ (when (dump-configuration-path dump-configuration)
(let ((out
- (dump-configuration-auto-documentation-port
+ (dump-configuration-path
dump-configuration)))
(format out "# '~a' Metadata~%~%" (syntax->datum #'name))
#,(syntax-case #'schema-triples-clause (schema-triples)