Function: pop3-clean-region

pop3-clean-region is a byte-compiled function defined in pop3.el.gz.

Signature

(pop3-clean-region START END)

Source Code

;; Defined in /usr/src/emacs/lisp/net/pop3.el.gz
(defun pop3-clean-region (start end)
  (setq end (set-marker (make-marker) end))
  (save-excursion
    (goto-char start)
    (while (and (< (point) end) (search-forward "\r\n" end t))
      (replace-match "\n" t t))
    (goto-char start)
    (while (and (< (point) end) (re-search-forward "^\\." end t))
      (replace-match "" t t)
      (forward-char)))
  (set-marker end nil))