3 ms·

(defun add-text-padding (str padding) (let ((lines (split-string "\n" str)) ( cond ((nil? lines) "") (#t (join-string "\n"

(defun add-text-padding (str padding) (let ((lines (split-string "\n" str)) ( cond ((nil? lines) "") (#t (join-string "\n" (cons (car lines) (mapcar (lambda (x) (concat-string (repeat-string " " padding) x)) (cdr lines))))))) The closing brackets are supposed to be in one line, that much I know.

mst 6y ago
Yes, that's a more common way to format the code. I was trying to elucidate a different structure.
- guenthert 6y ago
  But it makes it unnecessarily hard to read and distracts from what you meant to convey.