1
0
mirror of https://codeberg.org/cage/tinmop/ synced 2024-12-22 23:47:56 +01:00

- instructed 'iri:render-iri' to just returns the string when stream is null.

This commit is contained in:
cage 2024-06-03 14:47:03 +02:00
parent eb14b342df
commit 3290f12226

View File

@ -353,7 +353,9 @@
(format string-stream "?~a" query)) (format string-stream "?~a" query))
(when fragment (when fragment
(format string-stream "#~a" fragment)))))) (format string-stream "#~a" fragment))))))
(write-string (render) stream))) (if stream
(write-string (render) stream)
(render))))
(defmethod to-s ((object iri) &key &allow-other-keys) (defmethod to-s ((object iri) &key &allow-other-keys)
(with-output-to-string (stream) (with-output-to-string (stream)