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