X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/b73ffb8235ffb6f3bce6ac42731e19d3be846067..ad18ddfca6c8a13c604759c0759017e3cd6280d7:/str.lisp

diff --git a/str.lisp b/str.lisp
index 5cf05aa..a943bae 100644
--- a/str.lisp
+++ b/str.lisp
@@ -37,7 +37,7 @@ (defun join-strings (del strs)
   (with-output-to-string (s)
     (when strs
       (loop
-        (princ (stringify (pop strs)) s)
+	(princ (stringify (pop strs)) s)
 	(unless strs
 	  (return))
 	(princ del s)))))