X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/3cb9d624f65d603d49bc48bb78af24145615a63a..0eed4749891adf0a7be89e786b8968ee805a8d41:/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)))))