cl-mvc-rest/cl-mvc-rest-template

diff --git a/template.lisp b/template.lisp
index 55e5320..d9b9543 100644
--- a/template.lisp
+++ b/template.lisp
@@ -113,7 +113,7 @@
 	 (assert (not *writing*) () "Template parse error: Nested «=")
 	 (let ((*nested* t)
 	       (*writing* t))
-	   `(princ ,(read stream t nil t) *template-output*))))
+	   `(write-string (str ,(read stream t nil t)) *template-output*))))
   (let ((rt (copy-readtable nil)))
     (make-dispatch-macro-character #\« t rt)
     (set-dispatch-macro-character #\« #\Space #'dispatch-template-eval rt)