Help for this page

Select Code to Download


  1. or download this
    (defun fix-lf ()
      (interactive)
    ...
        (goto-char (point-min))
        (while (re-search-forward "\x0d" nil t)
          (replace-match "\x0a" t t))))