Вы можете установить fill-columnn
на действительно большое число и заполнить.
C-u 10000 C-x f M-x fill-individual-paragraphs
Или вы можете использовать небольшую пользовательскую функцию:
(defun refill-paragraphs-to-be-one-line ()
"fill individual paragraphs with large fill column"
(interactive)
(let ((fill-column 100000))
(fill-individual-paragraphs (point-min) (point-max))))