/ Fresh Fish 8 / FreshFishVol8-CD1.bin / gnu / src / amiga / emacs-19.28-src.lha / emacs-19.28 / site-lisp / vm-reply.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 64 67 69 6c 62 65 72 |piled by| dgilber|
|00000020| 74 40 67 61 6d 69 67 61 | 2e 67 75 65 6c 70 68 6e |t@gamiga|.guelphn|
|00000030| 65 74 2e 64 77 65 6f 6d | 65 72 2e 6f 72 67 20 6f |et.dweom|er.org o|
|00000040| 6e 20 57 65 64 20 44 65 | 63 20 32 38 20 32 33 3a |n Wed De|c 28 23:|
|00000050| 32 35 3a 34 37 20 31 39 | 39 34 0a 3b 3b 3b 20 66 |25:47 19|94.;;; f|
|00000060| 72 6f 6d 20 66 69 6c 65 | 20 66 69 76 65 3a 43 57 |rom file| five:CW|
|00000070| 6f 72 6b 2f 65 6d 61 63 | 73 2d 31 39 2e 32 35 2f |ork/emac|s-19.25/|
|00000080| 76 6d 2f 76 6d 2d 72 65 | 70 6c 79 2e 65 6c 0a 3b |vm/vm-re|ply.el.;|
|00000090| 3b 3b 20 65 6d 61 63 73 | 20 76 65 72 73 69 6f 6e |;; emacs| version|
|000000a0| 20 31 39 2e 32 35 2e 31 | 2e 0a 3b 3b 3b 20 62 79 | 19.25.1|..;;; by|
|000000b0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 46 |tecomp v|ersion F|
|000000c0| 53 46 20 32 2e 31 30 0a | 3b 3b 3b 20 6f 70 74 69 |SF 2.10.|;;; opti|
|000000d0| 6d 69 7a 61 74 69 6f 6e | 20 69 73 20 6f 6e 2e 0a |mization| is on..|
|000000e0| 3b 3b 3b 20 74 68 69 73 | 20 66 69 6c 65 20 75 73 |;;; this| file us|
|000000f0| 65 73 20 6f 70 63 6f 64 | 65 73 20 77 68 69 63 68 |es opcod|es which|
|00000100| 20 64 6f 20 6e 6f 74 20 | 65 78 69 73 74 20 69 6e | do not |exist in|
|00000110| 20 45 6d 61 63 73 20 31 | 38 2e 0a 0a 28 69 66 20 | Emacs 1|8...(if |
|00000120| 28 61 6e 64 20 28 62 6f | 75 6e 64 70 20 27 65 6d |(and (bo|undp 'em|
|00000130| 61 63 73 2d 76 65 72 73 | 69 6f 6e 29 0a 09 20 28 |acs-vers|ion).. (|
|00000140| 6f 72 20 28 61 6e 64 20 | 28 62 6f 75 6e 64 70 20 |or (and |(boundp |
|00000150| 27 65 70 6f 63 68 3a 3a | 76 65 72 73 69 6f 6e 29 |'epoch::|version)|
|00000160| 20 65 70 6f 63 68 3a 3a | 76 65 72 73 69 6f 6e 29 | epoch::|version)|
|00000170| 0a 09 20 20 20 20 20 28 | 73 74 72 69 6e 67 2d 6c |..     (|string-l|
|00000180| 65 73 73 70 20 65 6d 61 | 63 73 2d 76 65 72 73 69 |essp ema|cs-versi|
|00000190| 6f 6e 20 22 31 39 22 29 | 29 29 0a 20 20 20 20 28 |on "19")|)).    (|
|000001a0| 65 72 72 6f 72 20 22 60 | 66 69 76 65 3a 43 57 6f |error "`|five:CWo|
|000001b0| 72 6b 2f 65 6d 61 63 73 | 2d 31 39 2e 32 35 2f 76 |rk/emacs|-19.25/v|
|000001c0| 6d 2f 76 6d 2d 72 65 70 | 6c 79 2e 65 6c 27 20 77 |m/vm-rep|ly.el' w|
|000001d0| 61 73 20 63 6f 6d 70 69 | 6c 65 64 20 66 6f 72 20 |as compi|led for |
|000001e0| 45 6d 61 63 73 20 31 39 | 22 29 29 0a 0a 28 62 79 |Emacs 19|"))..(by|
|000001f0| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 c2 5c 22 88 c0 |te-code |"...\"..|
|00000200| c3 c4 5c 22 88 c0 c5 c6 | 5c 22 88 c0 c7 c8 5c 22 |..\"....|\"....\"|
|00000210| 87 22 20 5b 64 65 66 61 | 6c 69 61 73 20 76 6d 2d |." [defa|lias vm-|
|00000220| 64 6f 2d 72 65 70 6c 79 | 20 23 5b 28 74 6f 2d 61 |do-reply| #[(to-a|
|00000230| 6c 6c 20 69 6e 63 6c 75 | 64 65 2d 74 65 78 74 20 |ll inclu|de-text |
|00000240| 63 6f 75 6e 74 29 20 22 | c0 09 21 5c 6e 0b c4 c5 |count) "|..!\n...|
|00000250| 89 89 89 89 89 89 89 89 | 1e 06 1e 07 1e 08 1e 09 |........|........|
|00000260| 1e 5c 6e 1e 0b 1e 5c 66 | 1e 0d 1e 0e 1e 0f 1e 10 |.\n...\f|........|
|00000270| 1e 11 89 1e 12 89 16 0b | 83 7f 01 0e 12 0e 0b 3d |........|.......=|
|00000280| 83 b5 00 d3 0e 0b 40 d4 | 5c 22 1e 15 d6 0e 15 21 |......@.|\".....!|
|00000290| 3f 85 4a 00 0e 15 29 89 | 16 0e 84 6c 00 d3 0e 0b |?.J...).|...l....|
|000002a0| 40 d7 5c 22 89 16 0e 84 | 6c 00 d8 0e 0b 40 21 89 |@.\"....|l....@!.|
|000002b0| 16 0e 84 6c 00 d9 da 21 | 88 d3 0e 0b 40 db 5c 22 |...l...!|....@.\"|
|000002c0| 16 5c 66 0e 1c 85 83 00 | c5 1e 1d de dc 0e 0b 40 |.\f.....|.......@|
|000002d0| 5c 22 29 89 16 5c 6e df | 9a 3f 85 8e 00 0e 5c 6e |\")..\n.|.?....\n|
|000002e0| 16 5c 6e 0e 5c 66 83 fd | 00 0e 20 83 fd 00 c4 1e |.\n.\f..|.. .....|
|000002f0| 0f e1 e2 0e 20 21 0e 5c | 66 5c 22 29 e3 9a 84 fd |.... !.\|f\")....|
|00000300| 00 0e 20 0e 5c 66 50 16 | 5c 66 82 fd 00 d3 0e 0b |.. .\fP.|\f......|
|00000310| 40 d4 5c 22 89 16 08 83 | cc 00 0e 0e e4 0e 08 51 |@.\"....|.......Q|
|00000320| 16 0e 82 fd 00 d3 0e 0b | 40 d7 5c 22 89 16 08 83 |........|@.\"....|
|00000330| e3 00 0e 0e e4 0e 08 51 | 16 0e 82 fd 00 d8 0e 0b |.......Q|........|
|00000340| 40 21 89 16 08 83 f9 00 | 0e 0e e4 0e 08 51 16 0e |@!......|.....Q..|
|00000350| 82 fd 00 d9 da 21 88 0e | 25 83 44 01 d3 0e 0b 40 |.....!..|%.D....@|
|00000360| e6 5c 22 16 08 d3 0e 0b | 40 e7 5c 22 16 07 0e 08 |.\".....|@.\"....|
|00000370| 83 2b 01 0e 0d 83 27 01 | 0e 0d e4 0e 08 51 16 0d |.+....'.|.....Q..|
|00000380| 82 2b 01 0e 08 16 0d 0e | 07 83 44 01 0e 0d 83 40 |.+......|..D....@|
|00000390| 01 0e 0d e4 0e 07 51 16 | 0d 82 44 01 0e 07 16 0d |......Q.|..D.....|
|000003a0| d3 0e 0b 40 e8 5c 22 d3 | 0e 0b 40 e9 5c 22 d3 0e |...@.\".|..@.\"..|
|000003b0| 0b 40 ea 5c 22 0e 09 42 | 42 42 16 09 0e 25 83 6b |.@.\"..B|BB...%.k|
|000003c0| 01 d3 0e 0b 40 eb 5c 22 | 86 71 01 d3 0e 0b 40 ec |....@.\"|.q....@.|
|000003d0| 5c 22 0e 06 42 16 06 0e | 0b 41 89 16 0b 84 30 00 |\"..B...|.A....0.|
|000003e0| 0e 2d 83 9e 01 c4 1e 2e | 0e 0e 83 92 01 ef 0e 0e |.-......|........|
|000003f0| 21 16 0e 0e 0d 83 9d 01 | ef 0e 0d 21 16 0d 29 f0 |!.......|...!..).|
|00000400| 0e 0e 21 16 0e f0 0e 0d | 21 16 0d 0e 31 83 bb 01 |..!.....|!...1...|
|00000410| f2 0e 0e 21 16 0e f2 0e | 0d 21 16 0d f3 0e 0e c5 |...!....|.!......|
|00000420| c4 23 16 0e f3 f4 f3 0e | 0d c5 c4 23 0e 0e f5 0e |.#......|...#....|
|00000430| 0e 21 23 c4 89 23 16 0d | 0e 0e 83 e4 01 f6 f7 0e |.!#..#..|........|
|00000440| 0e f8 23 16 0e 0e 0d 83 | f1 01 f6 f7 0e 0d f8 23 |..#.....|.......#|
|00000450| 16 0d 0e 0e 84 fd 01 0e | 0d 16 0e c5 16 0d f9 c5 |........|........|
|00000460| 0e 09 5c 22 16 09 f6 f7 | 0e 09 fa 23 16 09 fb 0e |..\"....|...#....|
|00000470| 09 fc 5c 22 16 09 f3 0e | 09 21 89 16 09 85 23 02 |..\"....|.!....#.|
|00000480| f6 f7 0e 09 fd 23 16 09 | f9 c5 0e 06 5c 22 16 06 |.....#..|....\"..|
|00000490| f6 f7 0e 06 e4 23 16 06 | fb 0e 06 fe 5c 22 16 06 |.....#..|....\"..|
|000004a0| f3 0e 06 21 89 16 06 85 | 4b 02 f6 f7 0e 06 e4 23 |...!....|K......#|
|000004b0| 16 06 ff 81 40 00 81 41 | 00 81 42 00 0e 12 40 21 |....@..A|..B...@!|
|000004c0| 0e 12 41 83 67 02 81 43 | 00 82 68 02 df 23 0e 0e |..A.g..C|..h..#..|
|000004d0| 0e 5c 66 0e 5c 6e 0e 0d | 0e 09 0e 06 26 07 88 81 |.\f.\n..|....&...|
|000004e0| 44 00 81 45 00 21 88 81 | 46 00 16 47 0e 12 16 45 |D..E.!..|F..G...E|
|000004f0| 0e 11 12 0e 48 83 ca 02 | 8a 65 62 88 c5 1e 0f 81 |....H...|.eb.....|
|00000500| 49 00 81 4a 00 e2 0e 4b | 21 81 4c 00 51 c5 e3 23 |I..J...K|!.L.Q..#|
|00000510| 88 29 81 4d 00 75 88 0e | 12 83 c9 02 81 4e 00 0e |.).M.u..|.....N..|
|00000520| 12 40 21 88 64 62 88 0e | 12 41 89 16 12 84 b5 02 |.@!.db..|.A......|
|00000530| 29 81 4f 00 81 50 00 21 | 88 81 4f 00 81 51 00 21 |).O..P.!|..O..Q.!|
|00000540| 2e 0d 87 22 20 5b 76 6d | 2d 73 65 6c 65 63 74 2d |..." [vm|-select-|
|00000550| 6d 61 72 6b 65 64 2d 6f | 72 2d 70 72 65 66 69 78 |marked-o|r-prefix|
|00000560| 65 64 2d 6d 65 73 73 61 | 67 65 73 20 63 6f 75 6e |ed-messa|ges coun|
|00000570| 74 20 64 65 66 61 75 6c | 74 2d 64 69 72 65 63 74 |t defaul|t-direct|
|00000580| 6f 72 79 20 76 6d 2d 6d | 65 73 73 61 67 65 2d 70 |ory vm-m|essage-p|
|00000590| 6f 69 6e 74 65 72 20 74 | 20 6e 69 6c 20 6e 65 77 |ointer t| nil new|
|000005a0| 73 67 72 6f 75 70 73 20 | 74 6d 70 32 20 74 6d 70 |sgroups |tmp2 tmp|
|000005b0| 20 72 65 66 65 72 65 6e | 63 65 73 20 69 6e 2d 72 | referen|ces in-r|
|000005c0| 65 70 6c 79 2d 74 6f 20 | 6d 70 20 73 75 62 6a 65 |eply-to |mp subje|
|000005d0| 63 74 20 63 63 20 74 6f | 20 63 61 73 65 2d 66 6f |ct cc to| case-fo|
|000005e0| 6c 64 2d 73 65 61 72 63 | 68 20 6d 65 73 73 61 67 |ld-searc|h messag|
|000005f0| 65 2d 70 6f 69 6e 74 65 | 72 20 64 69 72 20 6d 6c |e-pointe|r dir ml|
|00000600| 69 73 74 20 76 6d 2d 67 | 65 74 2d 68 65 61 64 65 |ist vm-g|et-heade|
|00000610| 72 2d 63 6f 6e 74 65 6e | 74 73 20 22 52 65 70 6c |r-conten|ts "Repl|
|00000620| 79 2d 54 6f 3a 22 20 72 | 65 70 6c 79 2d 74 6f 20 |y-To:" r|eply-to |
|00000630| 76 6d 2d 69 67 6e 6f 72 | 65 64 2d 72 65 70 6c 79 |vm-ignor|ed-reply|
|00000640| 2d 74 6f 20 22 46 72 6f | 6d 3a 22 20 76 6d 2d 67 |-to "Fro|m:" vm-g|
|00000650| 72 6f 6b 2d 46 72 6f 6d | 5f 2d 61 75 74 68 6f 72 |rok-From|_-author|
|00000660| 20 65 72 72 6f 72 20 22 | 4e 6f 20 46 72 6f 6d 3a | error "|No From:|
|00000670| 20 6f 72 20 52 65 70 6c | 79 2d 54 6f 3a 20 68 65 | or Repl|y-To: he|
|00000680| 61 64 65 72 20 69 6e 20 | 6d 65 73 73 61 67 65 22 |ader in |message"|
|00000690| 20 22 53 75 62 6a 65 63 | 74 3a 22 20 76 6d 2d 69 | "Subjec|t:" vm-i|
|000006a0| 6e 2d 72 65 70 6c 79 2d | 74 6f 2d 66 6f 72 6d 61 |n-reply-|to-forma|
|000006b0| 74 20 76 6d 2d 73 75 6d | 6d 61 72 79 2d 75 6e 69 |t vm-sum|mary-uni|
|000006c0| 6e 74 65 72 65 73 74 69 | 6e 67 2d 73 65 6e 64 65 |nteresti|ng-sende|
|000006d0| 72 73 20 76 6d 2d 73 70 | 72 69 6e 74 66 20 22 22 |rs vm-sp|rintf ""|
|000006e0| 20 76 6d 2d 72 65 70 6c | 79 2d 73 75 62 6a 65 63 | vm-repl|y-subjec|
|000006f0| 74 2d 70 72 65 66 69 78 | 20 73 74 72 69 6e 67 2d |t-prefix| string-|
|00000700| 6d 61 74 63 68 20 72 65 | 67 65 78 70 2d 71 75 6f |match re|gexp-quo|
|00000710| 74 65 20 30 20 22 2c 22 | 20 74 6f 2d 61 6c 6c 20 |te 0 ","| to-all |
|00000720| 22 54 6f 3a 22 20 22 43 | 63 3a 22 20 22 52 65 66 |"To:" "C|c:" "Ref|
|00000730| 65 72 65 6e 63 65 73 3a | 22 20 22 49 6e 2d 72 65 |erences:|" "In-re|
|00000740| 70 6c 79 2d 74 6f 3a 22 | 20 22 4d 65 73 73 61 67 |ply-to:"| "Messag|
|00000750| 65 2d 49 44 3a 22 20 22 | 46 6f 6c 6c 6f 77 75 70 |e-ID:" "|Followup|
|00000760| 2d 54 6f 3a 22 20 22 4e | 65 77 73 67 72 6f 75 70 |-To:" "N|ewsgroup|
|00000770| 73 3a 22 20 76 6d 2d 73 | 74 72 69 70 2d 72 65 70 |s:" vm-s|trip-rep|
|00000780| 6c 79 2d 68 65 61 64 65 | 72 73 20 6d 61 69 6c 2d |ly-heade|rs mail-|
|00000790| 75 73 65 2d 72 66 63 38 | 32 32 20 6d 61 69 6c 2d |use-rfc8|22 mail-|
|000007a0| 73 74 72 69 70 2d 71 75 | 6f 74 65 64 2d 6e 61 6d |strip-qu|oted-nam|
|000007b0| 65 73 20 76 6d 2d 70 61 | 72 73 65 2d 61 64 64 72 |es vm-pa|rse-addr|
|000007c0| 65 73 73 65 73 20 76 6d | 2d 72 65 70 6c 79 2d 69 |esses vm|-reply-i|
|000007d0| 67 6e 6f 72 65 64 2d 61 | 64 64 72 65 73 73 65 73 |gnored-a|ddresses|
|000007e0| 20 76 6d 2d 73 74 72 69 | 70 2d 69 67 6e 6f 72 65 | vm-stri|p-ignore|
|000007f0| 64 2d 61 64 64 72 65 73 | 73 65 73 20 76 6d 2d 64 |d-addres|ses vm-d|
|00000800| 65 6c 65 74 65 2d 64 75 | 70 6c 69 63 61 74 65 73 |elete-du|plicates|
|00000810| 20 61 70 70 65 6e 64 20 | 63 6f 70 79 2d 73 65 71 | append |copy-seq|
|00000820| 75 65 6e 63 65 20 6d 61 | 70 63 6f 6e 63 61 74 20 |uence ma|pconcat |
|00000830| 69 64 65 6e 74 69 74 79 | 20 22 2c 5c 6e 20 20 20 |identity| ",\n   |
|00000840| 20 22 20 64 65 6c 71 20 | 22 20 22 20 76 6d 2d 70 | " delq |" " vm-p|
|00000850| 61 72 73 65 20 22 5b 5e | 3c 5d 2a 5c 5c 28 3c 5b |arse "[^|<]*\\(<[|
|00000860| 5e 3e 5d 2b 3e 5c 5c 29 | 22 20 22 5c 6e 09 22 20 |^>]+>\\)|" "\n." |
|00000870| 22 5b 20 09 5c 66 0d 5c | 6e 2c 5d 2a 5c 5c 28 5b |"[ .\f.\|n,]*\\([|
|00000880| 5e 20 09 5c 66 0d 5c 6e | 2c 5d 2b 5c 5c 29 22 20 |^ .\f.\n|,]+\\)" |
|00000890| 76 6d 2d 6d 61 69 6c 2d | 69 6e 74 65 72 6e 61 6c |vm-mail-|internal|
|000008a0| 20 66 6f 72 6d 61 74 20 | 22 72 65 70 6c 79 20 74 | format |"reply t|
|000008b0| 6f 20 25 73 25 73 22 20 | 76 6d 2d 73 75 2d 66 75 |o %s%s" |vm-su-fu|
|000008c0| 6c 6c 2d 6e 61 6d 65 20 | 22 2c 20 2e 2e 2e 22 20 |ll-name |", ..." |
|000008d0| 6d 61 6b 65 2d 6c 6f 63 | 61 6c 2d 76 61 72 69 61 |make-loc|al-varia|
|000008e0| 62 6c 65 20 76 6d 2d 72 | 65 70 6c 79 2d 6c 69 73 |ble vm-r|eply-lis|
|000008f0| 74 20 72 65 70 6c 79 69 | 6e 67 20 76 6d 2d 73 79 |t replyi|ng vm-sy|
|00000900| 73 74 65 6d 2d 73 74 61 | 74 65 20 69 6e 63 6c 75 |stem-sta|te inclu|
|00000910| 64 65 2d 74 65 78 74 20 | 72 65 2d 73 65 61 72 63 |de-text |re-searc|
|00000920| 68 2d 66 6f 72 77 61 72 | 64 20 22 5e 22 20 6d 61 |h-forwar|d "^" ma|
|00000930| 69 6c 2d 68 65 61 64 65 | 72 2d 73 65 70 61 72 61 |il-heade|r-separa|
|00000940| 74 6f 72 20 22 24 22 20 | 31 20 76 6d 2d 79 61 6e |tor "$" |1 vm-yan|
|00000950| 6b 2d 6d 65 73 73 61 67 | 65 20 72 75 6e 2d 68 6f |k-messag|e run-ho|
|00000960| 6f 6b 73 20 76 6d 2d 72 | 65 70 6c 79 2d 68 6f 6f |oks vm-r|eply-hoo|
|00000970| 6b 20 76 6d 2d 6d 61 69 | 6c 2d 6d 6f 64 65 2d 68 |k vm-mai|l-mode-h|
|00000980| 6f 6f 6b 5d 20 31 34 5d | 20 76 6d 2d 73 74 72 69 |ook] 14]| vm-stri|
|00000990| 70 2d 69 67 6e 6f 72 65 | 64 2d 61 64 64 72 65 73 |p-ignore|d-addres|
|000009a0| 73 65 73 20 23 5b 28 61 | 64 64 72 65 73 73 65 73 |ses #[(a|ddresses|
|000009b0| 29 20 22 c0 09 21 11 c2 | 89 89 1b 1c 1d 0e 06 89 |) "..!..|........|
|000009c0| 15 83 34 00 09 89 13 83 | 2d 00 c7 0d 40 0b 40 5c |..4.....|-...@.@\|
|000009d0| 22 83 26 00 c8 0b 40 09 | 5c 22 11 0b 41 89 13 84 |".&...@.|\"..A...|
|000009e0| 17 00 0d 41 89 15 84 11 | 00 2b 09 87 22 20 5b 63 |...A....|.+.." [c|
|000009f0| 6f 70 79 2d 73 65 71 75 | 65 6e 63 65 20 61 64 64 |opy-sequ|ence add|
|00000a00| 72 65 73 73 65 73 20 6e | 69 6c 20 61 64 64 72 2d |resses n|il addr-|
|00000a10| 6c 69 73 74 20 6c 69 73 | 74 20 72 65 2d 6c 69 73 |list lis|t re-lis|
|00000a20| 74 20 76 6d 2d 72 65 70 | 6c 79 2d 69 67 6e 6f 72 |t vm-rep|ly-ignor|
|00000a30| 65 64 2d 61 64 64 72 65 | 73 73 65 73 20 73 74 72 |ed-addre|sses str|
|00000a40| 69 6e 67 2d 6d 61 74 63 | 68 20 64 65 6c 71 5d 20 |ing-matc|h delq] |
|00000a50| 34 5d 20 76 6d 2d 69 67 | 6e 6f 72 65 64 2d 72 65 |4] vm-ig|nored-re|
|00000a60| 70 6c 79 2d 74 6f 20 23 | 5b 28 72 65 70 6c 79 2d |ply-to #|[(reply-|
|00000a70| 74 6f 29 20 22 08 85 27 | 00 c1 89 1a 1b 5c 66 89 |to) "..'|.....\f.|
|00000a80| 13 83 25 00 c5 0b 40 08 | 5c 22 83 1e 00 c6 12 c1 |..%...@.|\"......|
|00000a90| 89 13 82 0b 00 0b 41 89 | 13 84 0e 00 5c 6e 2a 87 |......A.|....\n*.|
|00000aa0| 22 20 5b 72 65 70 6c 79 | 2d 74 6f 20 6e 69 6c 20 |" [reply|-to nil |
|00000ab0| 72 65 73 75 6c 74 20 72 | 65 2d 6c 69 73 74 20 76 |result r|e-list v|
|00000ac0| 6d 2d 72 65 70 6c 79 2d | 69 67 6e 6f 72 65 64 2d |m-reply-|ignored-|
|00000ad0| 72 65 70 6c 79 2d 74 6f | 73 20 73 74 72 69 6e 67 |reply-to|s string|
|00000ae0| 2d 6d 61 74 63 68 20 74 | 5d 20 34 5d 20 76 6d 2d |-match t|] 4] vm-|
|00000af0| 6d 61 69 6c 2d 79 61 6e | 6b 2d 64 65 66 61 75 6c |mail-yan|k-defaul|
|00000b00| 74 20 23 5b 28 6d 65 73 | 73 61 67 65 29 20 22 8a |t #[(mes|sage) ".|
|00000b10| c0 c1 5c 6e 0b 23 88 67 | c4 3d 83 11 00 c5 c6 21 |..\n.#.g|.=.....!|
|00000b20| 88 0e 07 83 21 00 c1 1e | 08 c9 c7 0e 5c 6e 5c 22 |....!...|....\n\"|
|00000b30| 63 88 29 c1 1e 0b cc 1e | 0d ce 20 1e 0f 60 0e 0f |c.).....|.. ..`..|
|00000b40| 57 85 3c 00 0e 10 63 88 | c6 79 88 82 2b 00 2c 87 |W.<...c.|.y..+.,.|
|00000b50| 22 20 5b 76 6d 2d 72 65 | 6f 72 64 65 72 2d 6d 65 |" [vm-re|order-me|
|00000b60| 73 73 61 67 65 2d 68 65 | 61 64 65 72 73 20 6e 69 |ssage-he|aders ni|
|00000b70| 6c 20 76 6d 2d 69 6e 63 | 6c 75 64 65 64 2d 74 65 |l vm-inc|luded-te|
|00000b80| 78 74 2d 68 65 61 64 65 | 72 73 20 76 6d 2d 69 6e |xt-heade|rs vm-in|
|00000b90| 63 6c 75 64 65 64 2d 74 | 65 78 74 2d 64 69 73 63 |cluded-t|ext-disc|
|00000ba0| 61 72 64 2d 68 65 61 64 | 65 72 2d 72 65 67 65 78 |ard-head|er-regex|
|00000bb0| 70 20 31 30 20 64 65 6c | 65 74 65 2d 63 68 61 72 |p 10 del|ete-char|
|00000bc0| 20 31 20 76 6d 2d 69 6e | 63 6c 75 64 65 64 2d 74 | 1 vm-in|cluded-t|
|00000bd0| 65 78 74 2d 61 74 74 72 | 69 62 75 74 69 6f 6e 2d |ext-attr|ibution-|
|00000be0| 66 6f 72 6d 61 74 20 76 | 6d 2d 73 75 6d 6d 61 72 |format v|m-summar|
|00000bf0| 79 2d 75 6e 69 6e 74 65 | 72 65 73 74 69 6e 67 2d |y-uninte|resting-|
|00000c00| 73 65 6e 64 65 72 73 20 | 76 6d 2d 73 70 72 69 6e |senders |vm-sprin|
|00000c10| 74 66 20 6d 65 73 73 61 | 67 65 20 7a 6d 61 63 73 |tf messa|ge zmacs|
|00000c20| 2d 72 65 67 69 6f 6e 73 | 20 74 20 6d 61 72 6b 2d |-regions| t mark-|
|00000c30| 65 76 65 6e 2d 69 66 2d | 69 6e 61 63 74 69 76 65 |even-if-|inactive|
|00000c40| 20 6d 61 72 6b 2d 6d 61 | 72 6b 65 72 20 65 6e 64 | mark-ma|rker end|
|00000c50| 20 76 6d 2d 69 6e 63 6c | 75 64 65 64 2d 74 65 78 | vm-incl|uded-tex|
|00000c60| 74 2d 70 72 65 66 69 78 | 5d 20 34 5d 5d 20 33 29 |t-prefix|] 4]] 3)|
|00000c70| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 76 6d 2d 79 |.(defali|as 'vm-y|
|00000c80| 61 6e 6b 2d 6d 65 73 73 | 61 67 65 2d 6f 74 68 65 |ank-mess|age-othe|
|00000c90| 72 2d 66 6f 6c 64 65 72 | 20 23 5b 28 66 6f 6c 64 |r-folder| #[(fold|
|00000ca0| 65 72 29 20 22 70 c0 89 | 89 89 89 89 19 1a 1b 1c |er) "p..|........|
|00000cb0| 1d 1e 06 1e 07 c8 0e 09 | 21 86 1b 00 ca 0e 09 21 |........|!......!|
|00000cc0| 71 88 70 16 06 0e 0b cc | 3d 84 2a 00 cc 20 88 0e |q.p.....|=.*.. ..|
|00000cd0| 0d 84 35 00 ce cf 0e 09 | 5c 22 88 0e 0d 40 d0 48 |..5.....|\"...@.H|
|00000ce0| d1 48 14 8a d2 8b 88 29 | 0e 07 71 88 d3 8e 0e 06 |.H.....)|..q.....|
|00000cf0| 1e 14 d5 09 40 21 2e 09 | 87 22 20 5b 6e 69 6c 20 |....@!..|." [nil |
|00000d00| 6d 70 20 70 72 6f 6d 70 | 74 20 72 65 73 75 6c 74 |mp promp|t result|
|00000d10| 20 64 65 66 61 75 6c 74 | 20 73 75 6d 62 75 66 20 | default| sumbuf |
|00000d20| 6e 65 77 62 75 66 20 62 | 20 76 6d 2d 67 65 74 2d |newbuf b| vm-get-|
|00000d30| 66 69 6c 65 2d 62 75 66 | 66 65 72 20 66 6f 6c 64 |file-buf|fer fold|
|00000d40| 65 72 20 66 69 6e 64 2d | 66 69 6c 65 2d 6e 6f 73 |er find-|file-nos|
|00000d50| 65 6c 65 63 74 20 6d 61 | 6a 6f 72 2d 6d 6f 64 65 |elect ma|jor-mode|
|00000d60| 20 76 6d 2d 6d 6f 64 65 | 20 76 6d 2d 6d 65 73 73 | vm-mode| vm-mess|
|00000d70| 61 67 65 2d 70 6f 69 6e | 74 65 72 20 65 72 72 6f |age-poin|ter erro|
|00000d80| 72 20 22 4e 6f 20 6d 65 | 73 73 61 67 65 73 20 69 |r "No me|ssages i|
|00000d90| 6e 20 66 6f 6c 64 65 72 | 20 25 73 22 20 31 20 30 |n folder| %s" 1 0|
|00000da0| 20 28 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 8b | ((byte-|code "..|
|00000db0| 88 c1 5c 6e c3 c4 c5 24 | 88 70 16 06 c7 c8 0e 09 |..\n...$|.p......|
|00000dc0| 5c 22 16 5c 6e cb 16 5c | 66 cb cb 55 83 3c 00 cd |\".\n..\|f..U.<..|
|00000dd0| 0e 5c 6e 21 89 16 5c 66 | ce 98 83 32 00 0e 09 83 |.\n!..\f|...2....|
|00000de0| 32 00 0e 09 16 5c 66 cf | 0e 5c 66 21 89 16 5c 66 |2....\f.|.\f!..\f|
|00000df0| 82 18 00 0e 5c 66 53 0e | 10 9b 89 16 11 84 4c 00 |....\fS.|......L.|
|00000e00| d2 d3 21 88 c1 87 22 20 | 5b 28 28 76 6d 2d 73 75 |..!..." |[((vm-su|
|00000e10| 6d 6d 61 72 69 7a 65 29 | 29 20 76 6d 2d 64 69 73 |mmarize)|) vm-dis|
|00000e20| 70 6c 61 79 20 76 6d 2d | 73 75 6d 6d 61 72 79 2d |play vm-|summary-|
|00000e30| 62 75 66 66 65 72 20 74 | 20 28 76 6d 2d 79 61 6e |buffer t| (vm-yan|
|00000e40| 6b 2d 6d 65 73 73 61 67 | 65 2d 6f 74 68 65 72 2d |k-messag|e-other-|
|00000e50| 66 6f 6c 64 65 72 29 20 | 28 76 6d 2d 79 61 6e 6b |folder) |(vm-yank|
|00000e60| 2d 6d 65 73 73 61 67 65 | 2d 6f 74 68 65 72 2d 66 |-message|-other-f|
|00000e70| 6f 6c 64 65 72 20 63 6f | 6d 70 6f 73 69 6e 67 2d |older co|mposing-|
|00000e80| 6d 65 73 73 61 67 65 29 | 20 73 75 6d 62 75 66 20 |message)| sumbuf |
|00000e90| 66 6f 72 6d 61 74 20 22 | 59 61 6e 6b 20 6d 65 73 |format "|Yank mes|
|00000ea0| 73 61 67 65 20 6e 75 6d | 62 65 72 3a 20 28 64 65 |sage num|ber: (de|
|00000eb0| 66 61 75 6c 74 20 25 73 | 29 20 22 20 64 65 66 61 |fault %s|) " defa|
|00000ec0| 75 6c 74 20 70 72 6f 6d | 70 74 20 30 20 72 65 73 |ult prom|pt 0 res|
|00000ed0| 75 6c 74 20 72 65 61 64 | 2d 73 74 72 69 6e 67 20 |ult read|-string |
|00000ee0| 22 22 20 73 74 72 69 6e | 67 2d 74 6f 2d 69 6e 74 |"" strin|g-to-int|
|00000ef0| 20 76 6d 2d 6d 65 73 73 | 61 67 65 2d 6c 69 73 74 | vm-mess|age-list|
|00000f00| 20 6d 70 20 65 72 72 6f | 72 20 22 4e 6f 20 73 75 | mp erro|r "No su|
|00000f10| 63 68 20 6d 65 73 73 61 | 67 65 2e 22 5d 20 36 29 |ch messa|ge."] 6)|
|00000f20| 29 20 28 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |) ((byte|-code ".|
|00000f30| 09 21 88 c0 5c 6e 21 87 | 22 20 5b 62 75 72 79 2d |.!..\n!.|" [bury-|
|00000f40| 62 75 66 66 65 72 20 6e | 65 77 62 75 66 20 73 75 |buffer n|ewbuf su|
|00000f50| 6d 62 75 66 5d 20 32 29 | 29 20 76 6d 2d 6d 61 69 |mbuf] 2)|) vm-mai|
|00000f60| 6c 2d 62 75 66 66 65 72 | 20 76 6d 2d 79 61 6e 6b |l-buffer| vm-yank|
|00000f70| 2d 6d 65 73 73 61 67 65 | 5d 20 37 20 22 5c 0a 4c |-message|] 7 "\.L|
|00000f80| 69 6b 65 20 76 6d 2d 79 | 61 6e 6b 2d 6d 65 73 73 |ike vm-y|ank-mess|
|00000f90| 61 67 65 20 65 78 63 65 | 70 74 20 74 68 65 20 6d |age exce|pt the m|
|00000fa0| 65 73 73 61 67 65 20 69 | 73 20 79 61 6e 6b 65 64 |essage i|s yanked|
|00000fb0| 20 66 72 6f 6d 20 61 20 | 66 6f 6c 64 65 72 20 6f | from a |folder o|
|00000fc0| 74 68 65 72 0a 74 68 61 | 6e 20 74 68 65 20 6f 6e |ther.tha|n the on|
|00000fd0| 65 20 74 68 61 74 20 73 | 70 61 77 6e 65 64 20 74 |e that s|pawned t|
|00000fe0| 68 65 20 63 75 72 72 65 | 6e 74 20 4d 61 69 6c 20 |he curre|nt Mail |
|00000ff0| 6d 6f 64 65 20 62 75 66 | 66 65 72 2e 20 20 54 68 |mode buf|fer.  Th|
|00001000| 65 20 6e 61 6d 65 20 6f | 66 20 74 68 65 0a 66 6f |e name o|f the.fo|
|00001010| 6c 64 65 72 20 69 73 20 | 72 65 61 64 20 66 72 6f |lder is |read fro|
|00001020| 6d 20 74 68 65 20 6d 69 | 6e 69 62 75 66 66 65 72 |m the mi|nibuffer|
|00001030| 2e 0a 0a 44 6f 6e 27 74 | 20 63 61 6c 6c 20 74 68 |...Don't| call th|
|00001040| 69 73 20 66 75 6e 63 74 | 69 6f 6e 20 66 72 6f 6d |is funct|ion from|
|00001050| 20 61 20 70 72 6f 67 72 | 61 6d 2e 22 20 28 6c 69 | a progr|am." (li|
|00001060| 73 74 20 28 6c 65 74 20 | 28 28 64 69 72 20 28 69 |st (let |((dir (i|
|00001070| 66 20 76 6d 2d 66 6f 6c | 64 65 72 2d 64 69 72 65 |f vm-fol|der-dire|
|00001080| 63 74 6f 72 79 20 28 65 | 78 70 61 6e 64 2d 66 69 |ctory (e|xpand-fi|
|00001090| 6c 65 2d 6e 61 6d 65 20 | 76 6d 2d 66 6f 6c 64 65 |le-name |vm-folde|
|000010a0| 72 2d 64 69 72 65 63 74 | 6f 72 79 29 20 64 65 66 |r-direct|ory) def|
|000010b0| 61 75 6c 74 2d 64 69 72 | 65 63 74 6f 72 79 29 29 |ault-dir|ectory))|
|000010c0| 20 28 6c 61 73 74 2d 63 | 6f 6d 6d 61 6e 64 20 6c | (last-c|ommand l|
|000010d0| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 29 20 28 74 68 |ast-comm|and) (th|
|000010e0| 69 73 2d 63 6f 6d 6d 61 | 6e 64 20 74 68 69 73 2d |is-comma|nd this-|
|000010f0| 63 6f 6d 6d 61 6e 64 29 | 29 20 28 72 65 61 64 2d |command)|) (read-|
|00001100| 66 69 6c 65 2d 6e 61 6d | 65 20 22 59 61 6e 6b 20 |file-nam|e "Yank |
|00001110| 66 72 6f 6d 20 66 6f 6c | 64 65 72 3a 20 22 20 64 |from fol|der: " d|
|00001120| 69 72 20 6e 69 6c 20 74 | 29 29 29 5d 29 0a 28 64 |ir nil t|)))]).(d|
|00001130| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 79 61 6e 6b |efalias |'vm-yank|
|00001140| 2d 6d 65 73 73 61 67 65 | 20 23 5b 28 6d 65 73 73 |-message| #[(mess|
|00001150| 61 67 65 29 20 22 c0 09 | 21 84 5c 6e 00 c2 c3 21 |age) "..|!.\n...!|
|00001160| 88 c4 09 21 84 1a 00 c2 | c5 0e 06 c7 48 c8 48 5c |...!....|....H.H\|
|00001170| 22 88 c9 ca 89 cb cc 24 | 88 0e 06 c7 48 cd 48 4a |"......$|....H.HJ|
|00001180| 16 06 70 60 ca 1e 0e 1e | 0f 1e 10 8c 7e 88 8a 0e |..p`....|....~...|
|00001190| 06 c7 48 d1 48 71 88 8c | 7e 88 d2 0e 10 0e 06 c8 |..H.Hq..|~.......|
|000011a0| 48 c7 48 0e 06 c8 48 d3 | 48 23 88 d4 20 0e 0f 0e |H.H...H.|H#.. ...|
|000011b0| 06 c8 48 d3 48 0e 06 c8 | 48 c7 48 5a 5c 5c 0e 10 |..H.H...|H.HZ\\..|
|000011c0| 93 16 0e 2a d5 0e 0e 21 | 88 0e 16 83 7b 00 d7 d6 |...*...!|....{...|
|000011d0| 21 82 8a 00 0e 18 83 86 | 00 d7 d8 21 82 8a 00 d9 |!.......|...!....|
|000011e0| 0e 06 21 2c 87 22 20 5b | 62 75 66 66 65 72 70 20 |..!,." [|bufferp |
|000011f0| 76 6d 2d 6d 61 69 6c 2d | 62 75 66 66 65 72 20 65 |vm-mail-|buffer e|
|00001200| 72 72 6f 72 20 22 54 68 | 69 73 20 69 73 20 6e 6f |rror "Th|is is no|
|00001210| 74 20 61 20 56 4d 20 4d | 61 69 6c 20 6d 6f 64 65 |t a VM M|ail mode|
|00001220| 20 62 75 66 66 65 72 2e | 22 20 62 75 66 66 65 72 | buffer.|" buffer|
|00001230| 2d 6e 61 6d 65 20 22 54 | 68 65 20 66 6f 6c 64 65 |-name "T|he folde|
|00001240| 72 20 62 75 66 66 65 72 | 20 63 6f 6e 74 61 69 6e |r buffer| contain|
|00001250| 69 6e 67 20 6d 65 73 73 | 61 67 65 20 25 64 20 68 |ing mess|age %d h|
|00001260| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|00001270| 20 6d 65 73 73 61 67 65 | 20 31 20 30 20 76 6d 2d | message| 1 0 vm-|
|00001280| 64 69 73 70 6c 61 79 20 | 6e 69 6c 20 28 76 6d 2d |display |nil (vm-|
|00001290| 79 61 6e 6b 2d 6d 65 73 | 73 61 67 65 29 20 28 76 |yank-mes|sage) (v|
|000012a0| 6d 2d 79 61 6e 6b 2d 6d | 65 73 73 61 67 65 20 63 |m-yank-m|essage c|
|000012b0| 6f 6d 70 6f 73 69 6e 67 | 2d 6d 65 73 73 61 67 65 |omposing|-message|
|000012c0| 29 20 35 20 65 6e 64 20 | 73 74 61 72 74 20 62 20 |) 5 end |start b |
|000012d0| 39 20 61 70 70 65 6e 64 | 2d 74 6f 2d 62 75 66 66 |9 append|-to-buff|
|000012e0| 65 72 20 34 20 6d 61 6b | 65 2d 6d 61 72 6b 65 72 |er 4 mak|e-marker|
|000012f0| 20 70 75 73 68 2d 6d 61 | 72 6b 20 6d 61 69 6c 2d | push-ma|rk mail-|
|00001300| 63 69 74 61 74 69 6f 6e | 2d 68 6f 6f 6b 20 72 75 |citation|-hook ru|
|00001310| 6e 2d 68 6f 6f 6b 73 20 | 6d 61 69 6c 2d 79 61 6e |n-hooks |mail-yan|
|00001320| 6b 2d 68 6f 6f 6b 73 20 | 76 6d 2d 6d 61 69 6c 2d |k-hooks |vm-mail-|
|00001330| 79 61 6e 6b 2d 64 65 66 | 61 75 6c 74 5d 20 35 20 |yank-def|ault] 5 |
|00001340| 22 5c 0a 59 61 6e 6b 20 | 6d 65 73 73 61 67 65 20 |"\.Yank |message |
|00001350| 6e 75 6d 62 65 72 20 4e | 20 69 6e 74 6f 20 74 68 |number N| into th|
|00001360| 65 20 63 75 72 72 65 6e | 74 20 62 75 66 66 65 72 |e curren|t buffer|
|00001370| 20 61 74 20 70 6f 69 6e | 74 2e 0a 57 68 65 6e 20 | at poin|t..When |
|00001380| 63 61 6c 6c 65 64 20 69 | 6e 74 65 72 61 63 74 69 |called i|nteracti|
|00001390| 76 65 6c 79 20 4e 20 69 | 73 20 61 6c 77 61 79 73 |vely N i|s always|
|000013a0| 20 72 65 61 64 20 66 72 | 6f 6d 20 74 68 65 20 6d | read fr|om the m|
|000013b0| 69 6e 69 62 75 66 66 65 | 72 2e 20 20 57 68 65 6e |inibuffe|r.  When|
|000013c0| 0a 63 61 6c 6c 65 64 20 | 6e 6f 6e 2d 69 6e 74 65 |.called |non-inte|
|000013d0| 72 61 63 74 69 76 65 6c | 79 20 74 68 65 20 66 69 |ractivel|y the fi|
|000013e0| 72 73 74 20 61 72 67 75 | 6d 65 6e 74 20 69 73 20 |rst argu|ment is |
|000013f0| 65 78 70 65 63 74 65 64 | 20 74 6f 20 62 65 20 61 |expected| to be a|
|00001400| 0a 6d 65 73 73 61 67 65 | 20 73 74 72 75 63 74 2e |.message| struct.|
|00001410| 0a 0a 54 68 69 73 20 63 | 6f 6d 6d 61 6e 64 20 69 |..This c|ommand i|
|00001420| 73 20 6d 65 61 6e 74 20 | 74 6f 20 62 65 20 75 73 |s meant |to be us|
|00001430| 65 64 20 69 6e 20 56 4d | 20 63 72 65 61 74 65 64 |ed in VM| created|
|00001440| 20 4d 61 69 6c 20 6d 6f | 64 65 20 62 75 66 66 65 | Mail mo|de buffe|
|00001450| 72 73 3b 20 74 68 65 0a | 79 61 6e 6b 65 64 20 6d |rs; the.|yanked m|
|00001460| 65 73 73 61 67 65 20 63 | 6f 6d 65 73 20 66 72 6f |essage c|omes fro|
|00001470| 6d 20 74 68 65 20 6d 61 | 69 6c 20 62 75 66 66 65 |m the ma|il buffe|
|00001480| 72 20 63 6f 6e 74 61 69 | 6e 69 6e 67 20 74 68 65 |r contai|ning the|
|00001490| 20 6d 65 73 73 61 67 65 | 20 79 6f 75 0a 61 72 65 | message| you.are|
|000014a0| 20 72 65 70 6c 79 69 6e | 67 20 74 6f 2c 20 66 6f | replyin|g to, fo|
|000014b0| 72 77 61 72 64 69 6e 67 | 2c 20 6f 72 20 69 6e 76 |rwarding|, or inv|
|000014c0| 6f 6b 65 64 20 56 4d 27 | 73 20 6d 61 69 6c 20 63 |oked VM'|s mail c|
|000014d0| 6f 6d 6d 61 6e 64 20 66 | 72 6f 6d 2e 0a 0a 41 6c |ommand f|rom...Al|
|000014e0| 6c 20 6d 65 73 73 61 67 | 65 20 68 65 61 64 65 72 |l messag|e header|
|000014f0| 73 20 61 72 65 20 79 61 | 6e 6b 65 64 20 61 6c 6f |s are ya|nked alo|
|00001500| 6e 67 20 77 69 74 68 20 | 74 68 65 20 74 65 78 74 |ng with |the text|
|00001510| 2e 20 20 50 6f 69 6e 74 | 20 69 73 0a 6c 65 66 74 |.  Point| is.left|
|00001520| 20 62 65 66 6f 72 65 20 | 74 68 65 20 69 6e 73 65 | before |the inse|
|00001530| 72 74 65 64 20 74 65 78 | 74 2c 20 74 68 65 20 6d |rted tex|t, the m|
|00001540| 61 72 6b 20 61 66 74 65 | 72 2e 20 20 41 6e 79 20 |ark afte|r.  Any |
|00001550| 68 6f 6f 6b 0a 66 75 6e | 63 74 69 6f 6e 73 20 62 |hook.fun|ctions b|
|00001560| 6f 75 6e 64 20 74 6f 20 | 6d 61 69 6c 2d 63 69 74 |ound to |mail-cit|
|00001570| 61 74 69 6f 6e 2d 68 6f | 6f 6b 20 61 72 65 20 72 |ation-ho|ok are r|
|00001580| 75 6e 2c 20 61 66 74 65 | 72 20 69 6e 73 65 72 74 |un, afte|r insert|
|00001590| 69 6e 67 0a 74 68 65 20 | 74 65 78 74 20 61 6e 64 |ing.the |text and|
|000015a0| 20 73 65 74 74 69 6e 67 | 20 70 6f 69 6e 74 20 61 | setting| point a|
|000015b0| 6e 64 20 6d 61 72 6b 2e | 20 20 46 6f 72 20 62 61 |nd mark.|  For ba|
|000015c0| 63 6b 77 61 72 64 20 63 | 6f 6d 70 61 74 69 62 69 |ckward c|ompatibi|
|000015d0| 6c 69 74 79 2c 0a 69 66 | 20 6d 61 69 6c 2d 63 69 |lity,.if| mail-ci|
|000015e0| 74 61 74 69 6f 6e 2d 68 | 6f 6f 6b 20 69 73 20 73 |tation-h|ook is s|
|000015f0| 65 74 20 74 6f 20 6e 69 | 6c 2c 20 60 6d 61 69 6c |et to ni|l, `mail|
|00001600| 2d 79 61 6e 6b 2d 68 6f | 6f 6b 73 27 20 69 73 20 |-yank-ho|oks' is |
|00001610| 72 75 6e 0a 69 6e 73 74 | 65 61 64 2e 0a 0a 49 66 |run.inst|ead...If|
|00001620| 20 6d 61 69 6c 2d 63 69 | 74 61 74 69 6f 6e 2d 68 | mail-ci|tation-h|
|00001630| 6f 6f 6b 20 61 6e 64 20 | 6d 61 69 6c 2d 79 61 6e |ook and |mail-yan|
|00001640| 6b 2d 68 6f 6f 6b 73 20 | 61 72 65 20 62 6f 74 68 |k-hooks |are both|
|00001650| 20 6e 69 6c 2c 20 74 68 | 69 73 0a 64 65 66 61 75 | nil, th|is.defau|
|00001660| 6c 74 20 61 63 74 69 6f | 6e 20 69 73 20 74 61 6b |lt actio|n is tak|
|00001670| 65 6e 3a 20 74 68 65 20 | 79 61 6e 6b 65 64 20 68 |en: the |yanked h|
|00001680| 65 61 64 65 72 73 20 61 | 72 65 20 74 72 69 6d 6d |eaders a|re trimm|
|00001690| 65 64 20 61 73 0a 73 70 | 65 63 69 66 69 65 64 20 |ed as.sp|ecified |
|000016a0| 62 79 20 76 6d 2d 69 6e | 63 6c 75 64 65 64 2d 74 |by vm-in|cluded-t|
|000016b0| 65 78 74 2d 68 65 61 64 | 65 72 73 20 61 6e 64 0a |ext-head|ers and.|
|000016c0| 76 6d 2d 69 6e 63 6c 75 | 64 65 64 2d 74 65 78 74 |vm-inclu|ded-text|
|000016d0| 2d 64 69 73 63 61 72 64 | 2d 68 65 61 64 65 72 2d |-discard|-header-|
|000016e0| 72 65 67 65 78 70 2c 20 | 61 6e 64 20 74 68 65 20 |regexp, |and the |
|000016f0| 76 61 6c 75 65 20 6f 66 | 0a 76 6d 2d 69 6e 63 6c |value of|.vm-incl|
|00001700| 75 64 65 64 2d 74 65 78 | 74 2d 70 72 65 66 69 78 |uded-tex|t-prefix|
|00001710| 20 69 73 20 70 72 65 70 | 65 6e 64 65 64 20 74 6f | is prep|ended to|
|00001720| 20 65 76 65 72 79 20 79 | 61 6e 6b 65 64 20 6c 69 | every y|anked li|
|00001730| 6e 65 2e 22 20 28 6c 69 | 73 74 20 28 6c 65 74 20 |ne." (li|st (let |
|00001740| 28 6d 70 20 64 65 66 61 | 75 6c 74 20 28 72 65 73 |(mp defa|ult (res|
|00001750| 75 6c 74 20 30 29 20 70 | 72 6f 6d 70 74 20 28 6c |ult 0) p|rompt (l|
|00001760| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 20 6c 61 73 74 |ast-comm|and last|
|00001770| 2d 63 6f 6d 6d 61 6e 64 | 29 20 28 74 68 69 73 2d |-command|) (this-|
|00001780| 63 6f 6d 6d 61 6e 64 20 | 74 68 69 73 2d 63 6f 6d |command |this-com|
|00001790| 6d 61 6e 64 29 29 20 28 | 73 61 76 65 2d 65 78 63 |mand)) (|save-exc|
|000017a0| 75 72 73 69 6f 6e 20 28 | 76 6d 2d 73 65 6c 65 63 |ursion (|vm-selec|
|000017b0| 74 2d 66 6f 6c 64 65 72 | 2d 62 75 66 66 65 72 29 |t-folder|-buffer)|
|000017c0| 20 28 73 65 74 71 20 64 | 65 66 61 75 6c 74 20 28 | (setq d|efault (|
|000017d0| 61 6e 64 20 76 6d 2d 6d | 65 73 73 61 67 65 2d 70 |and vm-m|essage-p|
|000017e0| 6f 69 6e 74 65 72 20 28 | 76 6d 2d 6e 75 6d 62 65 |ointer (|vm-numbe|
|000017f0| 72 2d 6f 66 20 28 63 61 | 72 20 76 6d 2d 6d 65 73 |r-of (ca|r vm-mes|
|00001800| 73 61 67 65 2d 70 6f 69 | 6e 74 65 72 29 29 29 20 |sage-poi|nter))) |
|00001810| 70 72 6f 6d 70 74 20 28 | 69 66 20 64 65 66 61 75 |prompt (|if defau|
|00001820| 6c 74 20 28 66 6f 72 6d | 61 74 20 22 59 61 6e 6b |lt (form|at "Yank|
|00001830| 20 6d 65 73 73 61 67 65 | 20 6e 75 6d 62 65 72 3a | message| number:|
|00001840| 20 28 64 65 66 61 75 6c | 74 20 25 73 29 20 22 20 | (defaul|t %s) " |
|00001850| 64 65 66 61 75 6c 74 29 | 20 22 59 61 6e 6b 20 6d |default)| "Yank m|
|00001860| 65 73 73 61 67 65 20 6e | 75 6d 62 65 72 3a 20 22 |essage n|umber: "|
|00001870| 29 29 20 28 77 68 69 6c | 65 20 28 7a 65 72 6f 70 |)) (whil|e (zerop|
|00001880| 20 72 65 73 75 6c 74 29 | 20 28 73 65 74 71 20 72 | result)| (setq r|
|00001890| 65 73 75 6c 74 20 28 72 | 65 61 64 2d 73 74 72 69 |esult (r|ead-stri|
|000018a0| 6e 67 20 70 72 6f 6d 70 | 74 29 29 20 28 61 6e 64 |ng promp|t)) (and|
|000018b0| 20 28 73 74 72 69 6e 67 | 3d 20 72 65 73 75 6c 74 | (string|= result|
|000018c0| 20 22 22 29 20 64 65 66 | 61 75 6c 74 20 28 73 65 | "") def|ault (se|
|000018d0| 74 71 20 72 65 73 75 6c | 74 20 64 65 66 61 75 6c |tq resul|t defaul|
|000018e0| 74 29 29 20 28 73 65 74 | 71 20 72 65 73 75 6c 74 |t)) (set|q result|
|000018f0| 20 28 73 74 72 69 6e 67 | 2d 74 6f 2d 69 6e 74 20 | (string|-to-int |
|00001900| 72 65 73 75 6c 74 29 29 | 29 20 28 69 66 20 28 6e |result))|) (if (n|
|00001910| 75 6c 6c 20 28 73 65 74 | 71 20 6d 70 20 28 6e 74 |ull (set|q mp (nt|
|00001920| 68 63 64 72 20 28 31 2d | 20 72 65 73 75 6c 74 29 |hcdr (1-| result)|
|00001930| 20 76 6d 2d 6d 65 73 73 | 61 67 65 2d 6c 69 73 74 | vm-mess|age-list|
|00001940| 29 29 29 20 28 65 72 72 | 6f 72 20 22 4e 6f 20 73 |))) (err|or "No s|
|00001950| 75 63 68 20 6d 65 73 73 | 61 67 65 2e 22 29 29 29 |uch mess|age.")))|
|00001960| 20 28 63 61 72 20 6d 70 | 29 29 29 5d 29 0a 28 64 | (car mp|)))]).(d|
|00001970| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 6d 61 69 6c |efalias |'vm-mail|
|00001980| 2d 73 65 6e 64 2d 61 6e | 64 2d 65 78 69 74 20 23 |-send-an|d-exit #|
|00001990| 5b 28 61 72 67 29 20 22 | 70 18 c1 20 88 08 70 3d |[(arg) "|p.. ..p=|
|000019a0| 83 18 00 c2 70 21 88 c3 | 70 c4 c5 c6 24 82 1e 00 |....p!..|p...$...|
|000019b0| c3 c4 89 c7 c8 24 29 87 | 22 20 5b 62 20 76 6d 2d |.....$).|" [b vm-|
|000019c0| 6d 61 69 6c 2d 73 65 6e | 64 20 62 75 72 79 2d 62 |mail-sen|d bury-b|
|000019d0| 75 66 66 65 72 20 76 6d | 2d 64 69 73 70 6c 61 79 |uffer vm|-display|
|000019e0| 20 6e 69 6c 20 28 76 6d | 2d 6d 61 69 6c 2d 73 65 | nil (vm|-mail-se|
|000019f0| 6e 64 2d 61 6e 64 2d 65 | 78 69 74 29 20 28 76 6d |nd-and-e|xit) (vm|
|00001a00| 2d 6d 61 69 6c 2d 73 65 | 6e 64 2d 61 6e 64 2d 65 |-mail-se|nd-and-e|
|00001a10| 78 69 74 20 72 65 61 64 | 69 6e 67 2d 6d 65 73 73 |xit read|ing-mess|
|00001a20| 61 67 65 20 73 74 61 72 | 74 75 70 29 20 28 76 6d |age star|tup) (vm|
|00001a30| 2d 6d 61 69 6c 2d 73 65 | 6e 64 2d 61 6e 64 2d 65 |-mail-se|nd-and-e|
|00001a40| 78 69 74 29 20 28 76 6d | 2d 6d 61 69 6c 2d 73 65 |xit) (vm|-mail-se|
|00001a50| 6e 64 2d 61 6e 64 2d 65 | 78 69 74 20 72 65 61 64 |nd-and-e|xit read|
|00001a60| 69 6e 67 2d 6d 65 73 73 | 61 67 65 20 73 74 61 72 |ing-mess|age star|
|00001a70| 74 75 70 29 5d 20 35 20 | 22 5c 0a 4a 75 73 74 20 |tup)] 5 |"\.Just |
|00001a80| 6c 69 6b 65 20 6d 61 69 | 6c 2d 73 65 6e 64 2d 61 |like mai|l-send-a|
|00001a90| 6e 64 2d 65 78 69 74 20 | 65 78 63 65 70 74 20 74 |nd-exit |except t|
|00001aa0| 68 61 74 20 56 4d 20 66 | 6c 61 67 73 20 74 68 65 |hat VM f|lags the|
|00001ab0| 20 61 70 70 72 6f 70 72 | 69 61 74 65 20 6d 65 73 | appropr|iate mes|
|00001ac0| 73 61 67 65 28 73 29 0a | 61 73 20 68 61 76 69 6e |sage(s).|as havin|
|00001ad0| 67 20 62 65 65 6e 20 72 | 65 70 6c 69 65 64 20 74 |g been r|eplied t|
|00001ae0| 6f 2c 20 69 66 20 61 70 | 70 72 6f 70 72 69 61 74 |o, if ap|propriat|
|00001af0| 65 2e 22 20 22 50 22 5d | 29 0a 28 62 79 74 65 2d |e." "P"]|).(byte-|
|00001b00| 63 6f 64 65 20 22 c0 c1 | c2 5c 22 88 c0 c3 c4 5c |code "..|.\"....\|
|00001b10| 22 87 22 20 5b 64 65 66 | 61 6c 69 61 73 20 76 6d |"." [def|alias vm|
|00001b20| 2d 6b 65 65 70 2d 6d 61 | 69 6c 2d 62 75 66 66 65 |-keep-ma|il-buffe|
|00001b30| 72 20 23 5b 28 62 75 66 | 66 65 72 29 20 22 08 09 |r #[(buf|fer) "..|
|00001b40| 3e 83 0b 00 c2 08 09 5c | 22 11 08 09 42 11 c3 c4 |>......\|"...B...|
|00001b50| 09 c5 23 11 0e 06 c5 3d | 3f 85 3e 00 0e 06 86 23 |..#....=|?.>....#|
|00001b60| 00 c7 09 9b 1e 08 c9 ca | 0e 08 5c 22 88 09 85 3d |........|..\"...=|
|00001b70| 00 0e 08 85 3d 00 0e 08 | 40 09 3e cb a1 29 87 22 |....=...|@.>..)."|
|00001b80| 20 5b 62 75 66 66 65 72 | 20 76 6d 2d 6b 65 70 74 | [buffer| vm-kept|
|00001b90| 2d 6d 61 69 6c 2d 62 75 | 66 66 65 72 73 20 64 65 |-mail-bu|ffers de|
|00001ba0| 6c 71 20 76 6d 2d 64 65 | 6c 65 74 65 20 62 75 66 |lq vm-de|lete buf|
|00001bb0| 66 65 72 2d 6e 61 6d 65 | 20 74 20 76 6d 2d 6b 65 |fer-name| t vm-ke|
|00001bc0| 65 70 2d 73 65 6e 74 2d | 6d 65 73 73 61 67 65 73 |ep-sent-|messages|
|00001bd0| 20 30 20 65 78 74 72 61 | 73 20 6d 61 70 63 61 72 | 0 extra|s mapcar|
|00001be0| 20 23 5b 28 62 29 20 22 | c0 09 21 85 09 00 c2 09 | #[(b) "|..!.....|
|00001bf0| 21 87 22 20 5b 62 75 66 | 66 65 72 2d 6e 61 6d 65 |!." [buf|fer-name|
|00001c00| 20 62 20 6b 69 6c 6c 2d | 62 75 66 66 65 72 5d 20 | b kill-|buffer] |
|00001c10| 32 5d 20 6e 69 6c 5d 20 | 34 5d 20 76 6d 2d 68 65 |2] nil] |4] vm-he|
|00001c20| 6c 70 2d 74 61 6c 65 20 | 23 5b 6e 69 6c 20 22 8a |lp-tale |#[nil ".|
|00001c30| 65 62 88 c0 20 85 30 00 | c0 c1 21 84 16 00 c2 20 |eb.. .0.|..!.... |
|00001c40| 62 88 82 04 00 c3 20 62 | 88 c4 c5 c6 20 c7 23 83 |b..... b|.... .#.|
|00001c50| 29 00 c8 c9 ca 20 5c 22 | 88 c2 20 62 88 82 04 00 |).... \"|.. b....|
|00001c60| 29 87 22 20 5b 76 6d 2d | 6d 61 74 63 68 2d 68 65 |)." [vm-|match-he|
|00001c70| 61 64 65 72 20 22 54 6f | 3a 5c 5c 7c 52 65 73 65 |ader "To|:\\|Rese|
|00001c80| 6e 74 2d 54 6f 3a 5c 5c | 7c 43 63 3a 5c 5c 7c 52 |nt-To:\\||Cc:\\|R|
|00001c90| 65 73 65 6e 74 2d 43 63 | 3a 22 20 76 6d 2d 6d 61 |esent-Cc|:" vm-ma|
|00001ca0| 74 63 68 65 64 2d 68 65 | 61 64 65 72 2d 65 6e 64 |tched-he|ader-end|
|00001cb0| 20 76 6d 2d 6d 61 74 63 | 68 65 64 2d 68 65 61 64 | vm-matc|hed-head|
|00001cc0| 65 72 2d 63 6f 6e 74 65 | 6e 74 73 2d 73 74 61 72 |er-conte|nts-star|
|00001cd0| 74 20 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 |t re-sea|rch-forw|
|00001ce0| 61 72 64 20 22 5b 5e 2c | 20 09 5d 5b 20 09 5d 2a |ard "[^,| .][ .]*|
|00001cf0| 5c 6e 5b 20 09 5c 6e 5d | 2b 5b 5e 20 09 5c 6e 5d |\n[ .\n]|+[^ .\n]|
|00001d00| 22 20 76 6d 2d 6d 61 74 | 63 68 65 64 2d 68 65 61 |" vm-mat|ched-hea|
|00001d10| 64 65 72 2d 63 6f 6e 74 | 65 6e 74 73 2d 65 6e 64 |der-cont|ents-end|
|00001d20| 20 74 20 65 72 72 6f 72 | 20 22 74 61 6c 65 20 69 | t error| "tale i|
|00001d30| 73 20 61 6e 20 69 64 69 | 6f 74 2c 20 61 6e 64 20 |s an idi|ot, and |
|00001d40| 73 6f 20 61 72 65 20 79 | 6f 75 2e 20 3a 2d 29 22 |so are y|ou. :-)"|
|00001d50| 20 75 73 65 72 2d 6c 6f | 67 69 6e 2d 6e 61 6d 65 | user-lo|gin-name|
|00001d60| 5d 20 34 5d 5d 20 33 29 | 0a 28 64 65 66 61 6c 69 |] 4]] 3)|.(defali|
|00001d70| 61 73 20 27 76 6d 2d 6d | 61 69 6c 2d 73 65 6e 64 |as 'vm-m|ail-send|
|00001d80| 20 23 5b 6e 69 6c 20 22 | 08 83 07 00 c1 20 88 5c | #[nil "|..... .\|
|00001d90| 6e 83 15 00 c3 c4 21 84 | 15 00 c5 c6 21 88 c7 c8 |n.....!.|....!...|
|00001da0| 21 88 8a c9 20 88 29 ca | 20 88 0e 0b cc 3d 83 2e |!... .).| ....=..|
|00001db0| 00 cd 20 88 82 45 00 0e | 0b ce 3d 83 3b 00 cf 20 |.. ..E..|..=.;.. |
|00001dc0| 88 82 45 00 0e 0b d0 3d | 83 45 00 d1 20 88 d2 70 |..E....=|.E.. ..p|
|00001dd0| 21 88 d3 d4 89 d5 d6 24 | 87 22 20 5b 76 6d 2d 74 |!......$|." [vm-t|
|00001de0| 61 6c 65 2d 69 73 2d 61 | 6e 2d 69 64 69 6f 74 20 |ale-is-a|n-idiot |
|00001df0| 76 6d 2d 68 65 6c 70 2d | 74 61 6c 65 20 76 6d 2d |vm-help-|tale vm-|
|00001e00| 63 6f 6e 66 69 72 6d 2d | 6d 61 69 6c 2d 73 65 6e |confirm-|mail-sen|
|00001e10| 64 20 79 2d 6f 72 2d 6e | 2d 70 20 22 53 65 6e 64 |d y-or-n|-p "Send|
|00001e20| 20 74 68 65 20 6d 65 73 | 73 61 67 65 3f 20 22 20 | the mes|sage? " |
|00001e30| 65 72 72 6f 72 20 22 4d | 65 73 73 61 67 65 20 6e |error "M|essage n|
|00001e40| 6f 74 20 73 65 6e 74 2e | 22 20 73 65 74 2d 62 75 |ot sent.|" set-bu|
|00001e50| 66 66 65 72 2d 6d 6f 64 | 69 66 69 65 64 2d 70 20 |ffer-mod|ified-p |
|00001e60| 74 20 6d 61 69 6c 2d 73 | 65 6e 64 20 76 6d 2d 72 |t mail-s|end vm-r|
|00001e70| 65 6e 61 6d 65 2d 63 75 | 72 72 65 6e 74 2d 6d 61 |ename-cu|rrent-ma|
|00001e80| 69 6c 2d 62 75 66 66 65 | 72 20 76 6d 2d 73 79 73 |il-buffe|r vm-sys|
|00001e90| 74 65 6d 2d 73 74 61 74 | 65 20 72 65 70 6c 79 69 |tem-stat|e replyi|
|00001ea0| 6e 67 20 76 6d 2d 6d 61 | 69 6c 2d 6d 61 72 6b 2d |ng vm-ma|il-mark-|
|00001eb0| 72 65 70 6c 69 65 64 20 | 66 6f 72 77 61 72 64 69 |replied |forwardi|
|00001ec0| 6e 67 20 76 6d 2d 6d 61 | 69 6c 2d 6d 61 72 6b 2d |ng vm-ma|il-mark-|
|00001ed0| 66 6f 72 77 61 72 64 65 | 64 20 72 65 64 69 73 74 |forwarde|d redist|
|00001ee0| 72 69 62 75 74 69 6e 67 | 20 76 6d 2d 6d 61 69 6c |ributing| vm-mail|
|00001ef0| 2d 6d 61 72 6b 2d 72 65 | 64 69 73 74 72 69 62 75 |-mark-re|distribu|
|00001f00| 74 65 64 20 76 6d 2d 6b | 65 65 70 2d 6d 61 69 6c |ted vm-k|eep-mail|
|00001f10| 2d 62 75 66 66 65 72 20 | 76 6d 2d 64 69 73 70 6c |-buffer |vm-displ|
|00001f20| 61 79 20 6e 69 6c 20 28 | 76 6d 2d 6d 61 69 6c 2d |ay nil (|vm-mail-|
|00001f30| 73 65 6e 64 29 20 28 76 | 6d 2d 6d 61 69 6c 2d 73 |send) (v|m-mail-s|
|00001f40| 65 6e 64 29 5d 20 35 20 | 22 5c 0a 4a 75 73 74 20 |end)] 5 |"\.Just |
|00001f50| 6c 69 6b 65 20 6d 61 69 | 6c 2d 73 65 6e 64 20 65 |like mai|l-send e|
|00001f60| 78 63 65 70 74 20 74 68 | 61 74 20 56 4d 20 66 6c |xcept th|at VM fl|
|00001f70| 61 67 73 20 74 68 65 20 | 61 70 70 72 6f 70 72 69 |ags the |appropri|
|00001f80| 61 74 65 20 6d 65 73 73 | 61 67 65 28 73 29 0a 61 |ate mess|age(s).a|
|00001f90| 73 20 72 65 70 6c 69 65 | 64 20 74 6f 2c 20 66 6f |s replie|d to, fo|
|00001fa0| 72 77 61 72 64 65 64 2c | 20 65 74 63 2c 20 69 66 |rwarded,| etc, if|
|00001fb0| 20 61 70 70 72 6f 70 72 | 69 61 74 65 2e 22 20 6e | appropr|iate." n|
|00001fc0| 69 6c 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |il]).(by|te-code |
|00001fd0| 22 c0 c1 c2 5c 22 88 c0 | c3 c4 5c 22 88 c0 c5 c6 |"...\"..|..\"....|
|00001fe0| 5c 22 88 c0 c7 c8 5c 22 | 87 22 20 5b 64 65 66 61 |\"....\"|." [defa|
|00001ff0| 6c 69 61 73 20 76 6d 2d | 72 65 6e 61 6d 65 2d 63 |lias vm-|rename-c|
|00002000| 75 72 72 65 6e 74 2d 6d | 61 69 6c 2d 62 75 66 66 |urrent-m|ail-buff|
|00002010| 65 72 20 23 5b 6e 69 6c | 20 22 c0 19 c2 c3 c4 20 |er #[nil| "..... |
|00002020| 5c 22 3f 85 78 00 c0 89 | 89 1d 1e 06 1e 07 c4 20 |\"?.x...|....... |
|00002030| c8 48 c9 55 84 26 00 ca | cb c4 20 5c 22 16 07 82 |.H.U.&..|.. \"...|
|00002040| 58 00 c0 1e 5c 66 cd ce | 21 89 16 5c 66 47 c8 55 |X...\f..|!..\fG.U|
|00002050| 83 50 00 cd cf 21 89 16 | 5c 66 47 c8 55 83 50 00 |.P...!..|\fG.U.P.|
|00002060| cd d0 21 89 16 5c 66 47 | c8 55 83 50 00 d1 16 5c |..!..\fG|.U.P...\|
|00002070| 66 ca d2 0e 5c 66 5c 22 | 16 07 29 0e 07 16 06 d3 |f...\f\"|..).....|
|00002080| 15 d4 0e 06 21 83 73 00 | ca d5 0e 07 0d 23 16 06 |....!.s.|.....#..|
|00002090| 0d 54 15 82 5e 00 d6 0e | 06 21 2b 29 87 22 20 5b |.T..^...|.!+)." [|
|000020a0| 6e 69 6c 20 63 61 73 65 | 2d 66 6f 6c 64 2d 73 65 |nil case|-fold-se|
|000020b0| 61 72 63 68 20 73 74 72 | 69 6e 67 2d 6d 61 74 63 |arch str|ing-matc|
|000020c0| 68 20 22 5e 73 65 6e 74 | 20 22 20 62 75 66 66 65 |h "^sent| " buffe|
|000020d0| 72 2d 6e 61 6d 65 20 6e | 20 6e 61 6d 65 20 70 72 |r-name n| name pr|
|000020e0| 65 66 69 78 20 30 20 34 | 32 20 66 6f 72 6d 61 74 |efix 0 4|2 format|
|000020f0| 20 22 73 65 6e 74 20 25 | 73 22 20 72 65 63 69 70 | "sent %|s" recip|
|00002100| 69 65 6e 74 73 20 6d 61 | 69 6c 2d 66 65 74 63 68 |ients ma|il-fetch|
|00002110| 2d 66 69 65 6c 64 20 22 | 54 6f 22 20 22 43 63 22 |-field "|To" "Cc"|
|00002120| 20 22 42 63 63 22 20 22 | 74 68 65 20 68 6f 72 73 | "Bcc" "|the hors|
|00002130| 65 20 77 69 74 68 20 6e | 6f 20 6e 61 6d 65 22 20 |e with n|o name" |
|00002140| 22 73 65 6e 74 20 6d 61 | 69 6c 20 74 6f 20 25 73 |"sent ma|il to %s|
|00002150| 22 20 31 20 67 65 74 2d | 62 75 66 66 65 72 20 22 |" 1 get-|buffer "|
|00002160| 25 73 3c 25 64 3e 22 20 | 72 65 6e 61 6d 65 2d 62 |%s<%d>" |rename-b|
|00002170| 75 66 66 65 72 5d 20 34 | 5d 20 76 6d 2d 6d 61 69 |uffer] 4|] vm-mai|
|00002180| 6c 2d 6d 61 72 6b 2d 72 | 65 70 6c 69 65 64 20 23 |l-mark-r|eplied #|
|00002190| 5b 6e 69 6c 20 22 8a 08 | 89 19 83 37 00 c2 09 40 |[nil "..|...7...@|
|000021a0| c3 48 c4 48 21 83 30 00 | 09 40 c3 48 c4 48 71 88 |.H.H!.0.|.@.H.Hq.|
|000021b0| 09 40 0d 3e 83 30 00 09 | 40 c6 48 c7 48 84 30 00 |.@.>.0..|@.H.H.0.|
|000021c0| c8 09 40 c9 5c 22 88 09 | 41 89 11 84 07 00 ca 20 |..@.\"..|A...... |
|000021d0| 2a 87 22 20 5b 76 6d 2d | 72 65 70 6c 79 2d 6c 69 |*." [vm-|reply-li|
|000021e0| 73 74 20 6d 70 20 62 75 | 66 66 65 72 2d 6e 61 6d |st mp bu|ffer-nam|
|000021f0| 65 20 31 20 39 20 76 6d | 2d 6d 65 73 73 61 67 65 |e 1 9 vm|-message|
|00002200| 2d 6c 69 73 74 20 32 20 | 34 20 76 6d 2d 73 65 74 |-list 2 |4 vm-set|
|00002210| 2d 72 65 70 6c 69 65 64 | 2d 66 6c 61 67 20 74 20 |-replied|-flag t |
|00002220| 76 6d 2d 75 70 64 61 74 | 65 2d 73 75 6d 6d 61 72 |vm-updat|e-summar|
|00002230| 79 2d 61 6e 64 2d 6d 6f | 64 65 2d 6c 69 6e 65 5d |y-and-mo|de-line]|
|00002240| 20 34 5d 20 76 6d 2d 6d | 61 69 6c 2d 6d 61 72 6b | 4] vm-m|ail-mark|
|00002250| 2d 66 6f 72 77 61 72 64 | 65 64 20 23 5b 6e 69 6c |-forward|ed #[nil|
|00002260| 20 22 8a 08 89 19 83 37 | 00 c2 09 40 c3 48 c4 48 | ".....7|...@.H.H|
|00002270| 21 83 30 00 09 40 c3 48 | c4 48 71 88 09 40 0d 3e |!.0..@.H|.Hq..@.>|
|00002280| 83 30 00 09 40 c6 48 c7 | 48 84 30 00 c8 09 40 c9 |.0..@.H.|H.0...@.|
|00002290| 5c 22 88 09 41 89 11 84 | 07 00 ca 20 2a 87 22 20 |\"..A...|... *." |
|000022a0| 5b 76 6d 2d 66 6f 72 77 | 61 72 64 2d 6c 69 73 74 |[vm-forw|ard-list|
|000022b0| 20 6d 70 20 62 75 66 66 | 65 72 2d 6e 61 6d 65 20 | mp buff|er-name |
|000022c0| 31 20 39 20 76 6d 2d 6d | 65 73 73 61 67 65 2d 6c |1 9 vm-m|essage-l|
|000022d0| 69 73 74 20 32 20 36 20 | 76 6d 2d 73 65 74 2d 66 |ist 2 6 |vm-set-f|
|000022e0| 6f 72 77 61 72 64 65 64 | 2d 66 6c 61 67 20 74 20 |orwarded|-flag t |
|000022f0| 76 6d 2d 75 70 64 61 74 | 65 2d 73 75 6d 6d 61 72 |vm-updat|e-summar|
|00002300| 79 2d 61 6e 64 2d 6d 6f | 64 65 2d 6c 69 6e 65 5d |y-and-mo|de-line]|
|00002310| 20 34 5d 20 76 6d 2d 6d | 61 69 6c 2d 6d 61 72 6b | 4] vm-m|ail-mark|
|00002320| 2d 72 65 64 69 73 74 72 | 69 62 75 74 65 64 20 23 |-redistr|ibuted #|
|00002330| 5b 6e 69 6c 20 22 8a 08 | 89 19 83 37 00 c2 09 40 |[nil "..|...7...@|
|00002340| c3 48 c4 48 21 83 30 00 | 09 40 c3 48 c4 48 71 88 |.H.H!.0.|.@.H.Hq.|
|00002350| 09 40 0d 3e 83 30 00 09 | 40 c6 48 c7 48 84 30 00 |.@.>.0..|@.H.H.0.|
|00002360| c8 09 40 c9 5c 22 88 09 | 41 89 11 84 07 00 ca 20 |..@.\"..|A...... |
|00002370| 2a 87 22 20 5b 76 6d 2d | 72 65 64 69 73 74 72 69 |*." [vm-|redistri|
|00002380| 62 75 74 65 2d 6c 69 73 | 74 20 6d 70 20 62 75 66 |bute-lis|t mp buf|
|00002390| 66 65 72 2d 6e 61 6d 65 | 20 31 20 39 20 76 6d 2d |fer-name| 1 9 vm-|
|000023a0| 6d 65 73 73 61 67 65 2d | 6c 69 73 74 20 32 20 38 |message-|list 2 8|
|000023b0| 20 76 6d 2d 73 65 74 2d | 72 65 64 69 73 74 72 69 | vm-set-|redistri|
|000023c0| 62 75 74 65 64 2d 66 6c | 61 67 20 74 20 76 6d 2d |buted-fl|ag t vm-|
|000023d0| 75 70 64 61 74 65 2d 73 | 75 6d 6d 61 72 79 2d 61 |update-s|ummary-a|
|000023e0| 6e 64 2d 6d 6f 64 65 2d | 6c 69 6e 65 5d 20 34 5d |nd-mode-|line] 4]|
|000023f0| 5d 20 33 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |] 3).(de|falias '|
|00002400| 76 6d 2d 72 65 70 6c 79 | 20 23 5b 28 63 6f 75 6e |vm-reply| #[(coun|
|00002410| 74 29 20 22 c0 20 88 09 | 83 16 00 c2 09 21 84 13 |t) ". ..|.....!..|
|00002420| 00 c3 c4 21 83 16 00 09 | 71 88 c5 20 88 c6 20 88 |...!....|q.. .. .|
|00002430| c7 c8 89 0e 09 23 87 22 | 20 5b 76 6d 2d 66 6f 6c |.....#."| [vm-fol|
|00002440| 6c 6f 77 2d 73 75 6d 6d | 61 72 79 2d 63 75 72 73 |low-summ|ary-curs|
|00002450| 6f 72 20 76 6d 2d 6d 61 | 69 6c 2d 62 75 66 66 65 |or vm-ma|il-buffe|
|00002460| 72 20 62 75 66 66 65 72 | 2d 6e 61 6d 65 20 65 72 |r buffer|-name er|
|00002470| 72 6f 72 20 22 46 6f 6c | 64 65 72 20 62 75 66 66 |ror "Fol|der buff|
|00002480| 65 72 20 68 61 73 20 62 | 65 65 6e 20 6b 69 6c 6c |er has b|een kill|
|00002490| 65 64 2e 22 20 76 6d 2d | 63 68 65 63 6b 2d 66 6f |ed." vm-|check-fo|
|000024a0| 72 2d 6b 69 6c 6c 65 64 | 2d 73 75 6d 6d 61 72 79 |r-killed|-summary|
|000024b0| 20 76 6d 2d 65 72 72 6f | 72 2d 69 66 2d 66 6f 6c | vm-erro|r-if-fol|
|000024c0| 64 65 72 2d 65 6d 70 74 | 79 20 76 6d 2d 64 6f 2d |der-empt|y vm-do-|
|000024d0| 72 65 70 6c 79 20 6e 69 | 6c 20 63 6f 75 6e 74 5d |reply ni|l count]|
|000024e0| 20 34 20 22 5c 0a 52 65 | 70 6c 79 20 74 6f 20 74 | 4 "\.Re|ply to t|
|000024f0| 68 65 20 73 65 6e 64 65 | 72 20 6f 66 20 74 68 65 |he sende|r of the|
|00002500| 20 63 75 72 72 65 6e 74 | 20 6d 65 73 73 61 67 65 | current| message|
|00002510| 2e 0a 4e 75 6d 65 72 69 | 63 20 70 72 65 66 69 78 |..Numeri|c prefix|
|00002520| 20 61 72 67 75 6d 65 6e | 74 20 4e 20 6d 65 61 6e | argumen|t N mean|
|00002530| 73 20 74 6f 20 72 65 70 | 6c 79 20 74 6f 20 74 68 |s to rep|ly to th|
|00002540| 65 20 63 75 72 72 65 6e | 74 20 6d 65 73 73 61 67 |e curren|t messag|
|00002550| 65 20 70 6c 75 73 20 74 | 68 65 0a 6e 65 78 74 20 |e plus t|he.next |
|00002560| 4e 2d 31 20 6d 65 73 73 | 61 67 65 73 2e 20 20 41 |N-1 mess|ages.  A|
|00002570| 20 6e 65 67 61 74 69 76 | 65 20 4e 20 6d 65 61 6e | negativ|e N mean|
|00002580| 73 20 72 65 70 6c 79 20 | 74 6f 20 74 68 65 20 63 |s reply |to the c|
|00002590| 75 72 72 65 6e 74 20 6d | 65 73 73 61 67 65 20 61 |urrent m|essage a|
|000025a0| 6e 64 0a 74 68 65 20 70 | 72 65 76 69 6f 75 73 20 |nd.the p|revious |
|000025b0| 4e 2d 31 20 6d 65 73 73 | 61 67 65 73 2e 20 0a 0a |N-1 mess|ages. ..|
|000025c0| 49 66 20 69 6e 76 6f 6b | 65 64 20 6f 6e 20 6d 61 |If invok|ed on ma|
|000025d0| 72 6b 65 64 20 6d 65 73 | 73 61 67 65 73 20 28 76 |rked mes|sages (v|
|000025e0| 69 61 20 76 6d 2d 6e 65 | 78 74 2d 63 6f 6d 6d 61 |ia vm-ne|xt-comma|
|000025f0| 6e 64 2d 75 73 65 73 2d | 6d 61 72 6b 73 29 2c 0a |nd-uses-|marks),.|
|00002600| 61 6c 6c 20 6d 61 72 6b | 65 64 20 6d 65 73 73 61 |all mark|ed messa|
|00002610| 67 65 73 20 77 69 6c 6c | 20 62 65 20 72 65 70 6c |ges will| be repl|
|00002620| 69 65 64 20 74 6f 2e 0a | 0a 59 6f 75 20 77 69 6c |ied to..|.You wil|
|00002630| 6c 20 62 65 20 70 6c 61 | 63 65 64 20 69 6e 74 6f |l be pla|ced into|
|00002640| 20 61 20 73 74 61 6e 64 | 61 72 64 20 45 6d 61 63 | a stand|ard Emac|
|00002650| 73 20 4d 61 69 6c 20 6d | 6f 64 65 20 62 75 66 66 |s Mail m|ode buff|
|00002660| 65 72 20 74 6f 20 63 6f | 6d 70 6f 73 65 20 61 6e |er to co|mpose an|
|00002670| 64 0a 73 65 6e 64 20 79 | 6f 75 72 20 6d 65 73 73 |d.send y|our mess|
|00002680| 61 67 65 2e 20 20 53 65 | 65 20 74 68 65 20 64 6f |age.  Se|e the do|
|00002690| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 20 66 6f 72 20 |cumentat|ion for |
|000026a0| 74 68 65 20 66 75 6e 63 | 74 69 6f 6e 20 60 6d 61 |the func|tion `ma|
|000026b0| 69 6c 27 20 66 6f 72 0a | 6d 6f 72 65 20 69 6e 66 |il' for.|more inf|
|000026c0| 6f 2e 0a 0a 4e 6f 74 65 | 20 74 68 61 74 20 74 68 |o...Note| that th|
|000026d0| 65 20 6e 6f 72 6d 61 6c | 20 62 69 6e 64 69 6e 67 |e normal| binding|
|000026e0| 20 6f 66 20 43 2d 63 20 | 43 2d 79 20 69 6e 20 74 | of C-c |C-y in t|
|000026f0| 68 65 20 72 65 70 6c 79 | 20 62 75 66 66 65 72 20 |he reply| buffer |
|00002700| 69 73 0a 61 75 74 6f 6d | 61 74 69 63 61 6c 6c 79 |is.autom|atically|
|00002710| 20 63 68 61 6e 67 65 64 | 20 74 6f 20 76 6d 2d 79 | changed| to vm-y|
|00002720| 61 6e 6b 2d 6d 65 73 73 | 61 67 65 20 64 75 72 69 |ank-mess|age duri|
|00002730| 6e 67 20 61 20 72 65 70 | 6c 79 2e 20 20 54 68 69 |ng a rep|ly.  Thi|
|00002740| 73 0a 61 6c 6c 6f 77 73 | 20 79 6f 75 20 74 6f 20 |s.allows| you to |
|00002750| 79 61 6e 6b 20 61 6e 79 | 20 6d 65 73 73 61 67 65 |yank any| message|
|00002760| 20 66 72 6f 6d 20 74 68 | 65 20 63 75 72 72 65 6e | from th|e curren|
|00002770| 74 20 66 6f 6c 64 65 72 | 20 69 6e 74 6f 20 61 0a |t folder| into a.|
|00002780| 72 65 70 6c 79 2e 0a 0a | 4e 6f 72 6d 61 6c 20 56 |reply...|Normal V|
|00002790| 4d 20 63 6f 6d 6d 61 6e | 64 73 20 6d 61 79 20 62 |M comman|ds may b|
|000027a0| 65 20 61 63 63 65 73 73 | 65 64 20 69 6e 20 74 68 |e access|ed in th|
|000027b0| 65 20 72 65 70 6c 79 20 | 62 75 66 66 65 72 20 62 |e reply |buffer b|
|000027c0| 79 20 70 72 65 66 69 78 | 69 6e 67 20 74 68 65 6d |y prefix|ing them|
|000027d0| 0a 77 69 74 68 20 43 2d | 63 20 43 2d 76 2e 22 20 |.with C-|c C-v." |
|000027e0| 22 70 22 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |"p"]).(d|efalias |
|000027f0| 27 76 6d 2d 72 65 70 6c | 79 2d 69 6e 63 6c 75 64 |'vm-repl|y-includ|
|00002800| 65 2d 74 65 78 74 20 23 | 5b 28 63 6f 75 6e 74 29 |e-text #|[(count)|
|00002810| 20 22 c0 20 88 09 83 16 | 00 c2 09 21 84 13 00 c3 | ". ....|...!....|
|00002820| c4 21 83 16 00 09 71 88 | c5 20 88 c6 20 88 c7 c8 |.!....q.|. .. ...|
|00002830| c9 0e 5c 6e 23 87 22 20 | 5b 76 6d 2d 66 6f 6c 6c |..\n#." |[vm-foll|
|00002840| 6f 77 2d 73 75 6d 6d 61 | 72 79 2d 63 75 72 73 6f |ow-summa|ry-curso|
|00002850| 72 20 76 6d 2d 6d 61 69 | 6c 2d 62 75 66 66 65 72 |r vm-mai|l-buffer|
|00002860| 20 62 75 66 66 65 72 2d | 6e 61 6d 65 20 65 72 72 | buffer-|name err|
|00002870| 6f 72 20 22 46 6f 6c 64 | 65 72 20 62 75 66 66 65 |or "Fold|er buffe|
|00002880| 72 20 68 61 73 20 62 65 | 65 6e 20 6b 69 6c 6c 65 |r has be|en kille|
|00002890| 64 2e 22 20 76 6d 2d 63 | 68 65 63 6b 2d 66 6f 72 |d." vm-c|heck-for|
|000028a0| 2d 6b 69 6c 6c 65 64 2d | 73 75 6d 6d 61 72 79 20 |-killed-|summary |
|000028b0| 76 6d 2d 65 72 72 6f 72 | 2d 69 66 2d 66 6f 6c 64 |vm-error|-if-fold|
|000028c0| 65 72 2d 65 6d 70 74 79 | 20 76 6d 2d 64 6f 2d 72 |er-empty| vm-do-r|
|000028d0| 65 70 6c 79 20 6e 69 6c | 20 74 20 63 6f 75 6e 74 |eply nil| t count|
|000028e0| 5d 20 34 20 22 5c 0a 52 | 65 70 6c 79 20 74 6f 20 |] 4 "\.R|eply to |
|000028f0| 74 68 65 20 73 65 6e 64 | 65 72 20 28 6f 6e 6c 79 |the send|er (only|
|00002900| 29 20 6f 66 20 74 68 65 | 20 63 75 72 72 65 6e 74 |) of the| current|
|00002910| 20 6d 65 73 73 61 67 65 | 20 61 6e 64 20 69 6e 63 | message| and inc|
|00002920| 6c 75 64 65 20 74 65 78 | 74 0a 66 72 6f 6d 20 74 |lude tex|t.from t|
|00002930| 68 65 20 6d 65 73 73 61 | 67 65 2e 20 20 53 65 65 |he messa|ge.  See|
|00002940| 20 74 68 65 20 64 6f 63 | 75 6d 65 6e 74 61 74 69 | the doc|umentati|
|00002950| 6f 6e 20 66 6f 72 20 66 | 75 6e 63 74 69 6f 6e 20 |on for f|unction |
|00002960| 76 6d 2d 72 65 70 6c 79 | 20 66 6f 72 20 64 65 74 |vm-reply| for det|
|00002970| 61 69 6c 73 2e 22 20 22 | 70 22 5d 29 0a 28 64 65 |ails." "|p"]).(de|
|00002980| 66 61 6c 69 61 73 20 27 | 76 6d 2d 66 6f 6c 6c 6f |falias '|vm-follo|
|00002990| 77 75 70 20 23 5b 28 63 | 6f 75 6e 74 29 20 22 c0 |wup #[(c|ount) ".|
|000029a0| 20 88 09 83 16 00 c2 09 | 21 84 13 00 c3 c4 21 83 | .......|!.....!.|
|000029b0| 16 00 09 71 88 c5 20 88 | c6 20 88 c7 c8 c9 0e 5c |...q.. .|. .....\|
|000029c0| 6e 23 87 22 20 5b 76 6d | 2d 66 6f 6c 6c 6f 77 2d |n#." [vm|-follow-|
|000029d0| 73 75 6d 6d 61 72 79 2d | 63 75 72 73 6f 72 20 76 |summary-|cursor v|
|000029e0| 6d 2d 6d 61 69 6c 2d 62 | 75 66 66 65 72 20 62 75 |m-mail-b|uffer bu|
|000029f0| 66 66 65 72 2d 6e 61 6d | 65 20 65 72 72 6f 72 20 |ffer-nam|e error |
|00002a00| 22 46 6f 6c 64 65 72 20 | 62 75 66 66 65 72 20 68 |"Folder |buffer h|
|00002a10| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|00002a20| 20 76 6d 2d 63 68 65 63 | 6b 2d 66 6f 72 2d 6b 69 | vm-chec|k-for-ki|
|00002a30| 6c 6c 65 64 2d 73 75 6d | 6d 61 72 79 20 76 6d 2d |lled-sum|mary vm-|
|00002a40| 65 72 72 6f 72 2d 69 66 | 2d 66 6f 6c 64 65 72 2d |error-if|-folder-|
|00002a50| 65 6d 70 74 79 20 76 6d | 2d 64 6f 2d 72 65 70 6c |empty vm|-do-repl|
|00002a60| 79 20 74 20 6e 69 6c 20 | 63 6f 75 6e 74 5d 20 34 |y t nil |count] 4|
|00002a70| 20 22 5c 0a 52 65 70 6c | 79 20 74 6f 20 61 6c 6c | "\.Repl|y to all|
|00002a80| 20 72 65 63 69 70 69 65 | 6e 74 73 20 6f 66 20 74 | recipie|nts of t|
|00002a90| 68 65 20 63 75 72 72 65 | 6e 74 20 6d 65 73 73 61 |he curre|nt messa|
|00002aa0| 67 65 2e 0a 53 65 65 20 | 74 68 65 20 64 6f 63 75 |ge..See |the docu|
|00002ab0| 6d 65 6e 74 61 74 69 6f | 6e 20 66 6f 72 20 74 68 |mentatio|n for th|
|00002ac0| 65 20 66 75 6e 63 74 69 | 6f 6e 20 76 6d 2d 72 65 |e functi|on vm-re|
|00002ad0| 70 6c 79 20 66 6f 72 20 | 64 65 74 61 69 6c 73 2e |ply for |details.|
|00002ae0| 22 20 22 70 22 5d 29 0a | 28 64 65 66 61 6c 69 61 |" "p"]).|(defalia|
|00002af0| 73 20 27 76 6d 2d 66 6f | 6c 6c 6f 77 75 70 2d 69 |s 'vm-fo|llowup-i|
|00002b00| 6e 63 6c 75 64 65 2d 74 | 65 78 74 20 23 5b 28 63 |nclude-t|ext #[(c|
|00002b10| 6f 75 6e 74 29 20 22 c0 | 20 88 09 83 16 00 c2 09 |ount) ".| .......|
|00002b20| 21 84 13 00 c3 c4 21 83 | 16 00 09 71 88 c5 20 88 |!.....!.|...q.. .|
|00002b30| c6 20 88 c7 c8 89 0e 09 | 23 87 22 20 5b 76 6d 2d |. ......|#." [vm-|
|00002b40| 66 6f 6c 6c 6f 77 2d 73 | 75 6d 6d 61 72 79 2d 63 |follow-s|ummary-c|
|00002b50| 75 72 73 6f 72 20 76 6d | 2d 6d 61 69 6c 2d 62 75 |ursor vm|-mail-bu|
|00002b60| 66 66 65 72 20 62 75 66 | 66 65 72 2d 6e 61 6d 65 |ffer buf|fer-name|
|00002b70| 20 65 72 72 6f 72 20 22 | 46 6f 6c 64 65 72 20 62 | error "|Folder b|
|00002b80| 75 66 66 65 72 20 68 61 | 73 20 62 65 65 6e 20 6b |uffer ha|s been k|
|00002b90| 69 6c 6c 65 64 2e 22 20 | 76 6d 2d 63 68 65 63 6b |illed." |vm-check|
|00002ba0| 2d 66 6f 72 2d 6b 69 6c | 6c 65 64 2d 73 75 6d 6d |-for-kil|led-summ|
|00002bb0| 61 72 79 20 76 6d 2d 65 | 72 72 6f 72 2d 69 66 2d |ary vm-e|rror-if-|
|00002bc0| 66 6f 6c 64 65 72 2d 65 | 6d 70 74 79 20 76 6d 2d |folder-e|mpty vm-|
|00002bd0| 64 6f 2d 72 65 70 6c 79 | 20 74 20 63 6f 75 6e 74 |do-reply| t count|
|00002be0| 5d 20 34 20 22 5c 0a 52 | 65 70 6c 79 20 74 6f 20 |] 4 "\.R|eply to |
|00002bf0| 61 6c 6c 20 72 65 63 69 | 70 69 65 6e 74 73 20 6f |all reci|pients o|
|00002c00| 66 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 6d 65 |f the cu|rrent me|
|00002c10| 73 73 61 67 65 20 61 6e | 64 20 69 6e 63 6c 75 64 |ssage an|d includ|
|00002c20| 65 20 74 65 78 74 20 66 | 72 6f 6d 0a 74 68 65 20 |e text f|rom.the |
|00002c30| 6d 65 73 73 61 67 65 2e | 20 20 53 65 65 20 74 68 |message.|  See th|
|00002c40| 65 20 64 6f 63 75 6d 65 | 6e 74 61 74 69 6f 6e 20 |e docume|ntation |
|00002c50| 66 6f 72 20 74 68 65 20 | 66 75 6e 63 74 69 6f 6e |for the |function|
|00002c60| 20 76 6d 2d 72 65 70 6c | 79 20 66 6f 72 20 64 65 | vm-repl|y for de|
|00002c70| 74 61 69 6c 73 2e 22 20 | 22 70 22 5d 29 0a 28 64 |tails." |"p"]).(d|
|00002c80| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 66 6f 72 77 |efalias |'vm-forw|
|00002c90| 61 72 64 2d 6d 65 73 73 | 61 67 65 2d 61 6c 6c 2d |ard-mess|age-all-|
|00002ca0| 68 65 61 64 65 72 73 20 | 23 5b 6e 69 6c 20 22 c0 |headers |#[nil ".|
|00002cb0| c1 1a 1b c4 20 2a 87 22 | 20 5b 6e 69 6c 20 22 6f |.... *."| [nil "o|
|00002cc0| 6e 6c 79 2d 64 72 6f 70 | 2d 74 68 69 73 2d 68 65 |nly-drop|-this-he|
|00002cd0| 61 64 65 72 22 20 76 6d | 2d 75 6e 66 6f 72 77 61 |ader" vm|-unforwa|
|00002ce0| 72 64 65 64 2d 68 65 61 | 64 65 72 2d 72 65 67 65 |rded-hea|der-rege|
|00002cf0| 78 70 20 76 6d 2d 66 6f | 72 77 61 72 64 65 64 2d |xp vm-fo|rwarded-|
|00002d00| 68 65 61 64 65 72 73 20 | 76 6d 2d 66 6f 72 77 61 |headers |vm-forwa|
|00002d10| 72 64 2d 6d 65 73 73 61 | 67 65 5d 20 32 20 22 5c |rd-messa|ge] 2 "\|
|00002d20| 0a 4c 69 6b 65 20 76 6d | 2d 66 6f 72 77 61 72 64 |.Like vm|-forward|
|00002d30| 2d 6d 65 73 73 61 67 65 | 20 62 75 74 20 61 6c 77 |-message| but alw|
|00002d40| 61 79 73 20 66 6f 72 77 | 61 72 64 73 20 61 6c 6c |ays forw|ards all|
|00002d50| 20 74 68 65 20 68 65 61 | 64 65 72 73 2e 22 20 6e | the hea|ders." n|
|00002d60| 69 6c 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |il]).(de|falias '|
|00002d70| 76 6d 2d 66 6f 72 77 61 | 72 64 2d 6d 65 73 73 61 |vm-forwa|rd-messa|
|00002d80| 67 65 20 23 5b 6e 69 6c | 20 22 c0 20 88 09 83 16 |ge #[nil| ". ....|
|00002d90| 00 c2 09 21 84 13 00 c3 | c4 21 83 16 00 09 71 88 |...!....|.!....q.|
|00002da0| c5 20 88 c6 20 88 0e 07 | c8 3d 83 2f 00 0e 09 1e |. .. ...|.=./....|
|00002db0| 5c 6e c8 16 0b cc cd 21 | 29 87 0e 0e 0e 0f 1e 10 |\n.....!|).......|
|00002dc0| 1e 11 8c 7e 88 d2 d3 d4 | d5 0e 0f 40 21 d6 0e 0f |...~....|...@!...|
|00002dd0| 40 21 23 d7 0e 18 85 58 | 00 d7 1e 19 da d8 0e 10 |@!#....X|........|
|00002de0| 40 5c 22 29 23 88 db dc | 21 88 dd 16 1e 0e 10 40 |@\")#...|!......@|
|00002df0| 43 16 1c 0e 11 16 0e 65 | 62 88 df e0 e1 0e 5c 22 |C......e|b.....\"|
|00002e00| 21 e3 51 d7 e4 23 88 0e | 09 e5 9a 83 8d 00 e6 0e |!.Q..#..|........|
|00002e10| 1c 0e 27 0e 28 23 88 82 | b1 00 0e 09 e9 9a 83 a0 |..'.(#..|........|
|00002e20| 00 ea 0e 1c 0e 27 0e 28 | 23 88 82 b1 00 0e 09 d7 |.....'.(|#.......|
|00002e30| 9a 83 b1 00 eb 0e 1c 40 | 0e 27 0e 28 23 88 ec ed |.......@|.'.(#...|
|00002e40| 21 88 29 ee ef 21 88 ee | f0 21 2a 87 22 20 5b 76 |!.)..!..|.!*." [v|
|00002e50| 6d 2d 66 6f 6c 6c 6f 77 | 2d 73 75 6d 6d 61 72 79 |m-follow|-summary|
|00002e60| 2d 63 75 72 73 6f 72 20 | 76 6d 2d 6d 61 69 6c 2d |-cursor |vm-mail-|
|00002e70| 62 75 66 66 65 72 20 62 | 75 66 66 65 72 2d 6e 61 |buffer b|uffer-na|
|00002e80| 6d 65 20 65 72 72 6f 72 | 20 22 46 6f 6c 64 65 72 |me error| "Folder|
|00002e90| 20 62 75 66 66 65 72 20 | 68 61 73 20 62 65 65 6e | buffer |has been|
|00002ea0| 20 6b 69 6c 6c 65 64 2e | 22 20 76 6d 2d 63 68 65 | killed.|" vm-che|
|00002eb0| 63 6b 2d 66 6f 72 2d 6b | 69 6c 6c 65 64 2d 73 75 |ck-for-k|illed-su|
|00002ec0| 6d 6d 61 72 79 20 76 6d | 2d 65 72 72 6f 72 2d 69 |mmary vm|-error-i|
|00002ed0| 66 2d 66 6f 6c 64 65 72 | 2d 65 6d 70 74 79 20 6c |f-folder|-empty l|
|00002ee0| 61 73 74 2d 63 6f 6d 6d | 61 6e 64 20 76 6d 2d 6e |ast-comm|and vm-n|
|00002ef0| 65 78 74 2d 63 6f 6d 6d | 61 6e 64 2d 75 73 65 73 |ext-comm|and-uses|
|00002f00| 2d 6d 61 72 6b 73 20 76 | 6d 2d 66 6f 72 77 61 72 |-marks v|m-forwar|
|00002f10| 64 69 6e 67 2d 64 69 67 | 65 73 74 2d 74 79 70 65 |ding-dig|est-type|
|00002f20| 20 76 6d 2d 64 69 67 65 | 73 74 2d 73 65 6e 64 2d | vm-dige|st-send-|
|00002f30| 74 79 70 65 20 74 68 69 | 73 2d 63 6f 6d 6d 61 6e |type thi|s-comman|
|00002f40| 64 20 63 6f 6d 6d 61 6e | 64 2d 65 78 65 63 75 74 |d comman|d-execut|
|00002f50| 65 20 76 6d 2d 73 65 6e | 64 2d 64 69 67 65 73 74 |e vm-sen|d-digest|
|00002f60| 20 64 65 66 61 75 6c 74 | 2d 64 69 72 65 63 74 6f | default|-directo|
|00002f70| 72 79 20 76 6d 2d 6d 65 | 73 73 61 67 65 2d 70 6f |ry vm-me|ssage-po|
|00002f80| 69 6e 74 65 72 20 6d 70 | 20 64 69 72 20 76 6d 2d |inter mp| dir vm-|
|00002f90| 6d 61 69 6c 2d 69 6e 74 | 65 72 6e 61 6c 20 66 6f |mail-int|ernal fo|
|00002fa0| 72 6d 61 74 20 22 66 6f | 72 77 61 72 64 20 6f 66 |rmat "fo|rward of|
|00002fb0| 20 25 73 27 73 20 6e 6f | 74 65 20 72 65 3a 20 25 | %s's no|te re: %|
|00002fc0| 73 22 20 76 6d 2d 73 75 | 2d 66 75 6c 6c 2d 6e 61 |s" vm-su|-full-na|
|00002fd0| 6d 65 20 76 6d 2d 73 75 | 2d 73 75 62 6a 65 63 74 |me vm-su|-subject|
|00002fe0| 20 6e 69 6c 20 76 6d 2d | 66 6f 72 77 61 72 64 69 | nil vm-|forwardi|
|00002ff0| 6e 67 2d 73 75 62 6a 65 | 63 74 2d 66 6f 72 6d 61 |ng-subje|ct-forma|
|00003000| 74 20 76 6d 2d 73 75 6d | 6d 61 72 79 2d 75 6e 69 |t vm-sum|mary-uni|
|00003010| 6e 74 65 72 65 73 74 69 | 6e 67 2d 73 65 6e 64 65 |nteresti|ng-sende|
|00003020| 72 73 20 76 6d 2d 73 70 | 72 69 6e 74 66 20 6d 61 |rs vm-sp|rintf ma|
|00003030| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|00003040| 65 20 76 6d 2d 66 6f 72 | 77 61 72 64 2d 6c 69 73 |e vm-for|ward-lis|
|00003050| 74 20 66 6f 72 77 61 72 | 64 69 6e 67 20 76 6d 2d |t forwar|ding vm-|
|00003060| 73 79 73 74 65 6d 2d 73 | 74 61 74 65 20 72 65 2d |system-s|tate re-|
|00003070| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 22 |search-f|orward "|
|00003080| 5e 22 20 72 65 67 65 78 | 70 2d 71 75 6f 74 65 20 |^" regex|p-quote |
|00003090| 6d 61 69 6c 2d 68 65 61 | 64 65 72 2d 73 65 70 61 |mail-hea|der-sepa|
|000030a0| 72 61 74 6f 72 20 22 5c | 6e 22 20 30 20 22 72 66 |rator "\|n" 0 "rf|
|000030b0| 63 39 33 34 22 20 76 6d | 2d 72 66 63 39 33 34 2d |c934" vm|-rfc934-|
|000030c0| 65 6e 63 61 70 73 75 6c | 61 74 65 2d 6d 65 73 73 |encapsul|ate-mess|
|000030d0| 61 67 65 73 20 76 6d 2d | 66 6f 72 77 61 72 64 65 |ages vm-|forwarde|
|000030e0| 64 2d 68 65 61 64 65 72 | 73 20 76 6d 2d 75 6e 66 |d-header|s vm-unf|
|000030f0| 6f 72 77 61 72 64 65 64 | 2d 68 65 61 64 65 72 2d |orwarded|-header-|
|00003100| 72 65 67 65 78 70 20 22 | 72 66 63 31 31 35 33 22 |regexp "|rfc1153"|
|00003110| 20 76 6d 2d 72 66 63 31 | 31 35 33 2d 65 6e 63 61 | vm-rfc1|153-enca|
|00003120| 70 73 75 6c 61 74 65 2d | 6d 65 73 73 61 67 65 73 |psulate-|messages|
|00003130| 20 76 6d 2d 6e 6f 2d 66 | 72 69 6c 6c 73 2d 65 6e | vm-no-f|rills-en|
|00003140| 63 61 70 73 75 6c 61 74 | 65 2d 6d 65 73 73 61 67 |capsulat|e-messag|
|00003150| 65 20 6d 61 69 6c 2d 70 | 6f 73 69 74 69 6f 6e 2d |e mail-p|osition-|
|00003160| 6f 6e 2d 66 69 65 6c 64 | 20 22 54 6f 22 20 72 75 |on-field| "To" ru|
|00003170| 6e 2d 68 6f 6f 6b 73 20 | 76 6d 2d 66 6f 72 77 61 |n-hooks |vm-forwa|
|00003180| 72 64 2d 6d 65 73 73 61 | 67 65 2d 68 6f 6f 6b 20 |rd-messa|ge-hook |
|00003190| 76 6d 2d 6d 61 69 6c 2d | 6d 6f 64 65 2d 68 6f 6f |vm-mail-|mode-hoo|
|000031a0| 6b 5d 20 36 20 22 5c 0a | 46 6f 72 77 61 72 64 20 |k] 6 "\.|Forward |
|000031b0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 6d 65 73 73 |the curr|ent mess|
|000031c0| 61 67 65 20 74 6f 20 6f | 6e 65 20 6f 72 20 6d 6f |age to o|ne or mo|
|000031d0| 72 65 20 72 65 63 69 70 | 69 65 6e 74 73 2e 0a 59 |re recip|ients..Y|
|000031e0| 6f 75 20 77 69 6c 6c 20 | 62 65 20 70 6c 61 63 65 |ou will |be place|
|000031f0| 64 20 69 6e 20 61 20 4d | 61 69 6c 20 6d 6f 64 65 |d in a M|ail mode|
|00003200| 20 62 75 66 66 65 72 20 | 61 73 20 79 6f 75 20 77 | buffer |as you w|
|00003210| 6f 75 6c 64 20 77 69 74 | 68 20 61 0a 72 65 70 6c |ould wit|h a.repl|
|00003220| 79 2c 20 62 75 74 20 79 | 6f 75 20 6d 75 73 74 20 |y, but y|ou must |
|00003230| 66 69 6c 6c 20 69 6e 20 | 74 68 65 20 54 6f 3a 20 |fill in |the To: |
|00003240| 68 65 61 64 65 72 20 61 | 6e 64 20 70 65 72 68 61 |header a|nd perha|
|00003250| 70 73 20 74 68 65 0a 53 | 75 62 6a 65 63 74 3a 20 |ps the.S|ubject: |
|00003260| 68 65 61 64 65 72 20 6d | 61 6e 75 61 6c 6c 79 2e |header m|anually.|
|00003270| 22 20 6e 69 6c 5d 29 0a | 28 64 65 66 61 6c 69 61 |" nil]).|(defalia|
|00003280| 73 20 27 76 6d 2d 72 65 | 73 65 6e 64 2d 62 6f 75 |s 'vm-re|send-bou|
|00003290| 6e 63 65 64 2d 6d 65 73 | 73 61 67 65 20 23 5b 6e |nced-mes|sage #[n|
|000032a0| 69 6c 20 22 c0 20 88 09 | 83 16 00 c2 09 21 84 13 |il ". ..|.....!..|
|000032b0| 00 c3 c4 21 83 16 00 09 | 71 88 c5 20 88 c6 20 88 |...!....|q.. .. .|
|000032c0| 70 c7 0e 08 0e 09 40 ca | 48 cb 48 1e 5c 66 1e 0d |p.....@.|H.H.\f..|
|000032d0| 1e 0e 1e 0f 8c 7e 88 8a | d0 0e 09 40 21 62 88 d1 |.....~..|...@!b..|
|000032e0| 1e 12 d3 d4 0e 5c 66 d1 | 23 84 4a 00 c3 d5 21 88 |.....\f.|#.J...!.|
|000032f0| ca 79 88 60 16 0e 2a c7 | 1e 16 d7 d8 d9 da 0e 09 |.y.`..*.|........|
|00003300| 40 21 5c 22 21 88 29 65 | 62 88 db 0e 0f 0e 0e 0e |@!\"!.)e|b.......|
|00003310| 5c 66 23 88 60 64 7c 88 | 65 62 88 dc c7 89 dd 23 |\f#.`d|.|eb.....#|
|00003320| 88 dc c7 0e 1e 0e 1f 23 | 88 e0 e1 c7 d1 23 83 90 |.......#|.....#..|
|00003330| 00 e2 e3 21 88 82 93 00 | 64 62 88 e4 0e 25 e4 b1 |...!....|db...%..|
|00003340| 03 88 e6 e7 21 88 0e 0d | 16 08 2d e8 e9 21 88 e8 |....!...|..-..!..|
|00003350| ea 21 87 22 20 5b 76 6d | 2d 66 6f 6c 6c 6f 77 2d |.!." [vm|-follow-|
|00003360| 73 75 6d 6d 61 72 79 2d | 63 75 72 73 6f 72 20 76 |summary-|cursor v|
|00003370| 6d 2d 6d 61 69 6c 2d 62 | 75 66 66 65 72 20 62 75 |m-mail-b|uffer bu|
|00003380| 66 66 65 72 2d 6e 61 6d | 65 20 65 72 72 6f 72 20 |ffer-nam|e error |
|00003390| 22 46 6f 6c 64 65 72 20 | 62 75 66 66 65 72 20 68 |"Folder |buffer h|
|000033a0| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|000033b0| 20 76 6d 2d 63 68 65 63 | 6b 2d 66 6f 72 2d 6b 69 | vm-chec|k-for-ki|
|000033c0| 6c 6c 65 64 2d 73 75 6d | 6d 61 72 79 20 76 6d 2d |lled-sum|mary vm-|
|000033d0| 65 72 72 6f 72 2d 69 66 | 2d 66 6f 6c 64 65 72 2d |error-if|-folder-|
|000033e0| 65 6d 70 74 79 20 6e 69 | 6c 20 64 65 66 61 75 6c |empty ni|l defaul|
|000033f0| 74 2d 64 69 72 65 63 74 | 6f 72 79 20 76 6d 2d 6d |t-direct|ory vm-m|
|00003400| 65 73 73 61 67 65 2d 70 | 6f 69 6e 74 65 72 20 30 |essage-p|ointer 0|
|00003410| 20 34 20 6c 69 6d 20 64 | 69 72 20 73 74 61 72 74 | 4 lim d|ir start|
|00003420| 20 62 20 76 6d 2d 74 65 | 78 74 2d 6f 66 20 74 20 | b vm-te|xt-of t |
|00003430| 63 61 73 65 2d 66 6f 6c | 64 2d 73 65 61 72 63 68 |case-fol|d-search|
|00003440| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|00003450| 72 64 20 22 5e 52 65 63 | 65 69 76 65 64 3a 22 20 |rd "^Rec|eived:" |
|00003460| 22 54 68 69 73 20 64 6f | 65 73 6e 27 74 20 6c 6f |"This do|esn't lo|
|00003470| 6f 6b 20 6c 69 6b 65 20 | 61 20 62 6f 75 6e 63 65 |ok like |a bounce|
|00003480| 64 20 6d 65 73 73 61 67 | 65 2e 22 20 76 6d 2d 6d |d messag|e." vm-m|
|00003490| 61 69 6c 2d 68 65 61 64 | 65 72 2d 66 72 6f 6d 20 |ail-head|er-from |
|000034a0| 76 6d 2d 6d 61 69 6c 2d | 69 6e 74 65 72 6e 61 6c |vm-mail-|internal|
|000034b0| 20 66 6f 72 6d 61 74 20 | 22 72 65 74 72 79 20 6f | format |"retry o|
|000034c0| 66 20 62 6f 75 6e 63 65 | 20 66 72 6f 6d 20 25 73 |f bounce| from %s|
|000034d0| 22 20 76 6d 2d 73 75 2d | 66 72 6f 6d 20 69 6e 73 |" vm-su-|from ins|
|000034e0| 65 72 74 2d 62 75 66 66 | 65 72 2d 73 75 62 73 74 |ert-buff|er-subst|
|000034f0| 72 69 6e 67 20 76 6d 2d | 72 65 6f 72 64 65 72 2d |ring vm-|reorder-|
|00003500| 6d 65 73 73 61 67 65 2d | 68 65 61 64 65 72 73 20 |message-|headers |
|00003510| 22 5c 5c 28 58 2d 56 4d | 2d 5c 5c 7c 53 74 61 74 |"\\(X-VM|-\\|Stat|
|00003520| 75 73 3a 5c 5c 7c 53 65 | 6e 64 65 72 3a 5c 5c 29 |us:\\|Se|nder:\\)|
|00003530| 22 20 76 6d 2d 72 65 73 | 65 6e 64 2d 62 6f 75 6e |" vm-res|end-boun|
|00003540| 63 65 64 2d 68 65 61 64 | 65 72 73 20 76 6d 2d 72 |ced-head|ers vm-r|
|00003550| 65 73 65 6e 64 2d 62 6f | 75 6e 63 65 64 2d 64 69 |esend-bo|unced-di|
|00003560| 73 63 61 72 64 2d 68 65 | 61 64 65 72 2d 72 65 67 |scard-he|ader-reg|
|00003570| 65 78 70 20 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |exp sear|ch-forwa|
|00003580| 72 64 20 22 5c 6e 5c 6e | 22 20 72 65 70 6c 61 63 |rd "\n\n|" replac|
|00003590| 65 2d 6d 61 74 63 68 20 | 22 22 20 31 30 20 6d 61 |e-match |"" 10 ma|
|000035a0| 69 6c 2d 68 65 61 64 65 | 72 2d 73 65 70 61 72 61 |il-heade|r-separa|
|000035b0| 74 6f 72 20 6d 61 69 6c | 2d 70 6f 73 69 74 69 6f |tor mail|-positio|
|000035c0| 6e 2d 6f 6e 2d 66 69 65 | 6c 64 20 22 54 6f 22 20 |n-on-fie|ld "To" |
|000035d0| 72 75 6e 2d 68 6f 6f 6b | 73 20 76 6d 2d 72 65 73 |run-hook|s vm-res|
|000035e0| 65 6e 64 2d 62 6f 75 6e | 63 65 64 2d 6d 65 73 73 |end-boun|ced-mess|
|000035f0| 61 67 65 2d 68 6f 6f 6b | 20 76 6d 2d 6d 61 69 6c |age-hook| vm-mail|
|00003600| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 35 20 22 5c |-mode-ho|ok] 5 "\|
|00003610| 0a 45 78 74 72 61 63 74 | 20 74 68 65 20 6f 72 69 |.Extract| the ori|
|00003620| 67 69 6e 61 6c 20 74 65 | 78 74 20 66 72 6f 6d 20 |ginal te|xt from |
|00003630| 61 20 62 6f 75 6e 63 65 | 64 20 6d 65 73 73 61 67 |a bounce|d messag|
|00003640| 65 20 61 6e 64 20 72 65 | 73 65 6e 64 20 69 74 2e |e and re|send it.|
|00003650| 0a 59 6f 75 20 77 69 6c | 6c 20 62 65 20 70 6c 61 |.You wil|l be pla|
|00003660| 63 65 64 20 69 6e 20 61 | 20 4d 61 69 6c 20 6d 6f |ced in a| Mail mo|
|00003670| 64 65 20 62 75 66 66 65 | 72 20 77 69 74 68 20 74 |de buffe|r with t|
|00003680| 68 65 20 65 78 74 72 61 | 63 74 65 64 20 6d 65 73 |he extra|cted mes|
|00003690| 73 61 67 65 20 61 6e 64 | 0a 79 6f 75 20 63 61 6e |sage and|.you can|
|000036a0| 20 63 68 61 6e 67 65 20 | 74 68 65 20 72 65 63 69 | change |the reci|
|000036b0| 70 69 65 6e 74 20 61 64 | 64 72 65 73 73 20 62 65 |pient ad|dress be|
|000036c0| 66 6f 72 65 20 72 65 73 | 65 6e 64 69 6e 67 20 74 |fore res|ending t|
|000036d0| 68 65 20 6d 65 73 73 61 | 67 65 2e 22 20 6e 69 6c |he messa|ge." nil|
|000036e0| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|000036f0| 2d 72 65 73 65 6e 64 2d | 6d 65 73 73 61 67 65 20 |-resend-|message |
|00003700| 23 5b 6e 69 6c 20 22 c0 | 20 88 09 83 16 00 c2 09 |#[nil ".| .......|
|00003710| 21 84 13 00 c3 c4 21 83 | 16 00 09 71 88 c5 20 88 |!.....!.|...q.. .|
|00003720| c6 20 88 8c 7e 88 70 0e | 07 0e 08 89 40 c9 48 ca |. ..~.p.|....@.H.|
|00003730| 48 0e 08 40 c9 48 cb 48 | 1e 5c 66 1e 0d 1e 0e 1e |H..@.H.H|.\f.....|
|00003740| 0f 1e 10 d1 1e 12 d3 d4 | d5 d6 0e 08 40 21 d7 0e |........|....@!..|
|00003750| 08 40 21 23 21 88 29 65 | 62 88 d8 0e 10 0e 0d 0e |.@!#!.)e|b.......|
|00003760| 5c 66 23 88 60 64 7c 88 | 65 62 88 0e 12 83 6e 00 |\f#.`d|.|eb....n.|
|00003770| d9 0e 12 da b1 03 88 db | 63 88 dc d1 89 dd 23 88 |........|c.....#.|
|00003780| dc d1 0e 1e 0e 1f 23 88 | e0 e1 d1 e2 23 83 8b 00 |......#.|....#...|
|00003790| e3 e4 21 88 da 0e 25 da | b1 03 88 65 62 88 e6 e7 |..!...%.|...eb...|
|000037a0| 21 88 e8 e9 21 88 ea 16 | 2b 0e 0e 40 43 16 29 0e |!...!...|+..@C.).|
|000037b0| 0f 16 07 ec ed 21 88 ec | ee 21 2e 06 87 22 20 5b |.....!..|.!..." [|
|000037c0| 76 6d 2d 66 6f 6c 6c 6f | 77 2d 73 75 6d 6d 61 72 |vm-follo|w-summar|
|000037d0| 79 2d 63 75 72 73 6f 72 | 20 76 6d 2d 6d 61 69 6c |y-cursor| vm-mail|
|000037e0| 2d 62 75 66 66 65 72 20 | 62 75 66 66 65 72 2d 6e |-buffer |buffer-n|
|000037f0| 61 6d 65 20 65 72 72 6f | 72 20 22 46 6f 6c 64 65 |ame erro|r "Folde|
|00003800| 72 20 62 75 66 66 65 72 | 20 68 61 73 20 62 65 65 |r buffer| has bee|
|00003810| 6e 20 6b 69 6c 6c 65 64 | 2e 22 20 76 6d 2d 63 68 |n killed|." vm-ch|
|00003820| 65 63 6b 2d 66 6f 72 2d | 6b 69 6c 6c 65 64 2d 73 |eck-for-|killed-s|
|00003830| 75 6d 6d 61 72 79 20 76 | 6d 2d 65 72 72 6f 72 2d |ummary v|m-error-|
|00003840| 69 66 2d 66 6f 6c 64 65 | 72 2d 65 6d 70 74 79 20 |if-folde|r-empty |
|00003850| 64 65 66 61 75 6c 74 2d | 64 69 72 65 63 74 6f 72 |default-|director|
|00003860| 79 20 76 6d 2d 6d 65 73 | 73 61 67 65 2d 70 6f 69 |y vm-mes|sage-poi|
|00003870| 6e 74 65 72 20 30 20 31 | 20 34 20 6c 69 6d 20 73 |nter 0 1| 4 lim s|
|00003880| 74 61 72 74 20 76 6d 70 | 20 64 69 72 20 62 20 6e |tart vmp| dir b n|
|00003890| 69 6c 20 76 6d 2d 6d 61 | 69 6c 2d 68 65 61 64 65 |il vm-ma|il-heade|
|000038a0| 72 2d 66 72 6f 6d 20 76 | 6d 2d 6d 61 69 6c 2d 69 |r-from v|m-mail-i|
|000038b0| 6e 74 65 72 6e 61 6c 20 | 66 6f 72 6d 61 74 20 22 |nternal |format "|
|000038c0| 72 65 73 65 6e 64 20 6f | 66 20 25 73 27 73 20 6e |resend o|f %s's n|
|000038d0| 6f 74 65 20 72 65 3a 20 | 25 73 22 20 76 6d 2d 73 |ote re: |%s" vm-s|
|000038e0| 75 2d 66 75 6c 6c 2d 6e | 61 6d 65 20 76 6d 2d 73 |u-full-n|ame vm-s|
|000038f0| 75 2d 73 75 62 6a 65 63 | 74 20 69 6e 73 65 72 74 |u-subjec|t insert|
|00003900| 2d 62 75 66 66 65 72 2d | 73 75 62 73 74 72 69 6e |-buffer-|substrin|
|00003910| 67 20 22 52 65 73 65 6e | 74 2d 46 72 6f 6d 3a 20 |g "Resen|t-From: |
|00003920| 22 20 31 30 20 22 52 65 | 73 65 6e 74 2d 54 6f 3a |" 10 "Re|sent-To:|
|00003930| 20 5c 6e 22 20 76 6d 2d | 72 65 6f 72 64 65 72 2d | \n" vm-|reorder-|
|00003940| 6d 65 73 73 61 67 65 2d | 68 65 61 64 65 72 73 20 |message-|headers |
|00003950| 22 5c 5c 28 58 2d 56 4d | 2d 5c 5c 7c 53 74 61 74 |"\\(X-VM|-\\|Stat|
|00003960| 75 73 3a 5c 5c 7c 53 65 | 6e 64 65 72 3a 5c 5c 29 |us:\\|Se|nder:\\)|
|00003970| 22 20 76 6d 2d 72 65 73 | 65 6e 64 2d 68 65 61 64 |" vm-res|end-head|
|00003980| 65 72 73 20 76 6d 2d 72 | 65 73 65 6e 64 2d 64 69 |ers vm-r|esend-di|
|00003990| 73 63 61 72 64 2d 68 65 | 61 64 65 72 2d 72 65 67 |scard-he|ader-reg|
|000039a0| 65 78 70 20 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |exp sear|ch-forwa|
|000039b0| 72 64 20 22 5c 6e 5c 6e | 22 20 74 20 72 65 70 6c |rd "\n\n|" t repl|
|000039c0| 61 63 65 2d 6d 61 74 63 | 68 20 22 22 20 6d 61 69 |ace-matc|h "" mai|
|000039d0| 6c 2d 68 65 61 64 65 72 | 2d 73 65 70 61 72 61 74 |l-header|-separat|
|000039e0| 6f 72 20 6d 61 69 6c 2d | 70 6f 73 69 74 69 6f 6e |or mail-|position|
|000039f0| 2d 6f 6e 2d 66 69 65 6c | 64 20 22 52 65 73 65 6e |-on-fiel|d "Resen|
|00003a00| 74 2d 54 6f 22 20 6d 61 | 6b 65 2d 6c 6f 63 61 6c |t-To" ma|ke-local|
|00003a10| 2d 76 61 72 69 61 62 6c | 65 20 76 6d 2d 72 65 64 |-variabl|e vm-red|
|00003a20| 69 73 74 72 69 62 75 74 | 65 2d 6c 69 73 74 20 72 |istribut|e-list r|
|00003a30| 65 64 69 73 74 72 69 62 | 75 74 69 6e 67 20 76 6d |edistrib|uting vm|
|00003a40| 2d 73 79 73 74 65 6d 2d | 73 74 61 74 65 20 72 75 |-system-|state ru|
|00003a50| 6e 2d 68 6f 6f 6b 73 20 | 76 6d 2d 72 65 73 65 6e |n-hooks |vm-resen|
|00003a60| 64 2d 6d 65 73 73 61 67 | 65 2d 68 6f 6f 6b 20 76 |d-messag|e-hook v|
|00003a70| 6d 2d 6d 61 69 6c 2d 6d | 6f 64 65 2d 68 6f 6f 6b |m-mail-m|ode-hook|
|00003a80| 5d 20 36 20 22 5c 0a 52 | 65 73 65 6e 64 20 74 68 |] 6 "\.R|esend th|
|00003a90| 65 20 63 75 72 72 65 6e | 74 20 6d 65 73 73 61 67 |e curren|t messag|
|00003aa0| 65 20 74 6f 20 73 6f 6d | 65 6f 6e 65 20 65 6c 73 |e to som|eone els|
|00003ab0| 65 2e 0a 54 68 65 20 63 | 75 72 72 65 6e 74 20 6d |e..The c|urrent m|
|00003ac0| 65 73 73 61 67 65 20 77 | 69 6c 6c 20 62 65 20 63 |essage w|ill be c|
|00003ad0| 6f 70 69 65 64 20 74 6f | 20 61 20 4d 61 69 6c 20 |opied to| a Mail |
|00003ae0| 6d 6f 64 65 20 62 75 66 | 66 65 72 20 61 6e 64 20 |mode buf|fer and |
|00003af0| 79 6f 75 0a 63 61 6e 20 | 65 64 69 74 20 74 68 65 |you.can |edit the|
|00003b00| 20 6d 65 73 73 61 67 65 | 20 61 6e 64 20 73 65 6e | message| and sen|
|00003b10| 64 20 69 74 20 61 73 20 | 75 73 75 61 6c 2e 0a 0a |d it as |usual...|
|00003b20| 4e 4f 54 45 3a 20 73 69 | 6e 63 65 20 79 6f 75 20 |NOTE: si|nce you |
|00003b30| 61 72 65 20 64 6f 69 6e | 67 20 61 20 72 65 73 65 |are doin|g a rese|
|00003b40| 6e 64 2c 20 61 20 52 65 | 73 65 6e 74 2d 54 6f 20 |nd, a Re|sent-To |
|00003b50| 68 65 61 64 65 72 20 69 | 73 0a 70 72 6f 76 69 64 |header i|s.provid|
|00003b60| 65 64 20 66 6f 72 20 79 | 6f 75 20 74 6f 20 66 69 |ed for y|ou to fi|
|00003b70| 6c 6c 20 69 6e 2e 20 20 | 49 66 20 79 6f 75 20 64 |ll in.  |If you d|
|00003b80| 6f 6e 27 74 20 66 69 6c | 6c 20 69 74 20 69 6e 2c |on't fil|l it in,|
|00003b90| 20 77 68 65 6e 20 79 6f | 75 0a 73 65 6e 64 20 74 | when yo|u.send t|
|00003ba0| 68 65 20 6d 65 73 73 61 | 67 65 20 69 74 20 77 69 |he messa|ge it wi|
|00003bb0| 6c 6c 20 67 6f 20 74 6f | 20 74 68 65 20 6f 72 69 |ll go to| the ori|
|00003bc0| 67 69 6e 61 6c 20 72 65 | 63 69 70 69 65 6e 74 73 |ginal re|cipients|
|00003bd0| 20 6c 69 73 74 65 64 20 | 69 6e 0a 74 68 65 20 54 | listed |in.the T|
|00003be0| 6f 20 61 6e 64 20 43 63 | 20 68 65 61 64 65 72 73 |o and Cc| headers|
|00003bf0| 2e 20 20 59 6f 75 20 6d | 61 79 20 61 6c 73 6f 20 |.  You m|ay also |
|00003c00| 63 72 65 61 74 65 20 61 | 20 52 65 73 65 6e 74 2d |create a| Resent-|
|00003c10| 43 63 20 68 65 61 64 65 | 72 2e 22 20 6e 69 6c 5d |Cc heade|r." nil]|
|00003c20| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 76 6d 2d |).(defal|ias 'vm-|
|00003c30| 73 65 6e 64 2d 64 69 67 | 65 73 74 20 23 5b 28 26 |send-dig|est #[(&|
|00003c40| 6f 70 74 69 6f 6e 61 6c | 20 70 72 65 66 69 78 29 |optional| prefix)|
|00003c50| 20 22 08 83 13 00 c1 08 | 21 84 10 00 c2 c3 21 83 | "......|!.....!.|
|00003c60| 13 00 08 71 88 c4 20 88 | c5 20 88 0e 06 0e 07 0e |...q.. .|. ......|
|00003c70| 08 c9 3d 83 2a 00 ca cb | 21 82 2c 00 0e 5c 66 cd |..=.*...|!.,..\f.|
|00003c80| 1e 0e 1e 0f 1e 10 1e 11 | 8c 7e 88 d2 d3 d4 c1 20 |........|.~..... |
|00003c90| 5c 22 21 88 d5 d6 21 88 | d7 16 18 0e 0f 16 16 0e |\"!...!.|........|
|00003ca0| 11 16 06 64 62 88 60 16 | 0e 0e 0f 16 10 d9 da 0e |...db.`.|........|
|00003cb0| 1b 5c 22 88 0e 1b dc 9a | 83 72 00 dd 0e 0f 0e 1e |.\".....|.r......|
|00003cc0| 0e 1f 23 88 82 82 00 0e | 1b e0 9a 83 82 00 e1 0e |..#.....|........|
|00003cd0| 0f 0e 5c 22 0e 23 23 88 | 0e 0e 62 88 0e 0f 16 10 |..\".##.|..b.....|
|00003ce0| 0e 24 83 bd 00 d9 e5 21 | 88 0e 10 83 bd 00 cd 1e |.$.....!|........|
|00003cf0| 26 e7 e8 0e 10 40 5c 22 | e9 b1 02 88 29 0e 2a 83 |&....@\"|....).*.|
|00003d00| b4 00 eb 75 88 ec 20 88 | ed 75 88 0e 10 41 89 16 |...u.. .|.u...A..|
|00003d10| 10 84 98 00 ee ef 21 88 | d9 f0 0e 1b 5c 22 88 2d |......!.|....\".-|
|00003d20| f1 f2 21 88 f1 f3 21 87 | 22 20 5b 76 6d 2d 6d 61 |..!...!.|" [vm-ma|
|00003d30| 69 6c 2d 62 75 66 66 65 | 72 20 62 75 66 66 65 72 |il-buffe|r buffer|
|00003d40| 2d 6e 61 6d 65 20 65 72 | 72 6f 72 20 22 46 6f 6c |-name er|ror "Fol|
|00003d50| 64 65 72 20 62 75 66 66 | 65 72 20 68 61 73 20 62 |der buff|er has b|
|00003d60| 65 65 6e 20 6b 69 6c 6c | 65 64 2e 22 20 76 6d 2d |een kill|ed." vm-|
|00003d70| 63 68 65 63 6b 2d 66 6f | 72 2d 6b 69 6c 6c 65 64 |check-fo|r-killed|
|00003d80| 2d 73 75 6d 6d 61 72 79 | 20 76 6d 2d 65 72 72 6f |-summary| vm-erro|
|00003d90| 72 2d 69 66 2d 66 6f 6c | 64 65 72 2d 65 6d 70 74 |r-if-fol|der-empt|
|00003da0| 79 20 64 65 66 61 75 6c | 74 2d 64 69 72 65 63 74 |y defaul|t-direct|
|00003db0| 6f 72 79 20 76 6d 2d 6d | 65 73 73 61 67 65 2d 70 |ory vm-m|essage-p|
|00003dc0| 6f 69 6e 74 65 72 20 6c | 61 73 74 2d 63 6f 6d 6d |ointer l|ast-comm|
|00003dd0| 61 6e 64 20 76 6d 2d 6e | 65 78 74 2d 63 6f 6d 6d |and vm-n|ext-comm|
|00003de0| 61 6e 64 2d 75 73 65 73 | 2d 6d 61 72 6b 73 20 76 |and-uses|-marks v|
|00003df0| 6d 2d 73 65 6c 65 63 74 | 2d 6d 61 72 6b 65 64 2d |m-select|-marked-|
|00003e00| 6f 72 2d 70 72 65 66 69 | 78 65 64 2d 6d 65 73 73 |or-prefi|xed-mess|
|00003e10| 61 67 65 73 20 30 20 76 | 6d 2d 6d 65 73 73 61 67 |ages 0 v|m-messag|
|00003e20| 65 2d 6c 69 73 74 20 6e | 69 6c 20 73 74 61 72 74 |e-list n|il start|
|00003e30| 20 6d 6c 69 73 74 20 6d | 70 20 64 69 72 20 76 6d | mlist m|p dir vm|
|00003e40| 2d 6d 61 69 6c 2d 69 6e | 74 65 72 6e 61 6c 20 66 |-mail-in|ternal f|
|00003e50| 6f 72 6d 61 74 20 22 64 | 69 67 65 73 74 20 66 72 |ormat "d|igest fr|
|00003e60| 6f 6d 20 25 73 22 20 6d | 61 6b 65 2d 6c 6f 63 61 |om %s" m|ake-loca|
|00003e70| 6c 2d 76 61 72 69 61 62 | 6c 65 20 76 6d 2d 66 6f |l-variab|le vm-fo|
|00003e80| 72 77 61 72 64 2d 6c 69 | 73 74 20 66 6f 72 77 61 |rward-li|st forwa|
|00003e90| 72 64 69 6e 67 20 76 6d | 2d 73 79 73 74 65 6d 2d |rding vm|-system-|
|00003ea0| 73 74 61 74 65 20 6d 65 | 73 73 61 67 65 20 22 42 |state me|ssage "B|
|00003eb0| 75 69 6c 64 69 6e 67 20 | 25 73 20 64 69 67 65 73 |uilding |%s diges|
|00003ec0| 74 2e 2e 2e 22 20 76 6d | 2d 64 69 67 65 73 74 2d |t..." vm|-digest-|
|00003ed0| 73 65 6e 64 2d 74 79 70 | 65 20 22 72 66 63 39 33 |send-typ|e "rfc93|
|00003ee0| 34 22 20 76 6d 2d 72 66 | 63 39 33 34 2d 65 6e 63 |4" vm-rf|c934-enc|
|00003ef0| 61 70 73 75 6c 61 74 65 | 2d 6d 65 73 73 61 67 65 |apsulate|-message|
|00003f00| 73 20 76 6d 2d 72 66 63 | 39 33 34 2d 64 69 67 65 |s vm-rfc|934-dige|
|00003f10| 73 74 2d 68 65 61 64 65 | 72 73 20 76 6d 2d 72 66 |st-heade|rs vm-rf|
|00003f20| 63 39 33 34 2d 64 69 67 | 65 73 74 2d 64 69 73 63 |c934-dig|est-disc|
|00003f30| 61 72 64 2d 68 65 61 64 | 65 72 2d 72 65 67 65 78 |ard-head|er-regex|
|00003f40| 70 20 22 72 66 63 31 31 | 35 33 22 20 76 6d 2d 72 |p "rfc11|53" vm-r|
|00003f50| 66 63 31 31 35 33 2d 65 | 6e 63 61 70 73 75 6c 61 |fc1153-e|ncapsula|
|00003f60| 74 65 2d 6d 65 73 73 61 | 67 65 73 20 76 6d 2d 72 |te-messa|ges vm-r|
|00003f70| 66 63 31 31 35 33 2d 64 | 69 67 65 73 74 2d 68 65 |fc1153-d|igest-he|
|00003f80| 61 64 65 72 73 20 76 6d | 2d 72 66 63 31 31 35 33 |aders vm|-rfc1153|
|00003f90| 2d 64 69 67 65 73 74 2d | 64 69 73 63 61 72 64 2d |-digest-|discard-|
|00003fa0| 68 65 61 64 65 72 2d 72 | 65 67 65 78 70 20 70 72 |header-r|egexp pr|
|00003fb0| 65 66 69 78 20 22 42 75 | 69 6c 64 69 6e 67 20 64 |efix "Bu|ilding d|
|00003fc0| 69 67 65 73 74 20 70 72 | 65 61 6d 62 6c 65 2e 2e |igest pr|eamble..|
|00003fd0| 2e 22 20 76 6d 2d 73 75 | 6d 6d 61 72 79 2d 75 6e |." vm-su|mmary-un|
|00003fe0| 69 6e 74 65 72 65 73 74 | 69 6e 67 2d 73 65 6e 64 |interest|ing-send|
|00003ff0| 65 72 73 20 76 6d 2d 73 | 70 72 69 6e 74 66 20 76 |ers vm-s|printf v|
|00004000| 6d 2d 64 69 67 65 73 74 | 2d 70 72 65 61 6d 62 6c |m-digest|-preambl|
|00004010| 65 2d 66 6f 72 6d 61 74 | 20 22 5c 6e 22 20 76 6d |e-format| "\n" vm|
|00004020| 2d 64 69 67 65 73 74 2d | 63 65 6e 74 65 72 2d 70 |-digest-|center-p|
|00004030| 72 65 61 6d 62 6c 65 20 | 2d 31 20 63 65 6e 74 65 |reamble |-1 cente|
|00004040| 72 2d 6c 69 6e 65 20 31 | 20 6d 61 69 6c 2d 70 6f |r-line 1| mail-po|
|00004050| 73 69 74 69 6f 6e 2d 6f | 6e 2d 66 69 65 6c 64 20 |sition-o|n-field |
|00004060| 22 54 6f 22 20 22 42 75 | 69 6c 64 69 6e 67 20 25 |"To" "Bu|ilding %|
|00004070| 73 20 64 69 67 65 73 74 | 2e 2e 2e 20 64 6f 6e 65 |s digest|... done|
|00004080| 22 20 72 75 6e 2d 68 6f | 6f 6b 73 20 76 6d 2d 73 |" run-ho|oks vm-s|
|00004090| 65 6e 64 2d 64 69 67 65 | 73 74 2d 68 6f 6f 6b 20 |end-dige|st-hook |
|000040a0| 76 6d 2d 6d 61 69 6c 2d | 6d 6f 64 65 2d 68 6f 6f |vm-mail-|mode-hoo|
|000040b0| 6b 5d 20 35 20 22 5c 0a | 53 65 6e 64 20 61 20 64 |k] 5 "\.|Send a d|
|000040c0| 69 67 65 73 74 20 6f 66 | 20 61 6c 6c 20 6d 65 73 |igest of| all mes|
|000040d0| 73 61 67 65 73 20 69 6e | 20 74 68 65 20 63 75 72 |sages in| the cur|
|000040e0| 72 65 6e 74 20 66 6f 6c | 64 65 72 20 74 6f 20 72 |rent fol|der to r|
|000040f0| 65 63 69 70 69 65 6e 74 | 73 2e 0a 54 68 65 20 74 |ecipient|s..The t|
|00004100| 79 70 65 20 6f 66 20 74 | 68 65 20 64 69 67 65 73 |ype of t|he diges|
|00004110| 74 20 69 73 20 73 70 65 | 63 69 66 69 65 64 20 62 |t is spe|cified b|
|00004120| 79 20 74 68 65 20 76 61 | 72 69 61 62 6c 65 20 76 |y the va|riable v|
|00004130| 6d 2d 64 69 67 65 73 74 | 2d 73 65 6e 64 2d 74 79 |m-digest|-send-ty|
|00004140| 70 65 2e 0a 59 6f 75 20 | 77 69 6c 6c 20 62 65 20 |pe..You |will be |
|00004150| 70 6c 61 63 65 64 20 69 | 6e 20 61 20 4d 61 69 6c |placed i|n a Mail|
|00004160| 20 6d 6f 64 65 20 62 75 | 66 66 65 72 20 61 73 20 | mode bu|ffer as |
|00004170| 69 73 20 75 73 75 61 6c | 20 77 69 74 68 20 72 65 |is usual| with re|
|00004180| 70 6c 69 65 73 2c 20 62 | 75 74 20 79 6f 75 0a 6d |plies, b|ut you.m|
|00004190| 75 73 74 20 66 69 6c 6c | 20 69 6e 20 74 68 65 20 |ust fill| in the |
|000041a0| 54 6f 3a 20 61 6e 64 20 | 53 75 62 6a 65 63 74 3a |To: and |Subject:|
|000041b0| 20 68 65 61 64 65 72 73 | 20 6d 61 6e 75 61 6c 6c | headers| manuall|
|000041c0| 79 2e 0a 0a 50 72 65 66 | 69 78 20 61 72 67 20 6d |y...Pref|ix arg m|
|000041d0| 65 61 6e 73 20 74 6f 20 | 69 6e 73 65 72 74 20 61 |eans to |insert a|
|000041e0| 20 6c 69 73 74 20 6f 66 | 20 70 72 65 61 6d 62 6c | list of| preambl|
|000041f0| 65 20 6c 69 6e 65 73 20 | 61 74 20 74 68 65 20 62 |e lines |at the b|
|00004200| 65 67 69 6e 6e 69 6e 67 | 20 6f 66 0a 74 68 65 20 |eginning| of.the |
|00004210| 64 69 67 65 73 74 2e 20 | 20 4f 6e 65 20 6c 69 6e |digest. | One lin|
|00004220| 65 20 69 73 20 67 65 6e | 65 72 61 74 65 64 20 66 |e is gen|erated f|
|00004230| 6f 72 20 65 61 63 68 20 | 6d 65 73 73 61 67 65 20 |or each |message |
|00004240| 62 65 69 6e 67 20 64 69 | 67 65 73 74 69 66 69 65 |being di|gestifie|
|00004250| 64 2e 0a 54 68 65 20 76 | 61 72 69 61 62 6c 65 20 |d..The v|ariable |
|00004260| 76 6d 2d 64 69 67 65 73 | 74 2d 70 72 65 61 6d 62 |vm-diges|t-preamb|
|00004270| 6c 65 2d 66 6f 72 6d 61 | 74 20 64 65 74 65 72 6d |le-forma|t determ|
|00004280| 69 6e 65 73 20 74 68 65 | 20 66 6f 72 6d 61 74 20 |ines the| format |
|00004290| 6f 66 20 74 68 65 0a 70 | 72 65 61 6d 62 6c 65 20 |of the.p|reamble |
|000042a0| 6c 69 6e 65 73 2e 0a 0a | 49 66 20 69 6e 76 6f 6b |lines...|If invok|
|000042b0| 65 64 20 6f 6e 20 6d 61 | 72 6b 65 64 20 6d 65 73 |ed on ma|rked mes|
|000042c0| 73 61 67 65 73 20 28 76 | 69 61 20 76 6d 2d 6e 65 |sages (v|ia vm-ne|
|000042d0| 78 74 2d 63 6f 6d 6d 61 | 6e 64 2d 75 73 65 73 2d |xt-comma|nd-uses-|
|000042e0| 6d 61 72 6b 73 29 2c 0a | 6f 6e 6c 79 20 6d 61 72 |marks),.|only mar|
|000042f0| 6b 65 64 20 6d 65 73 73 | 61 67 65 73 20 77 69 6c |ked mess|ages wil|
|00004300| 6c 20 62 65 20 70 75 74 | 20 69 6e 74 6f 20 74 68 |l be put| into th|
|00004310| 65 20 64 69 67 65 73 74 | 2e 22 20 22 50 22 5d 29 |e digest|." "P"])|
|00004320| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 76 6d 2d 73 |.(defali|as 'vm-s|
|00004330| 65 6e 64 2d 72 66 63 39 | 33 34 2d 64 69 67 65 73 |end-rfc9|34-diges|
|00004340| 74 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 70 |t #[(&op|tional p|
|00004350| 72 65 61 6d 62 6c 65 29 | 20 22 c0 19 c2 0b 21 29 |reamble)| "....!)|
|00004360| 87 22 20 5b 22 72 66 63 | 39 33 34 22 20 76 6d 2d |." ["rfc|934" vm-|
|00004370| 64 69 67 65 73 74 2d 73 | 65 6e 64 2d 74 79 70 65 |digest-s|end-type|
|00004380| 20 76 6d 2d 73 65 6e 64 | 2d 64 69 67 65 73 74 20 | vm-send|-digest |
|00004390| 70 72 65 61 6d 62 6c 65 | 5d 20 32 20 22 5c 0a 4c |preamble|] 2 "\.L|
|000043a0| 69 6b 65 20 76 6d 2d 73 | 65 6e 64 2d 64 69 67 65 |ike vm-s|end-dige|
|000043b0| 73 74 20 62 75 74 20 61 | 6c 77 61 79 73 20 73 65 |st but a|lways se|
|000043c0| 6e 64 73 20 61 6e 20 52 | 46 43 20 39 33 34 20 64 |nds an R|FC 934 d|
|000043d0| 69 67 65 73 74 2e 22 20 | 22 50 22 5d 29 0a 28 64 |igest." |"P"]).(d|
|000043e0| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 73 65 6e 64 |efalias |'vm-send|
|000043f0| 2d 72 66 63 31 31 35 33 | 2d 64 69 67 65 73 74 20 |-rfc1153|-digest |
|00004400| 23 5b 28 26 6f 70 74 69 | 6f 6e 61 6c 20 70 72 65 |#[(&opti|onal pre|
|00004410| 61 6d 62 6c 65 29 20 22 | c0 19 c2 0b 21 29 87 22 |amble) "|....!)."|
|00004420| 20 5b 22 72 66 63 31 31 | 35 33 22 20 76 6d 2d 64 | ["rfc11|53" vm-d|
|00004430| 69 67 65 73 74 2d 73 65 | 6e 64 2d 74 79 70 65 20 |igest-se|nd-type |
|00004440| 76 6d 2d 73 65 6e 64 2d | 64 69 67 65 73 74 20 70 |vm-send-|digest p|
|00004450| 72 65 61 6d 62 6c 65 5d | 20 32 20 22 5c 0a 4c 69 |reamble]| 2 "\.Li|
|00004460| 6b 65 20 76 6d 2d 73 65 | 6e 64 2d 64 69 67 65 73 |ke vm-se|nd-diges|
|00004470| 74 20 62 75 74 20 61 6c | 77 61 79 73 20 73 65 6e |t but al|ways sen|
|00004480| 64 73 20 61 6e 20 52 46 | 43 20 31 31 35 33 20 64 |ds an RF|C 1153 d|
|00004490| 69 67 65 73 74 2e 22 20 | 22 50 22 5d 29 0a 28 64 |igest." |"P"]).(d|
|000044a0| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 63 6f 6e 74 |efalias |'vm-cont|
|000044b0| 69 6e 75 65 2d 63 6f 6d | 70 6f 73 69 6e 67 2d 6d |inue-com|posing-m|
|000044c0| 65 73 73 61 67 65 20 23 | 5b 28 26 6f 70 74 69 6f |essage #|[(&optio|
|000044d0| 6e 61 6c 20 6e 6f 74 2d | 70 69 63 6b 79 29 20 22 |nal not-|picky) "|
|000044e0| 08 c1 3d 83 5c 6e 00 c2 | 70 21 88 c3 5c 66 21 89 |..=.\n..|p!..\f!.|
|000044f0| 1d 83 21 00 0d 70 3d 84 | 21 00 c6 0d c7 c8 c9 24 |..!..p=.|!......$|
|00004500| 82 24 00 ca cb 21 29 87 | 22 20 5b 6d 61 6a 6f 72 |.$...!).|" [major|
|00004510| 2d 6d 6f 64 65 20 6d 61 | 69 6c 2d 6d 6f 64 65 20 |-mode ma|il-mode |
|00004520| 62 75 72 79 2d 62 75 66 | 66 65 72 20 76 6d 2d 66 |bury-buf|fer vm-f|
|00004530| 69 6e 64 2d 63 6f 6d 70 | 6f 73 69 74 69 6f 6e 2d |ind-comp|osition-|
|00004540| 62 75 66 66 65 72 20 6e | 6f 74 2d 70 69 63 6b 79 |buffer n|ot-picky|
|00004550| 20 62 20 76 6d 2d 64 69 | 73 70 6c 61 79 20 74 20 | b vm-di|splay t |
|00004560| 28 76 6d 2d 63 6f 6e 74 | 69 6e 75 65 2d 63 6f 6d |(vm-cont|inue-com|
|00004570| 70 6f 73 69 6e 67 2d 6d | 65 73 73 61 67 65 29 20 |posing-m|essage) |
|00004580| 28 76 6d 2d 63 6f 6e 74 | 69 6e 75 65 2d 63 6f 6d |(vm-cont|inue-com|
|00004590| 70 6f 73 69 6e 67 2d 6d | 65 73 73 61 67 65 20 63 |posing-m|essage c|
|000045a0| 6f 6d 70 6f 73 69 6e 67 | 2d 6d 65 73 73 61 67 65 |omposing|-message|
|000045b0| 29 20 6d 65 73 73 61 67 | 65 20 22 4e 6f 20 63 6f |) messag|e "No co|
|000045c0| 6d 70 6f 73 69 74 69 6f | 6e 20 62 75 66 66 65 72 |mpositio|n buffer|
|000045d0| 73 20 66 6f 75 6e 64 22 | 5d 20 36 20 22 5c 0a 46 |s found"|] 6 "\.F|
|000045e0| 69 6e 64 20 61 6e 64 20 | 73 65 6c 65 63 74 20 74 |ind and |select t|
|000045f0| 68 65 20 6d 6f 73 74 20 | 72 65 63 65 6e 74 6c 79 |he most |recently|
|00004600| 20 75 73 65 64 20 6d 61 | 69 6c 20 63 6f 6d 70 6f | used ma|il compo|
|00004610| 73 69 74 69 6f 6e 20 62 | 75 66 66 65 72 2e 0a 49 |sition b|uffer..I|
|00004620| 66 20 74 68 65 20 73 65 | 6c 65 63 74 65 64 20 62 |f the se|lected b|
|00004630| 75 66 66 65 72 20 69 73 | 20 61 6c 72 65 61 64 79 |uffer is| already|
|00004640| 20 61 20 4d 61 69 6c 20 | 6d 6f 64 65 20 62 75 66 | a Mail |mode buf|
|00004650| 66 65 72 20 74 68 65 6e | 20 69 74 20 69 73 0a 62 |fer then| it is.b|
|00004660| 75 72 69 65 64 20 62 65 | 66 6f 72 65 20 62 65 67 |uried be|fore beg|
|00004670| 69 6e 6e 69 6e 67 20 74 | 68 65 20 73 65 61 72 63 |inning t|he searc|
|00004680| 68 2e 20 20 4e 6f 6e 20 | 4d 61 69 6c 20 6d 6f 64 |h.  Non |Mail mod|
|00004690| 65 20 62 75 66 66 65 72 | 73 20 61 6e 64 0a 75 6e |e buffer|s and.un|
|000046a0| 6d 6f 64 69 66 69 65 64 | 20 4d 61 69 6c 20 62 75 |modified| Mail bu|
|000046b0| 66 66 65 72 73 20 61 72 | 65 20 73 6b 69 70 70 65 |ffers ar|e skippe|
|000046c0| 64 2e 20 20 50 72 65 66 | 69 78 20 61 72 67 20 6d |d.  Pref|ix arg m|
|000046d0| 65 61 6e 73 20 75 6e 6d | 6f 64 69 66 69 65 64 0a |eans unm|odified.|
|000046e0| 4d 61 69 6c 20 6d 6f 64 | 65 20 62 75 66 66 65 72 |Mail mod|e buffer|
|000046f0| 73 20 61 72 65 20 6e 6f | 74 20 73 6b 69 70 70 65 |s are no|t skippe|
|00004700| 64 2e 20 20 49 66 20 6e | 6f 20 73 75 69 74 61 62 |d.  If n|o suitab|
|00004710| 6c 65 20 62 75 66 66 65 | 72 20 69 73 0a 66 6f 75 |le buffe|r is.fou|
|00004720| 6e 64 2c 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |nd, the |current |
|00004730| 62 75 66 66 65 72 20 72 | 65 6d 61 69 6e 73 20 73 |buffer r|emains s|
|00004740| 65 6c 65 63 74 65 64 2e | 22 20 22 50 22 5d 29 0a |elected.|" "P"]).|
|00004750| 28 64 65 66 61 6c 69 61 | 73 20 28 71 75 6f 74 65 |(defalia|s (quote|
|00004760| 20 76 6d 2d 6d 61 69 6c | 2d 69 6e 74 65 72 6e 61 | vm-mail|-interna|
|00004770| 6c 29 20 23 5b 28 26 6f | 70 74 69 6f 6e 61 6c 20 |l) #[(&o|ptional |
|00004780| 62 75 66 66 65 72 2d 6e | 61 6d 65 20 74 6f 20 73 |buffer-n|ame to s|
|00004790| 75 62 6a 65 63 74 20 69 | 6e 2d 72 65 70 6c 79 2d |ubject i|n-reply-|
|000047a0| 74 6f 20 63 63 20 72 65 | 66 65 72 65 6e 63 65 73 |to cc re|ferences|
|000047b0| 20 6e 65 77 73 67 72 6f | 75 70 73 29 20 22 c0 19 | newsgro|ups) "..|
|000047c0| 5c 6e c3 3e 83 5c 6e 00 | 70 11 c4 0d 86 10 00 c6 |\n.>.\n.|p.......|
|000047d0| 21 71 88 c7 0e 08 21 88 | c9 20 88 09 16 5c 6e cb |!q....!.|. ...\n.|
|000047e0| 0e 5c 66 21 88 cd ce 21 | 83 2f 00 ce 20 88 82 42 |.\f!...!|./.. ..B|
|000047f0| 00 0e 0f d0 3d 83 42 00 | c0 16 0f d1 d2 21 83 42 |....=.B.|.....!.B|
|00004800| 00 d3 20 88 0e 14 3b 83 | 4f 00 d5 0e 14 d6 b1 03 |.. ...;.|O.......|
|00004810| 88 d7 0e 18 86 56 00 d9 | d6 b1 03 88 0e 1a 83 66 |.....V..|.......f|
|00004820| 00 db 0e 1a d6 b1 03 88 | dc 0e 1d 86 6d 00 d9 d6 |........|....m...|
|00004830| b1 03 88 0e 1e 83 7d 00 | df 0e 1e d6 b1 03 88 0e |......}.|........|
|00004840| 20 83 89 00 e1 0e 20 d6 | b1 03 88 0e 5c 22 83 95 | ..... .|....\"..|
|00004850| 00 e3 0e 5c 22 d6 b1 03 | 88 0e 24 83 a1 00 e5 0e |...\"...|..$.....|
|00004860| 24 d6 b1 03 88 0e 26 83 | ad 00 e7 e8 20 d6 b1 03 |$.....&.|.... ...|
|00004870| 88 0e 29 83 b9 00 ea 0e | 29 d6 b1 03 88 0e 2b 83 |..).....|).....+.|
|00004880| c2 00 0e 2b 63 88 68 ec | 55 84 cb 00 ec 63 88 0e |...+c.h.|U....c..|
|00004890| 2d d6 b1 02 88 0e 2e 3b | 83 e0 00 8a 0e 2e 63 88 |-......;|......c.|
|000048a0| 29 82 01 01 0e 2e d0 3d | 83 01 01 8a ef 63 88 f0 |)......=|.....c..|
|000048b0| f1 f2 21 83 fd 00 0e 32 | 3b 83 fd 00 0e 32 86 fe |..!....2|;....2..|
|000048c0| 00 f3 21 88 29 f4 8b 88 | f5 70 d0 f6 0e 37 f8 44 |..!.)...|.p...7.D|
|000048d0| 24 88 0e 18 84 17 01 f9 | fa 21 88 fb fc 21 29 87 |$.......|.!...!).|
|000048e0| 22 20 5b 6e 69 6c 20 66 | 6f 6c 64 65 72 2d 62 75 |" [nil f|older-bu|
|000048f0| 66 66 65 72 20 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |ffer maj|or-mode |
|00004900| 28 76 6d 2d 6d 6f 64 65 | 20 76 6d 2d 76 69 72 74 |(vm-mode| vm-virt|
|00004910| 75 61 6c 2d 6d 6f 64 65 | 29 20 67 65 6e 65 72 61 |ual-mode|) genera|
|00004920| 74 65 2d 6e 65 77 2d 62 | 75 66 66 65 72 20 62 75 |te-new-b|uffer bu|
|00004930| 66 66 65 72 2d 6e 61 6d | 65 20 22 2a 56 4d 2d 6d |ffer-nam|e "*VM-m|
|00004940| 61 69 6c 2a 22 20 61 75 | 74 6f 2d 73 61 76 65 2d |ail*" au|to-save-|
|00004950| 6d 6f 64 65 20 61 75 74 | 6f 2d 73 61 76 65 2d 64 |mode aut|o-save-d|
|00004960| 65 66 61 75 6c 74 20 6d | 61 69 6c 2d 6d 6f 64 65 |efault m|ail-mode|
|00004970| 20 76 6d 2d 6d 61 69 6c | 2d 62 75 66 66 65 72 20 | vm-mail|-buffer |
|00004980| 75 73 65 2d 6c 6f 63 61 | 6c 2d 6d 61 70 20 76 6d |use-loca|l-map vm|
|00004990| 2d 6d 61 69 6c 2d 6d 6f | 64 65 2d 6d 61 70 20 66 |-mail-mo|de-map f|
|000049a0| 62 6f 75 6e 64 70 20 6d | 61 69 6c 2d 61 6c 69 61 |boundp m|ail-alia|
|000049b0| 73 65 73 2d 73 65 74 75 | 70 20 6d 61 69 6c 2d 61 |ses-setu|p mail-a|
|000049c0| 6c 69 61 73 65 73 20 74 | 20 66 69 6c 65 2d 65 78 |liases t| file-ex|
|000049d0| 69 73 74 73 2d 70 20 22 | 7e 2f 2e 6d 61 69 6c 72 |ists-p "|~/.mailr|
|000049e0| 63 22 20 62 75 69 6c 64 | 2d 6d 61 69 6c 2d 61 6c |c" build|-mail-al|
|000049f0| 69 61 73 65 73 20 76 6d | 2d 6d 61 69 6c 2d 68 65 |iases vm|-mail-he|
|00004a00| 61 64 65 72 2d 66 72 6f | 6d 20 22 46 72 6f 6d 3a |ader-fro|m "From:|
|00004a10| 20 22 20 22 5c 6e 22 20 | 22 54 6f 3a 20 22 20 74 | " "\n" |"To: " t|
|00004a20| 6f 20 22 22 20 63 63 20 | 22 43 63 3a 20 22 20 22 |o "" cc |"Cc: " "|
|00004a30| 53 75 62 6a 65 63 74 3a | 20 22 20 73 75 62 6a 65 |Subject:| " subje|
|00004a40| 63 74 20 6e 65 77 73 67 | 72 6f 75 70 73 20 22 4e |ct newsg|roups "N|
|00004a50| 65 77 73 67 72 6f 75 70 | 73 3a 20 22 20 69 6e 2d |ewsgroup|s: " in-|
|00004a60| 72 65 70 6c 79 2d 74 6f | 20 22 49 6e 2d 52 65 70 |reply-to| "In-Rep|
|00004a70| 6c 79 2d 54 6f 3a 20 22 | 20 72 65 66 65 72 65 6e |ly-To: "| referen|
|00004a80| 63 65 73 20 22 52 65 66 | 65 72 65 6e 63 65 73 3a |ces "Ref|erences:|
|00004a90| 20 22 20 6d 61 69 6c 2d | 64 65 66 61 75 6c 74 2d | " mail-|default-|
|00004aa0| 72 65 70 6c 79 2d 74 6f | 20 22 52 65 70 6c 79 2d |reply-to| "Reply-|
|00004ab0| 54 6f 3a 20 22 20 6d 61 | 69 6c 2d 73 65 6c 66 2d |To: " ma|il-self-|
|00004ac0| 62 6c 69 6e 64 20 22 42 | 63 63 3a 20 22 20 75 73 |blind "B|cc: " us|
|00004ad0| 65 72 2d 6c 6f 67 69 6e | 2d 6e 61 6d 65 20 6d 61 |er-login|-name ma|
|00004ae0| 69 6c 2d 61 72 63 68 69 | 76 65 2d 66 69 6c 65 2d |il-archi|ve-file-|
|00004af0| 6e 61 6d 65 20 22 46 43 | 43 3a 20 22 20 6d 61 69 |name "FC|C: " mai|
|00004b00| 6c 2d 64 65 66 61 75 6c | 74 2d 68 65 61 64 65 72 |l-defaul|t-header|
|00004b10| 73 20 31 30 20 6d 61 69 | 6c 2d 68 65 61 64 65 72 |s 10 mai|l-header|
|00004b20| 2d 73 65 70 61 72 61 74 | 6f 72 20 6d 61 69 6c 2d |-separat|or mail-|
|00004b30| 73 69 67 6e 61 74 75 72 | 65 20 22 2d 2d 20 5c 6e |signatur|e "-- \n|
|00004b40| 22 20 69 6e 73 65 72 74 | 2d 66 69 6c 65 2d 63 6f |" insert|-file-co|
|00004b50| 6e 74 65 6e 74 73 20 62 | 6f 75 6e 64 70 20 6d 61 |ntents b|oundp ma|
|00004b60| 69 6c 2d 73 69 67 6e 61 | 74 75 72 65 2d 66 69 6c |il-signa|ture-fil|
|00004b70| 65 20 22 7e 2f 2e 73 69 | 67 6e 61 74 75 72 65 22 |e "~/.si|gnature"|
|00004b80| 20 28 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 70 | ((byte-|code ".p|
|00004b90| 21 87 22 20 5b 73 77 69 | 74 63 68 2d 74 6f 2d 62 |!." [swi|tch-to-b|
|00004ba0| 75 66 66 65 72 5d 20 32 | 29 29 20 76 6d 2d 64 69 |uffer] 2|)) vm-di|
|00004bb0| 73 70 6c 61 79 20 28 76 | 6d 2d 6d 61 69 6c 20 76 |splay (v|m-mail v|
|00004bc0| 6d 2d 6d 61 69 6c 2d 6f | 74 68 65 72 2d 66 72 61 |m-mail-o|ther-fra|
|00004bd0| 6d 65 20 76 6d 2d 6d 61 | 69 6c 2d 6f 74 68 65 72 |me vm-ma|il-other|
|00004be0| 2d 77 69 6e 64 6f 77 20 | 76 6d 2d 72 65 70 6c 79 |-window |vm-reply|
|00004bf0| 20 76 6d 2d 72 65 70 6c | 79 2d 6f 74 68 65 72 2d | vm-repl|y-other-|
|00004c00| 66 72 61 6d 65 20 76 6d | 2d 72 65 70 6c 79 2d 69 |frame vm|-reply-i|
|00004c10| 6e 63 6c 75 64 65 2d 74 | 65 78 74 20 76 6d 2d 72 |nclude-t|ext vm-r|
|00004c20| 65 70 6c 79 2d 69 6e 63 | 6c 75 64 65 2d 74 65 78 |eply-inc|lude-tex|
|00004c30| 74 2d 6f 74 68 65 72 2d | 66 72 61 6d 65 20 76 6d |t-other-|frame vm|
|00004c40| 2d 66 6f 6c 6c 6f 77 75 | 70 20 76 6d 2d 66 6f 6c |-followu|p vm-fol|
|00004c50| 6c 6f 77 75 70 2d 6f 74 | 68 65 72 2d 66 72 61 6d |lowup-ot|her-fram|
|00004c60| 65 20 76 6d 2d 66 6f 6c | 6c 6f 77 75 70 2d 69 6e |e vm-fol|lowup-in|
|00004c70| 63 6c 75 64 65 2d 74 65 | 78 74 20 76 6d 2d 66 6f |clude-te|xt vm-fo|
|00004c80| 6c 6c 6f 77 75 70 2d 69 | 6e 63 6c 75 64 65 2d 74 |llowup-i|nclude-t|
|00004c90| 65 78 74 2d 6f 74 68 65 | 72 2d 66 72 61 6d 65 20 |ext-othe|r-frame |
|00004ca0| 76 6d 2d 73 65 6e 64 2d | 64 69 67 65 73 74 20 76 |vm-send-|digest v|
|00004cb0| 6d 2d 73 65 6e 64 2d 64 | 69 67 65 73 74 2d 6f 74 |m-send-d|igest-ot|
|00004cc0| 68 65 72 2d 66 72 61 6d | 65 20 76 6d 2d 73 65 6e |her-fram|e vm-sen|
|00004cd0| 64 2d 72 66 63 39 33 34 | 2d 64 69 67 65 73 74 20 |d-rfc934|-digest |
|00004ce0| 76 6d 2d 73 65 6e 64 2d | 72 66 63 39 33 34 2d 64 |vm-send-|rfc934-d|
|00004cf0| 69 67 65 73 74 2d 6f 74 | 68 65 72 2d 66 72 61 6d |igest-ot|her-fram|
|00004d00| 65 20 76 6d 2d 73 65 6e | 64 2d 72 66 63 31 31 35 |e vm-sen|d-rfc115|
|00004d10| 33 2d 64 69 67 65 73 74 | 20 76 6d 2d 73 65 6e 64 |3-digest| vm-send|
|00004d20| 2d 72 66 63 31 31 35 33 | 2d 64 69 67 65 73 74 2d |-rfc1153|-digest-|
|00004d30| 6f 74 68 65 72 2d 66 72 | 61 6d 65 20 76 6d 2d 66 |other-fr|ame vm-f|
|00004d40| 6f 72 77 61 72 64 2d 6d | 65 73 73 61 67 65 20 76 |orward-m|essage v|
|00004d50| 6d 2d 66 6f 72 77 61 72 | 64 2d 6d 65 73 73 61 67 |m-forwar|d-messag|
|00004d60| 65 2d 6f 74 68 65 72 2d | 66 72 61 6d 65 20 76 6d |e-other-|frame vm|
|00004d70| 2d 66 6f 72 77 61 72 64 | 2d 6d 65 73 73 61 67 65 |-forward|-message|
|00004d80| 2d 61 6c 6c 2d 68 65 61 | 64 65 72 73 20 76 6d 2d |-all-hea|ders vm-|
|00004d90| 66 6f 72 77 61 72 64 2d | 6d 65 73 73 61 67 65 2d |forward-|message-|
|00004da0| 61 6c 6c 2d 68 65 61 64 | 65 72 73 2d 6f 74 68 65 |all-head|ers-othe|
|00004db0| 72 2d 66 72 61 6d 65 20 | 76 6d 2d 72 65 73 65 6e |r-frame |vm-resen|
|00004dc0| 64 2d 6d 65 73 73 61 67 | 65 20 76 6d 2d 72 65 73 |d-messag|e vm-res|
|00004dd0| 65 6e 64 2d 6d 65 73 73 | 61 67 65 2d 6f 74 68 65 |end-mess|age-othe|
|00004de0| 72 2d 66 72 61 6d 65 20 | 76 6d 2d 72 65 73 65 6e |r-frame |vm-resen|
|00004df0| 64 2d 62 6f 75 6e 63 65 | 64 2d 6d 65 73 73 61 67 |d-bounce|d-messag|
|00004e00| 65 20 76 6d 2d 72 65 73 | 65 6e 64 2d 62 6f 75 6e |e vm-res|end-boun|
|00004e10| 63 65 64 2d 6d 65 73 73 | 61 67 65 2d 6f 74 68 65 |ced-mess|age-othe|
|00004e20| 72 2d 66 72 61 6d 65 29 | 20 74 68 69 73 2d 63 6f |r-frame)| this-co|
|00004e30| 6d 6d 61 6e 64 20 63 6f | 6d 70 6f 73 69 6e 67 2d |mmand co|mposing-|
|00004e40| 6d 65 73 73 61 67 65 20 | 6d 61 69 6c 2d 70 6f 73 |message |mail-pos|
|00004e50| 69 74 69 6f 6e 2d 6f 6e | 2d 66 69 65 6c 64 20 22 |ition-on|-field "|
|00004e60| 54 6f 22 20 72 75 6e 2d | 68 6f 6f 6b 73 20 6d 61 |To" run-|hooks ma|
|00004e70| 69 6c 2d 73 65 74 75 70 | 2d 68 6f 6f 6b 5d 20 36 |il-setup|-hook] 6|
|00004e80| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|00004e90| 2d 72 65 70 6c 79 2d 6f | 74 68 65 72 2d 66 72 61 |-reply-o|ther-fra|
|00004ea0| 6d 65 20 23 5b 28 63 6f | 75 6e 74 29 20 22 c0 20 |me #[(co|unt) ". |
|00004eb0| 88 c1 5c 6e 21 87 22 20 | 5b 76 6d 2d 67 6f 74 6f |..\n!." |[vm-goto|
|00004ec0| 2d 6e 65 77 2d 66 72 61 | 6d 65 20 76 6d 2d 72 65 |-new-fra|me vm-re|
|00004ed0| 70 6c 79 20 63 6f 75 6e | 74 5d 20 32 20 22 5c 0a |ply coun|t] 2 "\.|
|00004ee0| 4c 69 6b 65 20 76 6d 2d | 72 65 70 6c 79 2c 20 62 |Like vm-|reply, b|
|00004ef0| 75 74 20 72 75 6e 20 69 | 6e 20 61 20 6e 65 77 6c |ut run i|n a newl|
|00004f00| 79 20 63 72 65 61 74 65 | 64 20 66 72 61 6d 65 2e |y create|d frame.|
|00004f10| 22 20 22 70 22 5d 29 0a | 28 64 65 66 61 6c 69 61 |" "p"]).|(defalia|
|00004f20| 73 20 27 76 6d 2d 72 65 | 70 6c 79 2d 69 6e 63 6c |s 'vm-re|ply-incl|
|00004f30| 75 64 65 2d 74 65 78 74 | 2d 6f 74 68 65 72 2d 66 |ude-text|-other-f|
|00004f40| 72 61 6d 65 20 23 5b 28 | 63 6f 75 6e 74 29 20 22 |rame #[(|count) "|
|00004f50| c0 20 88 c1 5c 6e 21 87 | 22 20 5b 76 6d 2d 67 6f |. ..\n!.|" [vm-go|
|00004f60| 74 6f 2d 6e 65 77 2d 66 | 72 61 6d 65 20 76 6d 2d |to-new-f|rame vm-|
|00004f70| 72 65 70 6c 79 2d 69 6e | 63 6c 75 64 65 2d 74 65 |reply-in|clude-te|
|00004f80| 78 74 20 63 6f 75 6e 74 | 5d 20 32 20 22 5c 0a 4c |xt count|] 2 "\.L|
|00004f90| 69 6b 65 20 76 6d 2d 72 | 65 70 6c 79 2d 69 6e 63 |ike vm-r|eply-inc|
|00004fa0| 6c 75 64 65 2d 74 65 78 | 74 2c 20 62 75 74 20 72 |lude-tex|t, but r|
|00004fb0| 75 6e 20 69 6e 20 61 20 | 6e 65 77 6c 79 20 63 72 |un in a |newly cr|
|00004fc0| 65 61 74 65 64 20 66 72 | 61 6d 65 2e 22 20 22 70 |eated fr|ame." "p|
|00004fd0| 22 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |"]).(def|alias 'v|
|00004fe0| 6d 2d 66 6f 6c 6c 6f 77 | 75 70 2d 6f 74 68 65 72 |m-follow|up-other|
|00004ff0| 2d 66 72 61 6d 65 20 23 | 5b 28 63 6f 75 6e 74 29 |-frame #|[(count)|
|00005000| 20 22 c0 20 88 c1 5c 6e | 21 87 22 20 5b 76 6d 2d | ". ..\n|!." [vm-|
|00005010| 67 6f 74 6f 2d 6e 65 77 | 2d 66 72 61 6d 65 20 76 |goto-new|-frame v|
|00005020| 6d 2d 66 6f 6c 6c 6f 77 | 75 70 20 63 6f 75 6e 74 |m-follow|up count|
|00005030| 5d 20 32 20 22 5c 0a 4c | 69 6b 65 20 76 6d 2d 66 |] 2 "\.L|ike vm-f|
|00005040| 6f 6c 6c 6f 77 75 70 2c | 20 62 75 74 20 72 75 6e |ollowup,| but run|
|00005050| 20 69 6e 20 61 20 6e 65 | 77 6c 79 20 63 72 65 61 | in a ne|wly crea|
|00005060| 74 65 64 20 66 72 61 6d | 65 2e 22 20 22 70 22 5d |ted fram|e." "p"]|
|00005070| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 76 6d 2d |).(defal|ias 'vm-|
|00005080| 66 6f 6c 6c 6f 77 75 70 | 2d 69 6e 63 6c 75 64 65 |followup|-include|
|00005090| 2d 74 65 78 74 2d 6f 74 | 68 65 72 2d 66 72 61 6d |-text-ot|her-fram|
|000050a0| 65 20 23 5b 28 63 6f 75 | 6e 74 29 20 22 c0 20 88 |e #[(cou|nt) ". .|
|000050b0| c1 5c 6e 21 87 22 20 5b | 76 6d 2d 67 6f 74 6f 2d |.\n!." [|vm-goto-|
|000050c0| 6e 65 77 2d 66 72 61 6d | 65 20 76 6d 2d 66 6f 6c |new-fram|e vm-fol|
|000050d0| 6c 6f 77 75 70 2d 69 6e | 63 6c 75 64 65 2d 74 65 |lowup-in|clude-te|
|000050e0| 78 74 20 63 6f 75 6e 74 | 5d 20 32 20 22 5c 0a 4c |xt count|] 2 "\.L|
|000050f0| 69 6b 65 20 76 6d 2d 66 | 6f 6c 6c 6f 77 75 70 2d |ike vm-f|ollowup-|
|00005100| 69 6e 63 6c 75 64 65 2d | 74 65 78 74 2c 20 62 75 |include-|text, bu|
|00005110| 74 20 72 75 6e 20 69 6e | 20 61 20 6e 65 77 6c 79 |t run in| a newly|
|00005120| 20 63 72 65 61 74 65 64 | 20 66 72 61 6d 65 2e 22 | created| frame."|
|00005130| 20 22 70 22 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 | "p"]).(|defalias|
|00005140| 20 27 76 6d 2d 66 6f 72 | 77 61 72 64 2d 6d 65 73 | 'vm-for|ward-mes|
|00005150| 73 61 67 65 2d 61 6c 6c | 2d 68 65 61 64 65 72 73 |sage-all|-headers|
|00005160| 2d 6f 74 68 65 72 2d 66 | 72 61 6d 65 20 23 5b 6e |-other-f|rame #[n|
|00005170| 69 6c 20 22 c0 20 88 c1 | 20 87 22 20 5b 76 6d 2d |il ". ..| ." [vm-|
|00005180| 67 6f 74 6f 2d 6e 65 77 | 2d 66 72 61 6d 65 20 76 |goto-new|-frame v|
|00005190| 6d 2d 66 6f 72 77 61 72 | 64 2d 6d 65 73 73 61 67 |m-forwar|d-messag|
|000051a0| 65 2d 61 6c 6c 2d 68 65 | 61 64 65 72 73 5d 20 31 |e-all-he|aders] 1|
|000051b0| 20 22 5c 0a 4c 69 6b 65 | 20 76 6d 2d 66 6f 72 77 | "\.Like| vm-forw|
|000051c0| 61 72 64 2d 6d 65 73 73 | 61 67 65 2d 61 6c 6c 2d |ard-mess|age-all-|
|000051d0| 68 65 61 64 65 72 73 2c | 20 62 75 74 20 72 75 6e |headers,| but run|
|000051e0| 20 69 6e 20 61 20 6e 65 | 77 6c 79 20 63 72 65 61 | in a ne|wly crea|
|000051f0| 74 65 64 20 66 72 61 6d | 65 2e 22 20 6e 69 6c 5d |ted fram|e." nil]|
|00005200| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 76 6d 2d |).(defal|ias 'vm-|
|00005210| 66 6f 72 77 61 72 64 2d | 6d 65 73 73 61 67 65 2d |forward-|message-|
|00005220| 6f 74 68 65 72 2d 66 72 | 61 6d 65 20 23 5b 6e 69 |other-fr|ame #[ni|
|00005230| 6c 20 22 c0 20 88 c1 20 | 87 22 20 5b 76 6d 2d 67 |l ". .. |." [vm-g|
|00005240| 6f 74 6f 2d 6e 65 77 2d | 66 72 61 6d 65 20 76 6d |oto-new-|frame vm|
|00005250| 2d 66 6f 72 77 61 72 64 | 2d 6d 65 73 73 61 67 65 |-forward|-message|
|00005260| 5d 20 31 20 22 5c 0a 4c | 69 6b 65 20 76 6d 2d 66 |] 1 "\.L|ike vm-f|
|00005270| 6f 72 77 61 72 64 2d 6d | 65 73 73 61 67 65 2c 20 |orward-m|essage, |
|00005280| 62 75 74 20 72 75 6e 20 | 69 6e 20 61 20 6e 65 77 |but run |in a new|
|00005290| 6c 79 20 63 72 65 61 74 | 65 64 20 66 72 61 6d 65 |ly creat|ed frame|
|000052a0| 2e 22 20 6e 69 6c 5d 29 | 0a 28 64 65 66 61 6c 69 |." nil])|.(defali|
|000052b0| 61 73 20 27 76 6d 2d 72 | 65 73 65 6e 64 2d 6d 65 |as 'vm-r|esend-me|
|000052c0| 73 73 61 67 65 2d 6f 74 | 68 65 72 2d 66 72 61 6d |ssage-ot|her-fram|
|000052d0| 65 20 23 5b 6e 69 6c 20 | 22 c0 20 88 c1 20 87 22 |e #[nil |". .. ."|
|000052e0| 20 5b 76 6d 2d 67 6f 74 | 6f 2d 6e 65 77 2d 66 72 | [vm-got|o-new-fr|
|000052f0| 61 6d 65 20 76 6d 2d 72 | 65 73 65 6e 64 2d 6d 65 |ame vm-r|esend-me|
|00005300| 73 73 61 67 65 5d 20 31 | 20 22 5c 0a 4c 69 6b 65 |ssage] 1| "\.Like|
|00005310| 20 76 6d 2d 72 65 73 65 | 6e 64 2d 6d 65 73 73 61 | vm-rese|nd-messa|
|00005320| 67 65 2c 20 62 75 74 20 | 72 75 6e 20 69 6e 20 61 |ge, but |run in a|
|00005330| 20 6e 65 77 6c 79 20 63 | 72 65 61 74 65 64 20 66 | newly c|reated f|
|00005340| 72 61 6d 65 2e 22 20 6e | 69 6c 5d 29 0a 28 64 65 |rame." n|il]).(de|
|00005350| 66 61 6c 69 61 73 20 27 | 76 6d 2d 72 65 73 65 6e |falias '|vm-resen|
|00005360| 64 2d 62 6f 75 6e 63 65 | 64 2d 6d 65 73 73 61 67 |d-bounce|d-messag|
|00005370| 65 2d 6f 74 68 65 72 2d | 66 72 61 6d 65 20 23 5b |e-other-|frame #[|
|00005380| 6e 69 6c 20 22 c0 20 88 | c1 20 87 22 20 5b 76 6d |nil ". .|. ." [vm|
|00005390| 2d 67 6f 74 6f 2d 6e 65 | 77 2d 66 72 61 6d 65 20 |-goto-ne|w-frame |
|000053a0| 76 6d 2d 72 65 73 65 6e | 64 2d 62 6f 75 6e 63 65 |vm-resen|d-bounce|
|000053b0| 64 2d 6d 65 73 73 61 67 | 65 5d 20 31 20 22 5c 0a |d-messag|e] 1 "\.|
|000053c0| 4c 69 6b 65 20 76 6d 2d | 72 65 73 65 6e 64 2d 62 |Like vm-|resend-b|
|000053d0| 6f 75 6e 63 65 64 2d 6d | 65 73 73 61 67 65 2c 20 |ounced-m|essage, |
|000053e0| 62 75 74 20 72 75 6e 20 | 69 6e 20 61 20 6e 65 77 |but run |in a new|
|000053f0| 6c 79 20 63 72 65 61 74 | 65 64 20 66 72 61 6d 65 |ly creat|ed frame|
|00005400| 2e 22 20 6e 69 6c 5d 29 | 0a 28 64 65 66 61 6c 69 |." nil])|.(defali|
|00005410| 61 73 20 27 76 6d 2d 73 | 65 6e 64 2d 64 69 67 65 |as 'vm-s|end-dige|
|00005420| 73 74 2d 6f 74 68 65 72 | 2d 66 72 61 6d 65 20 23 |st-other|-frame #|
|00005430| 5b 28 26 6f 70 74 69 6f | 6e 61 6c 20 70 72 65 66 |[(&optio|nal pref|
|00005440| 69 78 29 20 22 c0 20 88 | c1 5c 6e 21 87 22 20 5b |ix) ". .|.\n!." [|
|00005450| 76 6d 2d 67 6f 74 6f 2d | 6e 65 77 2d 66 72 61 6d |vm-goto-|new-fram|
|00005460| 65 20 76 6d 2d 73 65 6e | 64 2d 64 69 67 65 73 74 |e vm-sen|d-digest|
|00005470| 20 70 72 65 66 69 78 5d | 20 32 20 22 5c 0a 4c 69 | prefix]| 2 "\.Li|
|00005480| 6b 65 20 76 6d 2d 73 65 | 6e 64 2d 64 69 67 65 73 |ke vm-se|nd-diges|
|00005490| 74 2c 20 62 75 74 20 72 | 75 6e 20 69 6e 20 61 20 |t, but r|un in a |
|000054a0| 6e 65 77 6c 79 20 63 72 | 65 61 74 65 64 20 66 72 |newly cr|eated fr|
|000054b0| 61 6d 65 2e 22 20 22 50 | 22 5d 29 0a 28 64 65 66 |ame." "P|"]).(def|
|000054c0| 61 6c 69 61 73 20 27 76 | 6d 2d 73 65 6e 64 2d 72 |alias 'v|m-send-r|
|000054d0| 66 63 39 33 34 2d 64 69 | 67 65 73 74 2d 6f 74 68 |fc934-di|gest-oth|
|000054e0| 65 72 2d 66 72 61 6d 65 | 20 23 5b 28 26 6f 70 74 |er-frame| #[(&opt|
|000054f0| 69 6f 6e 61 6c 20 70 72 | 65 66 69 78 29 20 22 c0 |ional pr|efix) ".|
|00005500| 20 88 c1 5c 6e 21 87 22 | 20 5b 76 6d 2d 67 6f 74 | ..\n!."| [vm-got|
|00005510| 6f 2d 6e 65 77 2d 66 72 | 61 6d 65 20 76 6d 2d 73 |o-new-fr|ame vm-s|
|00005520| 65 6e 64 2d 72 66 63 39 | 33 34 2d 64 69 67 65 73 |end-rfc9|34-diges|
|00005530| 74 20 70 72 65 66 69 78 | 5d 20 32 20 22 5c 0a 4c |t prefix|] 2 "\.L|
|00005540| 69 6b 65 20 76 6d 2d 73 | 65 6e 64 2d 72 66 63 39 |ike vm-s|end-rfc9|
|00005550| 33 34 2d 64 69 67 65 73 | 74 2c 20 62 75 74 20 72 |34-diges|t, but r|
|00005560| 75 6e 20 69 6e 20 61 20 | 6e 65 77 6c 79 20 63 72 |un in a |newly cr|
|00005570| 65 61 74 65 64 20 66 72 | 61 6d 65 2e 22 20 22 50 |eated fr|ame." "P|
|00005580| 22 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |"]).(def|alias 'v|
|00005590| 6d 2d 73 65 6e 64 2d 72 | 66 63 31 31 35 33 2d 64 |m-send-r|fc1153-d|
|000055a0| 69 67 65 73 74 2d 6f 74 | 68 65 72 2d 66 72 61 6d |igest-ot|her-fram|
|000055b0| 65 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 70 |e #[(&op|tional p|
|000055c0| 72 65 66 69 78 29 20 22 | c0 20 88 c1 5c 6e 21 87 |refix) "|. ..\n!.|
|000055d0| 22 20 5b 76 6d 2d 67 6f | 74 6f 2d 6e 65 77 2d 66 |" [vm-go|to-new-f|
|000055e0| 72 61 6d 65 20 76 6d 2d | 73 65 6e 64 2d 72 66 63 |rame vm-|send-rfc|
|000055f0| 31 31 35 33 2d 64 69 67 | 65 73 74 20 70 72 65 66 |1153-dig|est pref|
|00005600| 69 78 5d 20 32 20 22 5c | 0a 4c 69 6b 65 20 76 6d |ix] 2 "\|.Like vm|
|00005610| 2d 73 65 6e 64 2d 72 66 | 63 31 31 35 33 2d 64 69 |-send-rf|c1153-di|
|00005620| 67 65 73 74 2c 20 62 75 | 74 20 72 75 6e 20 69 6e |gest, bu|t run in|
|00005630| 20 61 20 6e 65 77 6c 79 | 20 63 72 65 61 74 65 64 | a newly| created|
|00005640| 20 66 72 61 6d 65 2e 22 | 20 22 50 22 5d 29 0a    | frame."| "P"]). |
+--------+-------------------------+-------------------------+--------+--------+