From 3290f12226689e2a7a38f6d839fa3851d1b60fb7 Mon Sep 17 00:00:00 2001
From: cage <cage@invalid>
Date: Mon, 3 Jun 2024 14:47:03 +0200
Subject: [PATCH] - instructed 'iri:render-iri' to just returns the string when
 stream is null.

---
 src/iri-parser.lisp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/iri-parser.lisp b/src/iri-parser.lisp
index 812b715..056353a 100644
--- a/src/iri-parser.lisp
+++ b/src/iri-parser.lisp
@@ -353,7 +353,9 @@
                  (format string-stream "?~a" query))
                (when 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)
   (with-output-to-string (stream)