setup/remove-dos-eol.el

   1 (defun remove-dos-eol ()
   2   "Do not show ^M in files containing mixed UNIX and DOS line endings."
   3   (interactive)
   4   (setq buffer-display-table (make-display-table))
   5   (aset buffer-display-table ?\^M [])
   6   (force-window-update (current-buffer))
   7   (redisplay 't))
   8
   9 (global-set-key "\C-cM" 'remove-dos-eol)