Lines Matching +defs:rmail +defs:reply
5 ;; In rmail, bind a key to rmail-gccbug-reply, e.g.
6 ;; (require 'rmail)
8 ;; (define-key rmail-mode-map "R" 'rmail-gccbug-reply)
14 (defun gccbug-reply ()
38 "^via:\\|^mail-from:\\|^origin:\\|^status:\\|^remailed\\|^received:\\|^summary-line:\\|^to:\\|^subject:\\|^in-reply-to:\\|^return-path:\\|^X-.*:\\|^User-Agent:\\|^MIME-Version:\\|^Content-.*:\\|^List-.*:\\|C[Cc]:\\|^Precedence:\\|^Sender:\\|^Mailing-List:\\|^Delivered-To:\\|^>From")
73 ; This kills CC: lines, but rmail-reply below won't create any
79 (defun rmail-gccbug-reply ()
81 (rmail-toggle-header 0)
82 (rmail-reply t)
83 (gccbug-reply))