diff options
author | Munyoki Kilyungi | 2023-07-11 15:22:18 +0300 |
---|---|---|
committer | Munyoki Kilyungi | 2023-07-21 14:36:38 +0300 |
commit | baec0ede474a974ef3160423b7dc82773b1f5a50 (patch) | |
tree | 69a438bdcbd240f96a669f09773facd5d1c1b3da /dump/special-forms.scm | |
parent | 5661067312cc6f56c1b6b0678c1715c791c90238 (diff) | |
download | gn-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/special-forms.scm')
-rw-r--r-- | dump/special-forms.scm | 4 |
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) |