>> + (let ((string (concat " " (prog2 (and ARG (forward-line 1)) >> + (org-trim (delete-and-extract-region >> (line-beginning-position) >> + >> (line-end-position)))))))
Also, (concat " " (progn (when ARG (forward-line)) (org-trim ...)))
>> + (let ((string (concat " " (prog2 (and ARG (forward-line 1)) >> + (org-trim (delete-and-extract-region >> (line-beginning-position) >> + >> (line-end-position)))))))
Also, (concat " " (progn (when ARG (forward-line)) (org-trim ...)))