X-Git-Url: http://git.kpe.io/?p=puri.git;a=blobdiff_plain;f=tests.lisp;fp=tests.lisp;h=77d19612ad56fb7af08b630a51503ad1c5712adb;hp=b5cbe37e8132ddff3ae926c89c226e0d384811de;hb=1c768744300916893c359ccf18cfe2dbb55b3978;hpb=3d8bae190ceef8b2b9f48fdffd6baacd270273d4

diff --git a/tests.lisp b/tests.lisp
index b5cbe37..77d1961 100644
--- a/tests.lisp
+++ b/tests.lisp
@@ -408,6 +408,16 @@
        :condition-type 'uri-parse-error)
      res)
 
+
+    ;;an escaped newline isn't rendered properly
+    (push
+    `(let ((weird-uri "https://example.com/q?foo%0abar%20baz"))
+       (test
+	weird-uri
+	(puri:render-uri (puri:parse-uri weird-uri) nil)
+	:test #'string=)
+     ) res)
+
     `(progn ,@(nreverse res))))
 
 (defun do-tests ()