Epstein Files Search

characters) (case-fold-search nil) (selected-coding (select-message-coding-system)) resend-to-addresses delimline fcc-was-found (mailbuf (current-buffer)) (program (if (boundp 'sendmail-program) sendmail-program "/usr/lib/sendmail")) ;; Examine ... char (mail-header-end)) (delete-region (point) (prog n (end-of-line) (point))) (setq delimline (point-marker)) (sendmail-sync-aliases) (if mail-aliases (expand-mail-aliases (point-min) delimline)) (goto ... blank lines in the header (while (and (re-search-forward "\n\n\n*" delimline t) (< (point) delimline)) EFTA00504397 (replace-match "\n")) (goto-char (point-min)) ;; Look for Resent- headers. They