|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: s
Length: 9576 (0x2568) Names: »sendmail.elc«
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89 └─⟦46d41b2d0⟧ »./emacs-18.55.tar.Z« └─⟦fa971747f⟧ └─⟦this⟧ »dist-18.55/lisp/sendmail.elc«
0x0000…0020 0a 28 70 72 6f 76 69 64 65 20 28 71 75 6f 74 65 20 73 65 6e 64 6d 61 69 6c 29 29 0a 0a 28 64 65 ┆ (provide (quote sendmail)) (de┆ 0x0020…0040 66 76 61 72 20 6d 61 69 6c 2d 61 6c 69 61 73 65 73 20 74 20 22 5c 0a 41 6c 69 61 73 20 6f 66 20 ┆fvar mail-aliases t "\ Alias of ┆ 0x0040…0060 6d 61 69 6c 20 61 64 64 72 65 73 73 20 61 6c 69 61 73 65 73 2c 0a 6f 72 20 74 20 6d 65 61 6e 69 ┆mail address aliases, or t meani┆ 0x0060…0080 6e 67 20 73 68 6f 75 6c 64 20 62 65 20 69 6e 69 74 69 61 6c 69 7a 65 64 20 66 72 6f 6d 20 2e 6d ┆ng should be initialized from .m┆ 0x0080…00a0 61 69 6c 72 63 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 6d 61 69 6c 2d 64 65 66 61 75 6c 74 2d 72 ┆ailrc.") (defvar mail-default-r┆ 0x00a0…00c0 65 70 6c 79 2d 74 6f 20 6e 69 6c 20 22 5c 0a 2a 41 64 64 72 65 73 73 20 74 6f 20 69 6e 73 65 72 ┆eply-to nil "\ *Address to inser┆ 0x00c0…00e0 74 20 61 73 20 64 65 66 61 75 6c 74 20 52 65 70 6c 79 2d 74 6f 20 66 69 65 6c 64 20 6f 66 20 6f ┆t as default Reply-to field of o┆ 0x00e0…0100 75 74 67 6f 69 6e 67 20 6d 65 73 73 61 67 65 73 2e 22 29 0a 0a 28 64 65 66 76 61 72 20 6d 61 69 ┆utgoing messages.") (defvar mai┆ 0x0100…0120 6c 2d 61 62 62 72 65 76 73 2d 6c 6f 61 64 65 64 20 6e 69 6c 29 0a 0a 28 64 65 66 76 61 72 20 6d ┆l-abbrevs-loaded nil) (defvar m┆ 0x0120…0140 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c 29 0a 0a 28 61 75 74 6f 6c 6f 61 64 20 28 71 75 ┆ail-mode-map nil) (autoload (qu┆ 0x0140…0160 6f 74 65 20 62 75 69 6c 64 2d 6d 61 69 6c 2d 61 6c 69 61 73 65 73 29 20 22 6d 61 69 6c 61 6c 69 ┆ote build-mail-aliases) "mailali┆ 0x0160…0180 61 73 22 20 22 5c 0a 52 65 61 64 20 6d 61 69 6c 20 61 6c 69 61 73 65 73 20 66 72 6f 6d 20 7e 2f ┆as" "\ Read mail aliases from ~/┆ 0x0180…01a0 2e 6d 61 69 6c 72 63 20 61 6e 64 20 73 65 74 20 6d 61 69 6c 2d 61 6c 69 61 73 65 73 2e 22 20 6e ┆.mailrc and set mail-aliases." n┆ 0x01a0…01c0 69 6c 29 0a 0a 28 61 75 74 6f 6c 6f 61 64 20 28 71 75 6f 74 65 20 65 78 70 61 6e 64 2d 6d 61 69 ┆il) (autoload (quote expand-mai┆ 0x01c0…01e0 6c 2d 61 6c 69 61 73 65 73 29 20 22 6d 61 69 6c 61 6c 69 61 73 22 20 22 5c 0a 45 78 70 61 6e 64 ┆l-aliases) "mailalias" "\ Expand┆ 0x01e0…0200 20 61 6c 6c 20 6d 61 69 6c 20 61 6c 69 61 73 65 73 20 69 6e 20 73 75 69 74 61 62 6c 65 20 68 65 ┆ all mail aliases in suitable he┆ 0x0200…0220 61 64 65 72 20 66 69 65 6c 64 73 20 66 6f 75 6e 64 20 62 65 74 77 65 65 6e 20 42 45 47 20 61 6e ┆ader fields found between BEG an┆ 0x0220…0240 64 20 45 4e 44 2e 0a 53 75 69 74 61 62 6c 65 20 68 65 61 64 65 72 20 66 69 65 6c 64 73 20 61 72 ┆d END. Suitable header fields ar┆ 0x0240…0260 65 20 54 6f 2c 20 43 43 20 61 6e 64 20 42 43 43 2e 22 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 ┆e To, CC and BCC." nil) (defun ┆ 0x0260…0280 6d 61 69 6c 2d 73 65 74 75 70 20 28 74 6f 20 73 75 62 6a 65 63 74 20 69 6e 2d 72 65 70 6c 79 2d ┆mail-setup (to subject in-reply-┆ 0x0280…02a0 74 6f 20 63 63 20 72 65 70 6c 79 62 75 66 66 65 72 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 ┆to cc replybuffer) (byte-code " ┆ 0x02a0…02c0 c1 3d 85 12 00 c2 89 10 88 cf d0 21 85 12 00 d1 20 88 0c 89 13 88 65 62 88 d2 63 88 8a 0d 83 32 ┆ = ! eb c 2┆ 0x02c0…02e0 00 d3 0d d4 5c 22 88 d5 1e 06 d6 65 64 5c 22 29 82 34 00 d7 20 88 0e 07 85 4d 00 60 d5 1e 06 1e ┆ \" ed\") 4 M ` ┆ 0x02e0…0300 08 d3 d8 0e 07 d4 23 88 d9 0e 08 64 5c 22 2a 88 0e 09 85 59 00 d3 da 0e 09 d4 23 88 d3 db 0e 0a ┆ # d\"* Y # ┆ 0x0300…0320 86 62 00 dc d4 23 88 0e 0b 85 70 00 d3 dd 0e 0b d4 23 88 0e 0c 85 7c 00 d3 de df 20 d4 23 88 0e ┆ b # p # | # ┆ 0x0320…0340 0d 85 88 00 d3 e0 0e 0d d4 23 88 d3 0e 0e d4 5c 22 29 88 0d 85 96 00 64 62 88 0d 86 a8 00 0e 0a ┆ # \") db ┆ 0x0340…0360 86 a8 00 0e 09 86 a8 00 e1 c2 21 88 e2 e3 21 87 22 20 5b 6d 61 69 6c 2d 61 6c 69 61 73 65 73 20 ┆ ! ! " [mail-aliases ┆ 0x0360…0380 74 20 6e 69 6c 20 6d 61 69 6c 2d 72 65 70 6c 79 2d 62 75 66 66 65 72 20 72 65 70 6c 79 62 75 66 ┆t nil mail-reply-buffer replybuf┆ 0x0380…03a0 66 65 72 20 74 6f 20 66 69 6c 6c 2d 70 72 65 66 69 78 20 63 63 20 6f 70 6f 73 20 69 6e 2d 72 65 ┆fer to fill-prefix cc opos in-re┆ 0x03a0…03c0 70 6c 79 2d 74 6f 20 73 75 62 6a 65 63 74 20 6d 61 69 6c 2d 64 65 66 61 75 6c 74 2d 72 65 70 6c ┆ply-to subject mail-default-repl┆ 0x03c0…03e0 79 2d 74 6f 20 6d 61 69 6c 2d 73 65 6c 66 2d 62 6c 69 6e 64 20 6d 61 69 6c 2d 61 72 63 68 69 76 ┆y-to mail-self-blind mail-archiv┆ 0x03e0…0400 65 2d 66 69 6c 65 2d 6e 61 6d 65 20 6d 61 69 6c 2d 68 65 61 64 65 72 2d 73 65 70 61 72 61 74 6f ┆e-file-name mail-header-separato┆ 0x0400…0420 72 20 66 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 22 7e 2f 2e 6d 61 69 6c 72 63 22 20 62 75 69 6c ┆r file-exists-p "~/.mailrc" buil┆ 0x0420…0440 64 2d 6d 61 69 6c 2d 61 6c 69 61 73 65 73 20 22 54 6f 3a 20 22 20 69 6e 73 65 72 74 20 22 0a 22 ┆d-mail-aliases "To: " insert " "┆ 0x0440…0460 20 22 09 22 20 66 69 6c 6c 2d 72 65 67 69 6f 6e 20 6e 65 77 6c 69 6e 65 20 22 43 43 3a 20 22 20 ┆ " " fill-region newline "CC: " ┆ 0x0460…0480 66 69 6c 6c 2d 72 65 67 69 6f 6e 2d 61 73 2d 70 61 72 61 67 72 61 70 68 20 22 49 6e 2d 72 65 70 ┆fill-region-as-paragraph "In-rep┆ 0x0480…04a0 6c 79 2d 74 6f 3a 20 22 20 22 53 75 62 6a 65 63 74 3a 20 22 20 22 22 20 22 52 65 70 6c 79 2d 74 ┆ly-to: " "Subject: " "" "Reply-t┆ 0x04a0…04c0 6f 3a 20 22 20 22 42 43 43 3a 20 22 20 75 73 65 72 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 20 22 46 43 ┆o: " "BCC: " user-login-name "FC┆ 0x04c0…04e0 43 3a 20 22 20 73 65 74 2d 62 75 66 66 65 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 72 75 6e 2d 68 ┆C: " set-buffer-modified-p run-h┆ 0x04e0…0500 6f 6f 6b 73 20 6d 61 69 6c 2d 73 65 74 75 70 2d 68 6f 6f 6b 5d 20 31 37 29 29 0a 0a 28 64 65 66 ┆ooks mail-setup-hook] 17)) (def┆ 0x0500…0520 75 6e 20 6d 61 69 6c 2d 6d 6f 64 65 20 6e 69 6c 20 22 5c 0a 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 ┆un mail-mode nil "\ Major mode f┆ 0x0520…0540 6f 72 20 65 64 69 74 69 6e 67 20 6d 61 69 6c 20 74 6f 20 62 65 20 73 65 6e 74 2e 0a 4c 69 6b 65 ┆or editing mail to be sent. Like┆ 0x0540…0560 20 54 65 78 74 20 4d 6f 64 65 20 62 75 74 20 77 69 74 68 20 74 68 65 73 65 20 61 64 64 69 74 69 ┆ Text Mode but with these additi┆ 0x0560…0580 6f 6e 61 6c 20 63 6f 6d 6d 61 6e 64 73 3a 0a 43 2d 63 20 43 2d 73 20 20 6d 61 69 6c 2d 73 65 6e ┆onal commands: C-c C-s mail-sen┆ 0x0580…05a0 64 20 28 73 65 6e 64 20 74 68 65 20 6d 65 73 73 61 67 65 29 20 20 20 20 43 2d 63 20 43 2d 63 20 ┆d (send the message) C-c C-c ┆ 0x05a0…05c0 20 6d 61 69 6c 2d 73 65 6e 64 2d 61 6e 64 2d 65 78 69 74 0a 43 2d 63 20 43 2d 66 20 20 6d 6f 76 ┆ mail-send-and-exit C-c C-f mov┆ 0x05c0…05e0 65 20 74 6f 20 61 20 68 65 61 64 65 72 20 66 69 65 6c 64 20 28 61 6e 64 20 63 72 65 61 74 65 20 ┆e to a header field (and create ┆ 0x05e0…0600 69 74 20 69 66 20 74 68 65 72 65 20 69 73 6e 27 74 29 3a 0a 09 20 43 2d 63 20 43 2d 66 20 43 2d ┆it if there isn't): C-c C-f C-┆ 0x0600…0620 74 20 20 6d 6f 76 65 20 74 6f 20 54 6f 3a 09 43 2d 63 20 43 2d 66 20 43 2d 73 20 20 6d 6f 76 65 ┆t move to To: C-c C-f C-s move┆ 0x0620…0640 20 74 6f 20 53 75 62 6a 3a 0a 09 20 43 2d 63 20 43 2d 66 20 43 2d 62 20 20 6d 6f 76 65 20 74 6f ┆ to Subj: C-c C-f C-b move to┆ 0x0640…0660 20 42 43 43 3a 09 43 2d 63 20 43 2d 66 20 43 2d 63 20 20 6d 6f 76 65 20 74 6f 20 43 43 3a 0a 43 ┆ BCC: C-c C-f C-c move to CC: C┆ 0x0660…0680 2d 63 20 43 2d 77 20 20 6d 61 69 6c 2d 73 69 67 6e 61 74 75 72 65 20 28 69 6e 73 65 72 74 20 7e ┆-c C-w mail-signature (insert ~┆ 0x0680…06a0 2f 2e 73 69 67 6e 61 74 75 72 65 20 61 74 20 65 6e 64 29 2e 0a 43 2d 63 20 43 2d 79 20 20 6d 61 ┆/.signature at end). C-c C-y ma┆ 0x06a0…06c0 69 6c 2d 79 61 6e 6b 2d 6f 72 69 67 69 6e 61 6c 20 28 69 6e 73 65 72 74 20 63 75 72 72 65 6e 74 ┆il-yank-original (insert current┆ 0x06c0…06e0 20 6d 65 73 73 61 67 65 2c 20 69 6e 20 52 6d 61 69 6c 29 2e 0a 43 2d 63 20 43 2d 71 20 20 6d 61 ┆ message, in Rmail). C-c C-q ma┆ 0x06e0…0700 69 6c 2d 66 69 6c 6c 2d 79 61 6e 6b 65 64 2d 6d 65 73 73 61 67 65 20 28 66 69 6c 6c 20 77 68 61 ┆il-fill-yanked-message (fill wha┆ 0x0700…0720 74 20 77 61 73 20 79 61 6e 6b 65 64 29 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 ┆t was yanked)." (interactive) (b┆ 0x0720…0740 79 74 65 2d 63 6f 64 65 20 22 c1 88 cd 20 88 ce c0 21 88 c1 89 10 88 cf 0a 21 88 d0 0b 21 88 0d ┆yte-code " ! ! ! ┆ 0x0740…0760 89 14 88 d1 89 16 06 88 d2 89 16 07 88 c9 89 16 08 88 ce cc 21 88 ce ca 21 88 d3 0e 0b d4 0e 0a ┆ ! ! ┆ 0x0760…0780 52 89 16 0a 88 d3 0e 0b d4 0e 0c 52 89 16 0c 88 d5 d6 d7 5c 22 87 22 20 5b 6d 61 69 6c 2d 72 65 ┆R R \" " [mail-re┆ 0x0780…07a0 70 6c 79 2d 62 75 66 66 65 72 20 6e 69 6c 20 74 65 78 74 2d 6d 6f 64 65 2d 73 79 6e 74 61 78 2d ┆ply-buffer nil text-mode-syntax-┆ 0x07a0…07c0 74 61 62 6c 65 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 6c 6f 63 61 6c 2d 61 62 62 72 65 76 ┆table mail-mode-map local-abbrev┆ 0x07c0…07e0 2d 74 61 62 6c 65 20 74 65 78 74 2d 6d 6f 64 65 2d 61 62 62 72 65 76 2d 74 61 62 6c 65 20 6d 61 ┆-table text-mode-abbrev-table ma┆ 0x07e0…0800 6a 6f 72 2d 6d 6f 64 65 20 6d 6f 64 65 2d 6e 61 6d 65 20 62 75 66 66 65 72 2d 6f 66 66 65 72 2d ┆jor-mode mode-name buffer-offer-┆ 0x0800…0820 73 61 76 65 20 74 20 70 61 72 61 67 72 61 70 68 2d 73 74 61 72 74 20 6d 61 69 6c 2d 68 65 61 64 ┆save t paragraph-start mail-head┆ 0x0820…0840 65 72 2d 73 65 70 61 72 61 74 6f 72 20 70 61 72 61 67 72 61 70 68 2d 73 65 70 61 72 61 74 65 20 ┆er-separator paragraph-separate ┆ 0x0840…0860 6b 69 6c 6c 2d 61 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 6d 61 6b 65 2d 6c 6f ┆kill-all-local-variables make-lo┆ 0x0860…0880 63 61 6c 2d 76 61 72 69 61 62 6c 65 20 73 65 74 2d 73 79 6e 74 61 78 2d 74 61 62 6c 65 20 75 73 ┆cal-variable set-syntax-table us┆ 0x0880…08a0 65 2d 6c 6f 63 61 6c 2d 6d 61 70 20 6d 61 69 6c 2d 6d 6f 64 65 20 22 4d 61 69 6c 22 20 22 5e 22 ┆e-local-map mail-mode "Mail" "^"┆ 0x08a0…08c0 20 22 24 5c 5c 7c 5e 5b 20 09 5d 2a 5b 2d 5f 5d 5b 2d 5f 5d 5b 2d 5f 5d 2b 24 5c 5c 7c 22 20 72 ┆ "$\\|^[ ]*[-_][-_][-_]+$\\|" r┆ 0x08c0…08e0 75 6e 2d 68 6f 6f 6b 73 20 74 65 78 74 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 6d 61 69 6c 2d 6d 6f 64 ┆un-hooks text-mode-hook mail-mod┆ 0x08e0…0900 65 2d 68 6f 6f 6b 5d 20 31 30 29 29 0a 0a 28 69 66 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 ┆e-hook] 10)) (if mail-mode-map ┆ 0x0900…0920 6e 69 6c 20 28 73 65 74 71 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 28 6d 61 6b 65 2d 73 70 ┆nil (setq mail-mode-map (make-sp┆ 0x0920…0940 61 72 73 65 2d 6b 65 79 6d 61 70 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d ┆arse-keymap)) (define-key mail-m┆ 0x0940…0960 6f 64 65 2d 6d 61 70 20 22 03 3f 22 20 28 71 75 6f 74 65 20 64 65 73 63 72 69 62 65 2d 6d 6f 64 ┆ode-map " ?" (quote describe-mod┆ 0x0960…0980 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 ┆e)) (define-key mail-mode-map " ┆ 0x0980…09a0 06 14 22 20 28 71 75 6f 74 65 20 6d 61 69 6c 2d 74 6f 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 ┆ " (quote mail-to)) (define-key┆ 0x09a0…09c0 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 06 02 22 20 28 71 75 6f 74 65 20 6d 61 69 6c ┆ mail-mode-map " " (quote mail┆ 0x09c0…09e0 2d 62 63 63 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 ┆-bcc)) (define-key mail-mode-map┆ 0x09e0…0a00 20 22 03 06 03 22 20 28 71 75 6f 74 65 20 6d 61 69 6c 2d 63 63 29 29 20 28 64 65 66 69 6e 65 2d ┆ " " (quote mail-cc)) (define-┆ 0x0a00…0a20 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 06 13 22 20 28 71 75 6f 74 65 20 6d ┆key mail-mode-map " " (quote m┆ 0x0a20…0a40 61 69 6c 2d 73 75 62 6a 65 63 74 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d ┆ail-subject)) (define-key mail-m┆ 0x0a40…0a60 6f 64 65 2d 6d 61 70 20 22 03 17 22 20 28 71 75 6f 74 65 20 6d 61 69 6c 2d 73 69 67 6e 61 74 75 ┆ode-map " " (quote mail-signatu┆ 0x0a60…0a80 72 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 ┆re)) (define-key mail-mode-map "┆ 0x0a80…0aa0 03 19 22 20 28 71 75 6f 74 65 20 6d 61 69 6c 2d 79 61 6e 6b 2d 6f 72 69 67 69 6e 61 6c 29 29 20 ┆ " (quote mail-yank-original)) ┆ 0x0aa0…0ac0 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 11 22 20 28 ┆(define-key mail-mode-map " " (┆ 0x0ac0…0ae0 71 75 6f 74 65 20 6d 61 69 6c 2d 66 69 6c 6c 2d 79 61 6e 6b 65 64 2d 6d 65 73 73 61 67 65 29 29 ┆quote mail-fill-yanked-message))┆ 0x0ae0…0b00 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 03 22 20 ┆ (define-key mail-mode-map " " ┆ 0x0b00…0b20 28 71 75 6f 74 65 20 6d 61 69 6c 2d 73 65 6e 64 2d 61 6e 64 2d 65 78 69 74 29 29 20 28 64 65 66 ┆(quote mail-send-and-exit)) (def┆ 0x0b20…0b40 69 6e 65 2d 6b 65 79 20 6d 61 69 6c 2d 6d 6f 64 65 2d 6d 61 70 20 22 03 13 22 20 28 71 75 6f 74 ┆ine-key mail-mode-map " " (quot┆ 0x0b40…0b60 65 20 6d 61 69 6c 2d 73 65 6e 64 29 29 29 0a 0a 28 64 65 66 75 6e 20 6d 61 69 6c 2d 73 65 6e 64 ┆e mail-send))) (defun mail-send┆ 0x0b60…0b80 2d 61 6e 64 2d 65 78 69 74 20 28 61 72 67 29 20 22 5c 0a 53 65 6e 64 20 6d 65 73 73 61 67 65 20 ┆-and-exit (arg) "\ Send message ┆ 0x0b80…0ba0 6c 69 6b 65 20 6d 61 69 6c 2d 73 65 6e 64 2c 20 74 68 65 6e 2c 20 69 66 20 6e 6f 20 65 72 72 6f ┆like mail-send, then, if no erro┆ 0x0ba0…0bc0 72 73 2c 20 65 78 69 74 20 66 72 6f 6d 20 6d 61 69 6c 20 62 75 66 66 65 72 2e 0a 50 72 65 66 69 ┆rs, exit from mail buffer. Prefi┆ 0x0bc0…0be0 78 20 61 72 67 20 6d 65 61 6e 73 20 64 6f 6e 27 74 20 64 65 6c 65 74 65 20 74 68 69 73 20 77 69 ┆x arg means don't delete this wi┆ 0x0be0…0c00 6e 64 6f 77 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 62 79 74 65 2d 63 ┆ndow." (interactive "P") (byte-c┆ 0x0c00…0c20 6f 64 65 20 22 c2 88 c3 20 88 c4 70 21 88 08 3f 85 5c 22 00 c5 20 3f 85 5c 22 00 8a c6 c7 c8 20 ┆ode " p! ? \" ? \" ┆ 0x0c20…0c40 c9 5c 22 21 71 88 09 ca 3d 29 83 2a 00 cb 20 82 2f 00 cc cd 70 21 21 87 22 20 5b 61 72 67 20 6d ┆ \"!q =) * / p!! " [arg m┆ 0x0c40…0c60 61 6a 6f 72 2d 6d 6f 64 65 20 6e 69 6c 20 6d 61 69 6c 2d 73 65 6e 64 20 62 75 72 79 2d 62 75 66 ┆ajor-mode nil mail-send bury-buf┆ 0x0c60…0c80 66 65 72 20 6f 6e 65 2d 77 69 6e 64 6f 77 2d 70 20 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 6e ┆fer one-window-p window-buffer n┆ 0x0c80…0ca0 65 78 74 2d 77 69 6e 64 6f 77 20 73 65 6c 65 63 74 65 64 2d 77 69 6e 64 6f 77 20 6e 6f 74 20 72 ┆ext-window selected-window not r┆ 0x0ca0…0cc0 6d 61 69 6c 2d 6d 6f 64 65 20 64 65 6c 65 74 65 2d 77 69 6e 64 6f 77 20 73 77 69 74 63 68 2d 74 ┆mail-mode delete-window switch-t┆ 0x0cc0…0ce0 6f 2d 62 75 66 66 65 72 20 6f 74 68 65 72 2d 62 75 66 66 65 72 5d 20 31 30 29 29 0a 0a 28 64 65 ┆o-buffer other-buffer] 10)) (de┆ 0x0ce0…0d00 66 75 6e 20 6d 61 69 6c 2d 73 65 6e 64 20 6e 69 6c 20 22 5c 0a 53 65 6e 64 20 74 68 65 20 6d 65 ┆fun mail-send nil "\ Send the me┆ 0x0d00…0d20 73 73 61 67 65 20 69 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 49 66 20 ┆ssage in the current buffer. If ┆ 0x0d20…0d40 20 6d 61 69 6c 2d 69 6e 74 65 72 61 63 74 69 76 65 20 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 77 ┆ mail-interactive is non-nil, w┆ 0x0d40…0d60 61 69 74 20 66 6f 72 20 73 75 63 63 65 73 73 20 69 6e 64 69 63 61 74 69 6f 6e 0a 6f 72 20 65 72 ┆ait for success indication or er┆ 0x0d60…0d80 72 6f 72 20 6d 65 73 73 61 67 65 73 2c 20 61 6e 64 20 69 6e 66 6f 72 6d 20 75 73 65 72 2e 0a 4f ┆ror messages, and inform user. O┆ 0x0d80…0da0 74 68 65 72 77 69 73 65 20 61 6e 79 20 66 61 69 6c 75 72 65 20 69 73 20 72 65 70 6f 72 74 65 64 ┆therwise any failure is reported┆ 0x0da0…0dc0 20 69 6e 20 61 20 6d 65 73 73 61 67 65 20 62 61 63 6b 20 74 6f 0a 74 68 65 20 75 73 65 72 20 66 ┆ in a message back to the user f┆ 0x0dc0…0de0 72 6f 6d 20 74 68 65 20 6d 61 69 6c 65 72 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 ┆rom the mailer." (interactive) (┆ 0x0de0…0e00 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 c3 21 88 c4 08 21 88 c5 c1 21 88 c6 20 88 c2 c7 21 87 ┆byte-code " ! ! ! ! ┆ 0x0e00…0e20 22 20 5b 73 65 6e 64 2d 6d 61 69 6c 2d 66 75 6e 63 74 69 6f 6e 20 6e 69 6c 20 6d 65 73 73 61 67 ┆" [send-mail-function nil messag┆ 0x0e20…0e40 65 20 22 53 65 6e 64 69 6e 67 2e 2e 2e 22 20 66 75 6e 63 61 6c 6c 20 73 65 74 2d 62 75 66 66 65 ┆e "Sending..." funcall set-buffe┆ 0x0e40…0e60 72 2d 6d 6f 64 69 66 69 65 64 2d 70 20 64 65 6c 65 74 65 2d 61 75 74 6f 2d 73 61 76 65 2d 66 69 ┆r-modified-p delete-auto-save-fi┆ 0x0e60…0e80 6c 65 2d 69 66 2d 6e 65 63 65 73 73 61 72 79 20 22 53 65 6e 64 69 6e 67 2e 2e 2e 64 6f 6e 65 22 ┆le-if-necessary "Sending...done"┆ 0x0e80…0ea0 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 73 65 6e 64 6d 61 69 6c 2d 73 65 6e 64 2d 69 74 20 6e ┆] 6)) (defun sendmail-send-it n┆ 0x0ea0…0ec0 69 6c 20 28 62 79 74 65 2d 63 6f 64 65 20 22 09 83 0a 00 cb cc 21 82 0b 00 cd cb ce 21 c4 c4 70 ┆il (byte-code " ! ! p┆ 0x0ec0…0ee0 1e 06 1d 1b 1a 18 cf 8e 8a 0a 71 88 d0 20 88 d1 0e 06 21 88 64 62 88 68 d2 55 86 30 00 d2 63 88 ┆ q ! db h U 0 c ┆ 0x0ee0…0f00 65 62 88 d3 d4 d5 0e 07 21 d6 51 21 88 d7 d6 21 88 d8 d9 21 88 da 20 89 15 88 0e 08 85 54 00 db ┆eb ! Q! ! ! T ┆ 0x0f00…0f20 65 0d 5c 22 88 65 62 88 d3 dc 0d c9 23 85 63 00 60 0d 57 85 6d 00 d7 d6 21 88 82 58 00 88 c9 1b ┆e \" eb # c ` W m ! X ┆ 0x0f20…0f40 65 62 88 d3 dd 0d c9 23 85 7e 00 de 0d 21 88 65 62 88 d3 df 0d c9 23 85 a2 00 8a 65 62 88 d3 e0 ┆eb # ~ ! eb # eb ┆ 0x0f40…0f60 0d c9 23 29 3f 85 a2 00 e1 d9 21 88 e2 e3 e4 20 d6 23 88 65 62 88 d3 e5 0d c9 23 85 b1 00 d7 e6 ┆ #)? ! # eb # ┆ 0x0f60…0f80 21 88 09 85 bd 00 8a 08 71 88 d0 20 29 29 88 e7 e8 e9 ea 65 64 eb ca 21 83 d0 00 0e 0a 82 d1 00 ┆! q )) ed ! ┆ 0x0f80…0fa0 ec c4 08 c4 ed ee 26 08 ef e4 20 44 09 3f 85 e2 00 f0 23 5c 22 88 09 85 10 01 8a 08 71 88 65 62 ┆ & D ? #\" q eb┆ 0x0fa0…0fc0 88 d3 f1 c4 c9 23 85 ff 00 d7 f2 21 88 82 f0 00 88 f3 f4 20 21 3f 85 0f 01 f5 f6 f7 65 64 5c 22 ┆ # ! !? ed\"┆ 0x0fc0…0fe0 5c 22 29 29 29 2d 87 22 20 5b 65 72 72 62 75 66 20 6d 61 69 6c 2d 69 6e 74 65 72 61 63 74 69 76 ┆\")))- " [errbuf mail-interactiv┆ 0x0fe0…1000 65 20 74 65 6d 62 75 66 20 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 6e 69 6c 20 64 65 ┆e tembuf case-fold-search nil de┆ 0x1000…1020 6c 69 6d 6c 69 6e 65 20 6d 61 69 6c 62 75 66 20 6d 61 69 6c 2d 68 65 61 64 65 72 2d 73 65 70 61 ┆limline mailbuf mail-header-sepa┆ 0x1020…1040 72 61 74 6f 72 20 6d 61 69 6c 2d 61 6c 69 61 73 65 73 20 74 20 73 65 6e 64 6d 61 69 6c 2d 70 72 ┆rator mail-aliases t sendmail-pr┆ 0x1040…1060 6f 67 72 61 6d 20 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 22 20 73 65 6e 64 ┆ogram generate-new-buffer " send┆ 0x1060…1080 6d 61 69 6c 20 65 72 72 6f 72 73 22 20 30 20 22 20 73 65 6e 64 6d 61 69 6c 20 74 65 6d 70 22 20 ┆mail errors" 0 " sendmail temp" ┆ 0x1080…10a0 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 08 21 88 c3 09 21 85 0d 00 c2 09 21 87 22 20 5b 74 65 ┆((byte-code " ! ! ! " [te┆ 0x10a0…10c0 6d 62 75 66 20 65 72 72 62 75 66 20 6b 69 6c 6c 2d 62 75 66 66 65 72 20 62 75 66 66 65 72 70 5d ┆mbuf errbuf kill-buffer bufferp]┆ 0x10c0…10e0 20 34 29 29 20 65 72 61 73 65 2d 62 75 66 66 65 72 20 69 6e 73 65 72 74 2d 62 75 66 66 65 72 2d ┆ 4)) erase-buffer insert-buffer-┆ 0x10e0…1100 73 75 62 73 74 72 69 6e 67 20 31 30 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 ┆substring 10 re-search-forward "┆ 0x1100…1120 5e 22 20 72 65 67 65 78 70 2d 71 75 6f 74 65 20 22 0a 22 20 72 65 70 6c 61 63 65 2d 6d 61 74 63 ┆^" regexp-quote " " replace-matc┆ 0x1120…1140 68 20 62 61 63 6b 77 61 72 64 2d 63 68 61 72 20 31 20 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 20 65 ┆h backward-char 1 point-marker e┆ 0x1140…1160 78 70 61 6e 64 2d 6d 61 69 6c 2d 61 6c 69 61 73 65 73 20 22 0a 0a 0a 2a 22 20 22 5e 46 43 43 3a ┆xpand-mail-aliases " *" "^FCC:┆ 0x1160…1180 22 20 6d 61 69 6c 2d 64 6f 2d 66 63 63 20 22 5e 46 72 6f 6d 3a 22 20 22 5e 53 65 6e 64 65 72 3a ┆" mail-do-fcc "^From:" "^Sender:┆ 0x1180…11a0 22 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 69 6e 73 65 72 74 20 22 53 65 6e 64 65 72 3a 20 22 ┆" forward-line insert "Sender: "┆ 0x11a0…11c0 20 75 73 65 72 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 20 22 5e 53 75 62 6a 65 63 74 3a 5b 20 09 5d 2a ┆ user-login-name "^Subject:[ ]*┆ 0x11c0…11e0 0a 22 20 22 22 20 61 70 70 6c 79 20 63 61 6c 6c 2d 70 72 6f 63 65 73 73 2d 72 65 67 69 6f 6e 20 ┆ " "" apply call-process-region ┆ 0x11e0…1200 61 70 70 65 6e 64 20 6c 69 73 74 20 62 6f 75 6e 64 70 20 22 2f 75 73 72 2f 6c 69 62 2f 73 65 6e ┆append list boundp "/usr/lib/sen┆ 0x1200…1220 64 6d 61 69 6c 22 20 22 2d 6f 69 22 20 22 2d 74 22 20 22 2d 66 22 20 28 22 2d 6f 65 6d 22 20 22 ┆dmail" "-oi" "-t" "-f" ("-oem" "┆ 0x1220…1240 2d 6f 64 62 22 29 20 22 0a 0a 2a 20 2a 22 20 22 3b 20 22 20 7a 65 72 6f 70 20 62 75 66 66 65 72 ┆-odb") " * *" "; " zerop buffer┆ 0x1240…1260 2d 73 69 7a 65 20 65 72 72 6f 72 20 22 53 65 6e 64 69 6e 67 2e 2e 2e 66 61 69 6c 65 64 20 74 6f ┆-size error "Sending...failed to┆ 0x1260…1280 20 25 73 22 20 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 5d 20 33 36 29 29 0a 0a 28 64 65 ┆ %s" buffer-substring] 36)) (de┆ 0x1280…12a0 66 75 6e 20 6d 61 69 6c 2d 64 6f 2d 66 63 63 20 28 68 65 61 64 65 72 2d 65 6e 64 29 20 28 62 79 ┆fun mail-do-fcc (header-end) (by┆ 0x12a0…12c0 74 65 2d 63 6f 64 65 20 22 c6 70 cb cc 21 c4 1b 1a 19 18 8a 65 62 88 cd ce 0d c4 23 85 34 00 cf ┆te-code " p ! eb # 4 ┆ 0x12c0…12e0 60 d0 20 88 d1 d2 21 88 60 5c 22 08 42 89 10 88 d3 d4 d5 21 d6 d7 21 88 60 5c 22 88 82 0e 00 88 ┆` ! `\" B ! ! `\" ┆ 0x12e0…1300 0a 71 88 d8 20 88 d9 da db 20 dc dd 20 de 25 88 df 09 21 88 64 62 88 e0 63 88 e1 62 88 c6 1b e2 ┆ q % ! db c b ┆ 0x1300…1320 da c6 c4 23 85 66 00 e3 e4 21 88 e5 63 88 82 54 00 29 88 08 85 a6 00 e6 08 40 21 1e 07 0e 07 83 ┆ # f ! c T ) @! ┆ 0x1320…1340 95 00 70 65 64 1e 0a 1e 09 1e 08 8a 0e 07 71 88 64 62 88 df 0e 08 0e 09 0e 0a 23 29 2b 82 9c 00 ┆ ped q db #)+ ┆ 0x1340…1360 e7 65 64 08 40 c4 24 29 88 08 41 89 10 88 82 68 00 29 88 e8 0a 21 2c 87 22 20 5b 66 63 63 2d 6c ┆ ed @ $) A h ) !, " [fcc-l┆ 0x1360…1380 69 73 74 20 72 6d 61 69 6c 62 75 66 20 74 65 6d 62 75 66 20 63 61 73 65 2d 66 6f 6c 64 2d 73 65 ┆ist rmailbuf tembuf case-fold-se┆ 0x1380…13a0 61 72 63 68 20 74 20 68 65 61 64 65 72 2d 65 6e 64 20 6e 69 6c 20 62 75 66 66 65 72 20 63 75 72 ┆arch t header-end nil buffer cur┆ 0x13a0…13c0 62 75 66 20 62 65 67 20 65 6e 64 20 67 65 6e 65 72 61 74 65 2d 6e 65 77 2d 62 75 66 66 65 72 20 ┆buf beg end generate-new-buffer ┆ 0x13c0…13e0 22 20 72 6d 61 69 6c 20 6f 75 74 70 75 74 22 20 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 ┆" rmail output" re-search-forwar┆ 0x13e0…1400 64 20 22 5e 46 43 43 3a 5b 20 09 5d 2a 22 20 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 ┆d "^FCC:[ ]*" buffer-substring ┆ 0x1400…1420 65 6e 64 2d 6f 66 2d 6c 69 6e 65 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 20 ┆end-of-line skip-chars-backward ┆ 0x1420…1440 22 20 09 22 20 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 ┆" " delete-region match-beginni┆ 0x1440…1460 6e 67 20 30 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 20 65 72 61 73 65 2d 62 75 66 66 65 72 ┆ng 0 forward-line 1 erase-buffer┆ 0x1460…1480 20 69 6e 73 65 72 74 20 22 0a 46 72 6f 6d 20 22 20 75 73 65 72 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 ┆ insert " From " user-login-name┆ 0x1480…14a0 20 22 20 22 20 63 75 72 72 65 6e 74 2d 74 69 6d 65 2d 73 74 72 69 6e 67 20 22 0a 22 20 69 6e 73 ┆ " " current-time-string " " ins┆ 0x14a0…14c0 65 72 74 2d 62 75 66 66 65 72 2d 73 75 62 73 74 72 69 6e 67 20 31 30 20 32 20 73 65 61 72 63 68 ┆ert-buffer-substring 10 2 search┆ 0x14c0…14e0 2d 66 6f 72 77 61 72 64 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 35 20 36 32 20 67 65 74 2d ┆-forward forward-char -5 62 get-┆ 0x14e0…1500 66 69 6c 65 2d 62 75 66 66 65 72 20 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 6b 69 6c 6c 2d 62 75 ┆file-buffer write-region kill-bu┆ 0x1500…1520 66 66 65 72 5d 20 32 33 29 29 0a 0a 28 64 65 66 75 6e 20 6d 61 69 6c 2d 74 6f 20 6e 69 6c 20 22 ┆ffer] 23)) (defun mail-to nil "┆ 0x1520…1540 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 65 6e 64 20 6f 66 20 54 6f 2d 66 69 65 6c 64 2e ┆\ Move point to end of To-field.┆ 0x1540…1560 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 20 ┆" (interactive) (byte-code " ┆ 0x1560…1580 88 c2 c3 21 87 22 20 5b 6e 69 6c 20 65 78 70 61 6e 64 2d 61 62 62 72 65 76 20 6d 61 69 6c 2d 70 ┆ ! " [nil expand-abbrev mail-p┆ 0x1580…15a0 6f 73 69 74 69 6f 6e 2d 6f 6e 2d 66 69 65 6c 64 20 22 54 6f 22 5d 20 33 29 29 0a 0a 28 64 65 66 ┆osition-on-field "To"] 3)) (def┆ 0x15a0…15c0 75 6e 20 6d 61 69 6c 2d 73 75 62 6a 65 63 74 20 6e 69 6c 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e ┆un mail-subject nil "\ Move poin┆ 0x15c0…15e0 74 20 74 6f 20 65 6e 64 20 6f 66 20 53 75 62 6a 65 63 74 2d 66 69 65 6c 64 2e 22 20 28 69 6e 74 ┆t to end of Subject-field." (int┆ 0x15e0…1600 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 20 88 c2 c3 21 87 22 ┆eractive) (byte-code " ! "┆ 0x1600…1620 20 5b 6e 69 6c 20 65 78 70 61 6e 64 2d 61 62 62 72 65 76 20 6d 61 69 6c 2d 70 6f 73 69 74 69 6f ┆ [nil expand-abbrev mail-positio┆ 0x1620…1640 6e 2d 6f 6e 2d 66 69 65 6c 64 20 22 53 75 62 6a 65 63 74 22 5d 20 33 29 29 0a 0a 28 64 65 66 75 ┆n-on-field "Subject"] 3)) (defu┆ 0x1640…1660 6e 20 6d 61 69 6c 2d 63 63 20 6e 69 6c 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 6e 74 20 74 6f 20 65 ┆n mail-cc nil "\ Move point to e┆ 0x1660…1680 6e 64 20 6f 66 20 43 43 2d 66 69 65 6c 64 2e 20 20 43 72 65 61 74 65 20 61 20 43 43 20 66 69 65 ┆nd of CC-field. Create a CC fie┆ 0x1680…16a0 6c 64 20 69 66 20 6e 6f 6e 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 ┆ld if none." (interactive) (byte┆ 0x16a0…16c0 2d 63 6f 64 65 20 22 c1 88 c2 20 88 c3 c4 c0 5c 22 86 12 00 c3 c5 21 88 c6 63 87 22 20 5b 74 20 ┆-code " \" ! c " [t ┆ 0x16c0…16e0 6e 69 6c 20 65 78 70 61 6e 64 2d 61 62 62 72 65 76 20 6d 61 69 6c 2d 70 6f 73 69 74 69 6f 6e 2d ┆nil expand-abbrev mail-position-┆ 0x16e0…1700 6f 6e 2d 66 69 65 6c 64 20 22 63 63 22 20 22 74 6f 22 20 22 0a 43 43 3a 20 22 5d 20 34 29 29 0a ┆on-field "cc" "to" " CC: "] 4)) ┆ 0x1700…1720 0a 28 64 65 66 75 6e 20 6d 61 69 6c 2d 62 63 63 20 6e 69 6c 20 22 5c 0a 4d 6f 76 65 20 70 6f 69 ┆ (defun mail-bcc nil "\ Move poi┆ 0x1720…1740 6e 74 20 74 6f 20 65 6e 64 20 6f 66 20 42 43 43 2d 66 69 65 6c 64 2e 20 20 43 72 65 61 74 65 20 ┆nt to end of BCC-field. Create ┆ 0x1740…1760 61 20 42 43 43 20 66 69 65 6c 64 20 69 66 20 6e 6f 6e 65 2e 22 20 28 69 6e 74 65 72 61 63 74 69 ┆a BCC field if none." (interacti┆ 0x1760…1780 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 20 88 c3 c4 c0 5c 22 86 12 00 c3 c5 21 ┆ve) (byte-code " \" !┆ 0x1780…17a0 88 c6 63 87 22 20 5b 74 20 6e 69 6c 20 65 78 70 61 6e 64 2d 61 62 62 72 65 76 20 6d 61 69 6c 2d ┆ c " [t nil expand-abbrev mail-┆ 0x17a0…17c0 70 6f 73 69 74 69 6f 6e 2d 6f 6e 2d 66 69 65 6c 64 20 22 62 63 63 22 20 22 74 6f 22 20 22 0a 42 ┆position-on-field "bcc" "to" " B┆ 0x17c0…17e0 43 43 3a 20 22 5d 20 34 29 29 0a 0a 28 64 65 66 75 6e 20 6d 61 69 6c 2d 70 6f 73 69 74 69 6f 6e ┆CC: "] 4)) (defun mail-position┆ 0x17e0…1800 2d 6f 6e 2d 66 69 65 6c 64 20 28 66 69 65 6c 64 20 26 6f 70 74 69 6f 6e 61 6c 20 73 6f 66 74 29 ┆-on-field (field &optional soft)┆ 0x1800…1820 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c5 c2 19 18 65 62 88 c7 c8 0b c8 51 21 88 c9 ca 21 89 10 ┆ (byte-code " eb Q! ! ┆ 0x1820…1840 88 65 62 88 cb cc cd 0c 21 ce 51 08 c2 23 83 35 00 cb cf c5 d0 23 88 d1 20 88 d2 c8 21 88 c2 82 ┆ eb ! Q # 5 # ! ┆ 0x1840…1860 48 00 0e 06 86 46 00 08 62 88 d2 c8 21 88 d3 c8 0c d4 23 88 c5 2a 87 22 20 5b 65 6e 64 20 63 61 ┆H F b ! # * " [end ca┆ 0x1860…1880 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 74 20 6d 61 69 6c 2d 68 65 61 64 65 72 2d 73 65 70 ┆se-fold-search t mail-header-sep┆ 0x1880…18a0 61 72 61 74 6f 72 20 66 69 65 6c 64 20 6e 69 6c 20 73 6f 66 74 20 73 65 61 72 63 68 2d 66 6f 72 ┆arator field nil soft search-for┆ 0x18a0…18c0 77 61 72 64 20 22 0a 22 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 20 72 65 2d 73 65 ┆ward " " match-beginning 0 re-se┆ 0x18c0…18e0 61 72 63 68 2d 66 6f 72 77 61 72 64 20 22 5e 22 20 72 65 67 65 78 70 2d 71 75 6f 74 65 20 22 3a ┆arch-forward "^" regexp-quote ":┆ 0x18e0…1900 22 20 22 5e 5b 5e 20 09 5d 22 20 6d 6f 76 65 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e ┆" "^[^ ]" move beginning-of-lin┆ 0x1900…1920 65 20 73 6b 69 70 2d 63 68 61 72 73 2d 62 61 63 6b 77 61 72 64 20 69 6e 73 65 72 74 20 22 3a 20 ┆e skip-chars-backward insert ": ┆ […truncated at 200 lines…]