diff --git a/src/gui/client/main-window.lisp b/src/gui/client/main-window.lisp
index fd2cd9d..90a9573 100644
--- a/src/gui/client/main-window.lisp
+++ b/src/gui/client/main-window.lisp
@@ -597,7 +597,8 @@ local file paths."
                           (let ((parsed (iri:iri-parse (get-address-bar-text main-window))))
                             (setf (uri:path parsed)
                                   (fs:normalize-path link-value))
-                            (enqueue-add-link-to-tour (iri:render-iri parsed)
+                            (enqueue-add-link-to-tour (with-output-to-string (stream)
+                                                        (iri:render-iri parsed stream))
                                                       link-name))))))
     (lambda (e)
       (declare (ignore e))