home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1993-04-01 | 21.5 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 55%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
| 44%
| TrID
| Summation Document Image Information Load File
| default (weak)
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|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 6a 77 7a 40 74 68 61 |piled by| jwz@tha|
|00000020| 6c 69 64 6f 6d 69 64 65 | 20 6f 6e 20 4d 6f 6e 20 |lidomide| on Mon |
|00000030| 46 65 62 20 20 31 20 31 | 39 3a 31 34 3a 35 36 20 |Feb 1 1|9:14:56 |
|00000040| 31 39 39 33 0a 3b 3b 3b | 20 66 72 6f 6d 20 66 69 |1993.;;;| from fi|
|00000050| 6c 65 20 2f 63 61 64 69 | 6c 6c 61 63 31 2f 63 6f |le /cadi|llac1/co|
|00000060| 64 65 2f 62 75 69 6c 64 | 2f 6c 65 6d 61 63 73 2f |de/build|/lemacs/|
|00000070| 6c 69 73 70 2f 70 61 63 | 6b 61 67 65 73 2f 72 6e |lisp/pac|kages/rn|
|00000080| 65 77 73 2e 65 6c 0a 3b | 3b 3b 20 65 6d 61 63 73 |ews.el.;|;; emacs|
|00000090| 20 76 65 72 73 69 6f 6e | 20 31 39 2e 34 2e 31 33 | version| 19.4.13|
|000000a0| 20 4c 75 63 69 64 2e 0a | 3b 3b 3b 20 62 79 74 65 | Lucid..|;;; byte|
|000000b0| 63 6f 6d 70 20 76 65 72 | 73 69 6f 6e 20 32 2e 31 |comp ver|sion 2.1|
|000000c0| 30 3b 20 20 31 2d 66 65 | 62 2d 39 33 2e 0a 3b 3b |0; 1-fe|b-93..;;|
|000000d0| 3b 20 6f 70 74 69 6d 69 | 7a 61 74 69 6f 6e 20 69 |; optimi|zation i|
|000000e0| 73 20 6f 6e 2e 0a 3b 3b | 3b 20 74 68 69 73 20 66 |s on..;;|; this f|
|000000f0| 69 6c 65 20 75 73 65 73 | 20 6f 70 63 6f 64 65 73 |ile uses| opcodes|
|00000100| 20 77 68 69 63 68 20 64 | 6f 20 6e 6f 74 20 65 78 | which d|o not ex|
|00000110| 69 73 74 20 69 6e 20 45 | 6d 61 63 73 31 38 2e 0a |ist in E|macs18..|
|00000120| 0a 28 69 66 20 28 61 6e | 64 20 28 62 6f 75 6e 64 |.(if (an|d (bound|
|00000130| 70 20 27 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |p 'emacs|-version|
|00000140| 29 0a 09 20 28 6f 72 20 | 28 61 6e 64 20 28 62 6f |).. (or |(and (bo|
|00000150| 75 6e 64 70 20 27 65 70 | 6f 63 68 3a 3a 76 65 72 |undp 'ep|och::ver|
|00000160| 73 69 6f 6e 29 20 65 70 | 6f 63 68 3a 3a 76 65 72 |sion) ep|och::ver|
|00000170| 73 69 6f 6e 29 0a 09 20 | 20 20 20 20 28 73 74 72 |sion).. | (str|
|00000180| 69 6e 67 2d 6c 65 73 73 | 70 20 65 6d 61 63 73 2d |ing-less|p emacs-|
|00000190| 76 65 72 73 69 6f 6e 20 | 22 31 39 22 29 29 29 0a |version |"19"))).|
|000001a0| 20 20 20 20 28 65 72 72 | 6f 72 20 22 54 68 69 73 | (err|or "This|
|000001b0| 20 66 69 6c 65 20 77 61 | 73 20 63 6f 6d 70 69 6c | file wa|s compil|
|000001c0| 65 64 20 66 6f 72 20 45 | 6d 61 63 73 31 39 2e 22 |ed for E|macs19."|
|000001d0| 29 29 0a 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |))..(byt|e-code "|
|000001e0| c0 c1 21 88 c2 c3 21 87 | 22 20 5b 70 72 6f 76 69 |..!...!.|" [provi|
|000001f0| 64 65 20 72 6e 65 77 73 | 20 72 65 71 75 69 72 65 |de rnews| require|
|00000200| 20 6d 61 69 6c 2d 75 74 | 69 6c 73 5d 20 32 29 0a | mail-ut|ils] 2).|
|00000210| 28 61 75 74 6f 6c 6f 61 | 64 20 27 72 6d 61 69 6c |(autoloa|d 'rmail|
|00000220| 2d 6f 75 74 70 75 74 20 | 22 72 6d 61 69 6c 6f 75 |-output |"rmailou|
|00000230| 74 22 20 22 5c 0a 41 70 | 70 65 6e 64 20 74 68 69 |t" "\.Ap|pend thi|
|00000240| 73 20 6d 65 73 73 61 67 | 65 20 74 6f 20 55 6e 69 |s messag|e to Uni|
|00000250| 78 20 6d 61 69 6c 20 66 | 69 6c 65 20 6e 61 6d 65 |x mail f|ile name|
|00000260| 64 20 46 49 4c 45 2d 4e | 41 4d 45 2e 22 20 74 29 |d FILE-N|AME." t)|
|00000270| 0a 28 61 75 74 6f 6c 6f | 61 64 20 27 6e 65 77 73 |.(autolo|ad 'news|
|00000280| 2d 72 65 70 6c 79 20 22 | 72 6e 65 77 73 70 6f 73 |-reply "|rnewspos|
|00000290| 74 22 20 22 5c 0a 43 6f | 6d 70 6f 73 65 20 61 6e |t" "\.Co|mpose an|
|000002a0| 64 20 70 6f 73 74 20 61 | 20 72 65 70 6c 79 20 74 |d post a| reply t|
|000002b0| 6f 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 61 72 |o the cu|rrent ar|
|000002c0| 74 69 63 6c 65 20 6f 6e | 20 55 53 45 4e 45 54 2e |ticle on| USENET.|
|000002d0| 0a 57 68 69 6c 65 20 63 | 6f 6d 70 6f 73 69 6e 67 |.While c|omposing|
|000002e0| 20 74 68 65 20 72 65 70 | 6c 79 2c 20 75 73 65 20 | the rep|ly, use |
|000002f0| 5c 5c 5b 6d 61 69 6c 2d | 79 61 6e 6b 2d 6f 72 69 |\\[mail-|yank-ori|
|00000300| 67 69 6e 61 6c 5d 20 74 | 6f 20 79 61 6e 6b 20 74 |ginal] t|o yank t|
|00000310| 68 65 20 6f 72 69 67 69 | 6e 61 6c 0a 6d 65 73 73 |he origi|nal.mess|
|00000320| 61 67 65 20 69 6e 74 6f | 20 69 74 2e 22 20 74 29 |age into| it." t)|
|00000330| 0a 28 61 75 74 6f 6c 6f | 61 64 20 27 6e 65 77 73 |.(autolo|ad 'news|
|00000340| 2d 6d 61 69 6c 2d 6f 74 | 68 65 72 2d 77 69 6e 64 |-mail-ot|her-wind|
|00000350| 6f 77 20 22 72 6e 65 77 | 73 70 6f 73 74 22 20 22 |ow "rnew|spost" "|
|00000360| 5c 0a 53 65 6e 64 20 6d | 61 69 6c 20 69 6e 20 61 |\.Send m|ail in a|
|00000370| 6e 6f 74 68 65 72 20 77 | 69 6e 64 6f 77 2e 0a 57 |nother w|indow..W|
|00000380| 68 69 6c 65 20 63 6f 6d | 70 6f 73 69 6e 67 20 74 |hile com|posing t|
|00000390| 68 65 20 6d 65 73 73 61 | 67 65 2c 20 75 73 65 20 |he messa|ge, use |
|000003a0| 5c 5c 5b 6d 61 69 6c 2d | 79 61 6e 6b 2d 6f 72 69 |\\[mail-|yank-ori|
|000003b0| 67 69 6e 61 6c 5d 20 74 | 6f 20 79 61 6e 6b 20 74 |ginal] t|o yank t|
|000003c0| 68 65 0a 6f 72 69 67 69 | 6e 61 6c 20 6d 65 73 73 |he.origi|nal mess|
|000003d0| 61 67 65 20 69 6e 74 6f | 20 69 74 2e 22 20 74 29 |age into| it." t)|
|000003e0| 0a 28 61 75 74 6f 6c 6f | 61 64 20 27 6e 65 77 73 |.(autolo|ad 'news|
|000003f0| 2d 70 6f 73 74 2d 6e 65 | 77 73 20 22 72 6e 65 77 |-post-ne|ws "rnew|
|00000400| 73 70 6f 73 74 22 20 22 | 5c 0a 42 65 67 69 6e 20 |spost" "|\.Begin |
|00000410| 65 64 69 74 69 6e 67 20 | 61 20 6e 65 77 20 55 53 |editing |a new US|
|00000420| 45 4e 45 54 20 6e 65 77 | 73 20 61 72 74 69 63 6c |ENET new|s articl|
|00000430| 65 20 74 6f 20 62 65 20 | 70 6f 73 74 65 64 2e 22 |e to be |posted."|
|00000440| 20 74 29 0a 28 61 75 74 | 6f 6c 6f 61 64 20 27 6e | t).(aut|oload 'n|
|00000450| 65 77 73 2d 6d 61 69 6c | 2d 72 65 70 6c 79 20 22 |ews-mail|-reply "|
|00000460| 72 6e 65 77 73 70 6f 73 | 74 22 20 22 5c 0a 4d 61 |rnewspos|t" "\.Ma|
|00000470| 69 6c 20 61 20 72 65 70 | 6c 79 20 74 6f 20 74 68 |il a rep|ly to th|
|00000480| 65 20 61 75 74 68 6f 72 | 20 6f 66 20 74 68 65 20 |e author| of the |
|00000490| 63 75 72 72 65 6e 74 20 | 61 72 74 69 63 6c 65 2e |current |article.|
|000004a0| 0a 57 68 69 6c 65 20 63 | 6f 6d 70 6f 73 69 6e 67 |.While c|omposing|
|000004b0| 20 74 68 65 20 72 65 70 | 6c 79 2c 20 75 73 65 20 | the rep|ly, use |
|000004c0| 5c 5c 5b 6d 61 69 6c 2d | 79 61 6e 6b 2d 6f 72 69 |\\[mail-|yank-ori|
|000004d0| 67 69 6e 61 6c 5d 20 74 | 6f 20 79 61 6e 6b 20 74 |ginal] t|o yank t|
|000004e0| 68 65 20 6f 72 69 67 69 | 6e 61 6c 0a 6d 65 73 73 |he origi|nal.mess|
|000004f0| 61 67 65 20 69 6e 74 6f | 20 69 74 2e 22 20 74 29 |age into| it." t)|
|00000500| 0a 28 64 65 66 76 61 72 | 20 6e 65 77 73 2d 67 72 |.(defvar| news-gr|
|00000510| 6f 75 70 2d 68 6f 6f 6b | 2d 61 6c 69 73 74 20 6e |oup-hook|-alist n|
|00000520| 69 6c 20 22 5c 0a 41 6c | 69 73 74 20 6f 66 20 28 |il "\.Al|ist of (|
|00000530| 47 52 4f 55 50 2d 52 45 | 47 45 58 50 20 2e 20 48 |GROUP-RE|GEXP . H|
|00000540| 4f 4f 4b 29 20 70 61 69 | 72 73 2e 0a 4a 75 73 74 |OOK) pai|rs..Just|
|00000550| 20 62 65 66 6f 72 65 20 | 64 69 73 70 6c 61 79 69 | before |displayi|
|00000560| 6e 67 20 61 20 6d 65 73 | 73 61 67 65 2c 20 65 61 |ng a mes|sage, ea|
|00000570| 63 68 20 48 4f 4f 4b 20 | 69 73 20 63 61 6c 6c 65 |ch HOOK |is calle|
|00000580| 64 0a 69 66 20 69 74 73 | 20 47 52 4f 55 50 2d 52 |d.if its| GROUP-R|
|00000590| 45 47 45 58 50 20 6d 61 | 74 63 68 65 73 20 74 68 |EGEXP ma|tches th|
|000005a0| 65 20 63 75 72 72 65 6e | 74 20 6e 65 77 73 67 72 |e curren|t newsgr|
|000005b0| 6f 75 70 20 6e 61 6d 65 | 2e 22 29 0a 28 62 79 74 |oup name|.").(byt|
|000005c0| 65 2d 63 6f 64 65 20 22 | c0 c1 21 ac 84 c2 c3 21 |e-code "|..!....!|
|000005d0| 11 c0 87 22 20 5b 62 6f | 75 6e 64 70 20 72 6d 61 |..." [bo|undp rma|
|000005e0| 69 6c 2d 6c 61 73 74 2d | 66 69 6c 65 20 65 78 70 |il-last-|file exp|
|000005f0| 61 6e 64 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 22 7e |and-file|-name "~|
|00000600| 2f 6d 62 6f 78 2e 6e 65 | 77 73 22 5d 20 32 29 0a |/mbox.ne|ws"] 2).|
|00000610| 28 64 65 66 76 61 72 20 | 6e 65 77 73 2d 73 74 61 |(defvar |news-sta|
|00000620| 72 74 75 70 2d 66 69 6c | 65 20 22 24 48 4f 4d 45 |rtup-fil|e "$HOME|
|00000630| 2f 2e 6e 65 77 73 72 63 | 22 20 22 5c 0a 43 6f 6e |/.newsrc|" "\.Con|
|00000640| 74 61 69 6e 73 20 7e 2f | 2e 6e 65 77 73 72 63 22 |tains ~/|.newsrc"|
|00000650| 29 0a 28 64 65 66 76 61 | 72 20 6e 65 77 73 2d 63 |).(defva|r news-c|
|00000660| 65 72 74 69 66 69 63 61 | 74 69 6f 6e 2d 66 69 6c |ertifica|tion-fil|
|00000670| 65 20 22 24 48 4f 4d 45 | 2f 2e 6e 65 77 73 2d 64 |e "$HOME|/.news-d|
|00000680| 61 74 65 73 22 20 22 5c | 0a 43 6f 6e 74 61 69 6e |ates" "\|.Contain|
|00000690| 73 20 7e 2f 2e 6e 65 77 | 73 2d 64 61 74 65 73 22 |s ~/.new|s-dates"|
|000006a0| 29 0a 28 64 65 66 76 61 | 72 20 6e 65 77 73 2d 69 |).(defva|r news-i|
|000006b0| 67 6e 6f 72 65 64 2d 68 | 65 61 64 65 72 73 20 22 |gnored-h|eaders "|
|000006c0| 5e 50 61 74 68 3a 5c 5c | 7c 5e 50 6f 73 74 69 6e |^Path:\\||^Postin|
|000006d0| 67 2d 56 65 72 73 69 6f | 6e 3a 5c 5c 7c 5e 41 72 |g-Versio|n:\\|^Ar|
|000006e0| 74 69 63 6c 65 2d 49 2e | 44 2e 3a 5c 5c 7c 5e 45 |ticle-I.|D.:\\|^E|
|000006f0| 78 70 69 72 65 73 3a 5c | 5c 7c 5e 44 61 74 65 2d |xpires:\|\|^Date-|
|00000700| 52 65 63 65 69 76 65 64 | 3a 5c 5c 7c 5e 52 65 66 |Received|:\\|^Ref|
|00000710| 65 72 65 6e 63 65 73 3a | 5c 5c 7c 5e 43 6f 6e 74 |erences:|\\|^Cont|
|00000720| 72 6f 6c 3a 5c 5c 7c 5e | 58 72 65 66 3a 5c 5c 7c |rol:\\|^|Xref:\\||
|00000730| 5e 4c 69 6e 65 73 3a 5c | 5c 7c 5e 50 6f 73 74 65 |^Lines:\|\|^Poste|
|00000740| 64 3a 5c 5c 7c 5e 52 65 | 6c 61 79 2d 56 65 72 73 |d:\\|^Re|lay-Vers|
|00000750| 69 6f 6e 3a 5c 5c 7c 5e | 4d 65 73 73 61 67 65 2d |ion:\\|^|Message-|
|00000760| 49 44 3a 5c 5c 7c 5e 4e | 66 2d 49 44 3a 5c 5c 7c |ID:\\|^N|f-ID:\\||
|00000770| 5e 4e 66 2d 46 72 6f 6d | 3a 5c 5c 7c 5e 41 70 70 |^Nf-From|:\\|^App|
|00000780| 72 6f 76 65 64 3a 5c 5c | 7c 5e 53 65 6e 64 65 72 |roved:\\||^Sender|
|00000790| 3a 22 20 22 5c 0a 41 6c | 6c 20 72 61 6e 64 6f 6d |:" "\.Al|l random|
|000007a0| 20 66 69 65 6c 64 73 20 | 77 69 74 68 69 6e 20 74 | fields |within t|
|000007b0| 68 65 20 68 65 61 64 65 | 72 20 6f 66 20 61 20 6d |he heade|r of a m|
|000007c0| 65 73 73 61 67 65 2e 22 | 29 0a 28 62 79 74 65 2d |essage."|).(byte-|
|000007d0| 63 6f 64 65 20 22 c0 c1 | 21 ac 82 c2 11 c0 c3 21 |code "..|!......!|
|000007e0| ac 82 c4 13 c0 c5 21 ac | 82 c2 15 c0 c6 21 ac 83 |......!.|.....!..|
|000007f0| c2 16 06 c0 c7 21 ac 83 | c2 16 07 c0 c8 21 ac 83 |.....!..|.....!..|
|00000800| c2 16 08 c2 87 22 20 5b | 62 6f 75 6e 64 70 20 6e |....." [|boundp n|
|00000810| 65 77 73 2d 6d 6f 64 65 | 2d 6d 61 70 20 6e 69 6c |ews-mode|-map nil|
|00000820| 20 6e 65 77 73 2d 72 65 | 61 64 2d 66 69 72 73 74 | news-re|ad-first|
|00000830| 2d 74 69 6d 65 2d 70 20 | 74 20 6e 65 77 73 2d 75 |-time-p |t news-u|
|00000840| 73 65 72 2d 67 72 6f 75 | 70 2d 6c 69 73 74 20 6e |ser-grou|p-list n|
|00000850| 65 77 73 2d 63 75 72 72 | 65 6e 74 2d 6e 65 77 73 |ews-curr|ent-news|
|00000860| 2d 67 72 6f 75 70 20 6e | 65 77 73 2d 63 75 72 72 |-group n|ews-curr|
|00000870| 65 6e 74 2d 67 72 6f 75 | 70 2d 62 65 67 69 6e 20 |ent-grou|p-begin |
|00000880| 6e 65 77 73 2d 63 75 72 | 72 65 6e 74 2d 67 72 6f |news-cur|rent-gro|
|00000890| 75 70 2d 65 6e 64 5d 20 | 32 29 0a 28 64 65 66 76 |up-end] |2).(defv|
|000008a0| 61 72 20 6e 65 77 73 2d | 63 75 72 72 65 6e 74 2d |ar news-|current-|
|000008b0| 63 65 72 74 69 66 69 63 | 61 74 69 6f 6e 73 20 6e |certific|ations n|
|000008c0| 69 6c 20 22 5c 0a 41 6e | 20 61 73 73 6f 63 20 6c |il "\.An| assoc l|
|000008d0| 69 73 74 20 6f 66 20 61 | 20 67 72 6f 75 70 20 6e |ist of a| group n|
|000008e0| 61 6d 65 20 61 6e 64 20 | 74 68 65 20 74 69 6d 65 |ame and |the time|
|000008f0| 20 61 74 20 77 68 69 63 | 68 20 69 74 20 69 73 0a | at whic|h it is.|
|00000900| 6b 6e 6f 77 6e 20 74 68 | 61 74 20 74 68 65 20 67 |known th|at the g|
|00000910| 72 6f 75 70 20 68 61 64 | 20 6e 6f 20 6e 65 77 20 |roup had| no new |
|00000920| 74 72 61 66 66 69 63 22 | 29 0a 28 64 65 66 76 61 |traffic"|).(defva|
|00000930| 72 20 6e 65 77 73 2d 63 | 75 72 72 65 6e 74 2d 63 |r news-c|urrent-c|
|00000940| 65 72 74 69 66 69 61 62 | 6c 65 20 6e 69 6c 20 22 |ertifiab|le nil "|
|00000950| 5c 0a 54 68 65 20 74 69 | 6d 65 20 77 68 65 6e 20 |\.The ti|me when |
|00000960| 74 68 65 20 64 69 72 65 | 63 74 6f 72 79 20 77 65 |the dire|ctory we|
|00000970| 20 61 72 65 20 6e 6f 77 | 20 77 6f 72 6b 69 6e 67 | are now| working|
|00000980| 20 6f 6e 20 77 61 73 20 | 77 72 69 74 74 65 6e 22 | on was |written"|
|00000990| 29 0a 28 64 65 66 76 61 | 72 20 6e 65 77 73 2d 6d |).(defva|r news-m|
|000009a0| 65 73 73 61 67 65 2d 66 | 69 6c 74 65 72 20 6e 69 |essage-f|ilter ni|
|000009b0| 6c 20 22 5c 0a 55 73 65 | 72 20 73 70 65 63 69 66 |l "\.Use|r specif|
|000009c0| 69 61 62 6c 65 20 66 69 | 6c 74 65 72 20 66 75 6e |iable fi|lter fun|
|000009d0| 63 74 69 6f 6e 20 74 68 | 61 74 20 77 69 6c 6c 20 |ction th|at will |
|000009e0| 62 65 20 63 61 6c 6c 65 | 64 20 64 75 72 69 6e 67 |be calle|d during|
|000009f0| 0a 66 6f 72 6d 61 74 74 | 69 6e 67 20 6f 66 20 74 |.formatt|ing of t|
|00000a00| 68 65 20 6e 65 77 73 20 | 66 69 6c 65 22 29 0a 28 |he news |file").(|
|00000a10| 64 65 66 76 61 72 20 6e | 65 77 73 2d 6c 69 73 74 |defvar n|ews-list|
|00000a20| 2d 6f 66 2d 66 69 6c 65 | 73 20 6e 69 6c 20 22 5c |-of-file|s nil "\|
|00000a30| 0a 47 6c 6f 62 61 6c 20 | 76 61 72 69 61 62 6c 65 |.Global |variable|
|00000a40| 20 69 6e 20 77 68 69 63 | 68 20 77 65 20 73 74 6f | in whic|h we sto|
|00000a50| 72 65 20 74 68 65 20 6c | 69 73 74 20 6f 66 20 66 |re the l|ist of f|
|00000a60| 69 6c 65 73 0a 61 73 73 | 6f 63 69 61 74 65 64 20 |iles.ass|ociated |
|00000a70| 77 69 74 68 20 74 68 65 | 20 63 75 72 72 65 6e 74 |with the| current|
|00000a80| 20 6e 65 77 73 67 72 6f | 75 70 22 29 0a 28 64 65 | newsgro|up").(de|
|00000a90| 66 76 61 72 20 6e 65 77 | 73 2d 6c 69 73 74 2d 6f |fvar new|s-list-o|
|00000aa0| 66 2d 66 69 6c 65 73 2d | 70 6f 73 73 69 62 6c 79 |f-files-|possibly|
|00000ab0| 2d 62 6f 67 75 73 20 6e | 69 6c 20 22 5c 0a 76 61 |-bogus n|il "\.va|
|00000ac0| 72 69 61 62 6c 65 20 69 | 6e 64 69 63 61 74 69 6e |riable i|ndicatin|
|00000ad0| 67 20 77 65 20 6f 6e 6c | 79 20 61 72 65 20 67 75 |g we onl|y are gu|
|00000ae0| 65 73 73 69 6e 67 20 61 | 74 20 77 68 69 63 68 20 |essing a|t which |
|00000af0| 66 69 6c 65 73 20 61 72 | 65 20 61 76 61 69 6c 61 |files ar|e availa|
|00000b00| 62 6c 65 2e 0a 4e 6f 74 | 20 63 75 72 72 65 6e 74 |ble..Not| current|
|00000b10| 6c 79 20 75 73 65 64 2e | 22 29 0a 28 62 79 74 65 |ly used.|").(byte|
|00000b20| 2d 63 6f 64 65 20 22 c0 | c1 21 ac 82 c2 11 c2 87 |-code ".|.!......|
|00000b30| 22 20 5b 62 6f 75 6e 64 | 70 20 6e 65 77 73 2d 67 |" [bound|p news-g|
|00000b40| 72 6f 75 70 2d 61 72 74 | 69 63 6c 65 2d 61 73 73 |roup-art|icle-ass|
|00000b50| 6f 63 20 6e 69 6c 5d 20 | 32 29 0a 28 64 65 66 76 |oc nil] |2).(defv|
|00000b60| 61 72 20 6e 65 77 73 2d | 63 75 72 72 65 6e 74 2d |ar news-|current-|
|00000b70| 6d 65 73 73 61 67 65 2d | 6e 75 6d 62 65 72 20 30 |message-|number 0|
|00000b80| 20 22 5c 0a 44 69 73 70 | 6c 61 79 65 64 20 41 72 | "\.Disp|layed Ar|
|00000b90| 74 69 63 6c 65 20 4e 75 | 6d 62 65 72 22 29 0a 28 |ticle Nu|mber").(|
|00000ba0| 64 65 66 76 61 72 20 6e | 65 77 73 2d 74 6f 74 61 |defvar n|ews-tota|
|00000bb0| 6c 2d 63 75 72 72 65 6e | 74 2d 67 72 6f 75 70 20 |l-curren|t-group |
|00000bc0| 30 20 22 5c 0a 54 6f 74 | 61 6c 20 6e 6f 20 6f 66 |0 "\.Tot|al no of|
|00000bd0| 20 6d 65 73 73 61 67 65 | 73 20 69 6e 20 67 72 6f | message|s in gro|
|00000be0| 75 70 22 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |up").(by|te-code |
|00000bf0| 22 c0 c1 21 ac 82 c2 11 | c2 87 22 20 5b 62 6f 75 |"..!....|.." [bou|
|00000c00| 6e 64 70 20 6e 65 77 73 | 2d 75 6e 73 75 62 73 63 |ndp news|-unsubsc|
|00000c10| 72 69 62 65 2d 67 72 6f | 75 70 73 20 6e 69 6c 5d |ribe-gro|ups nil]|
|00000c20| 20 32 29 0a 28 64 65 66 | 76 61 72 20 6e 65 77 73 | 2).(def|var news|
|00000c30| 2d 70 6f 69 6e 74 2d 70 | 64 6c 20 6e 69 6c 20 22 |-point-p|dl nil "|
|00000c40| 5c 0a 4c 69 73 74 20 6f | 66 20 76 69 73 69 74 65 |\.List o|f visite|
|00000c50| 64 20 6e 65 77 73 20 6d | 65 73 73 61 67 65 73 2e |d news m|essages.|
|00000c60| 22 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |").(byte|-code ".|
|00000c70| c1 21 ac 82 c2 11 c0 87 | 22 20 5b 62 6f 75 6e 64 |.!......|" [bound|
|00000c80| 70 20 6e 65 77 73 2d 6e | 6f 2d 6a 75 6d 70 73 2d |p news-n|o-jumps-|
|00000c90| 70 20 74 5d 20 32 29 0a | 28 64 65 66 76 61 72 20 |p t] 2).|(defvar |
|00000ca0| 6e 65 77 73 2d 62 75 66 | 66 65 72 20 6e 69 6c 20 |news-buf|fer nil |
|00000cb0| 22 5c 0a 42 75 66 66 65 | 72 20 69 6e 74 6f 20 77 |"\.Buffe|r into w|
|00000cc0| 68 69 63 68 20 6e 65 77 | 73 20 66 69 6c 65 73 20 |hich new|s files |
|00000cd0| 61 72 65 20 72 65 61 64 | 2e 22 29 0a 28 62 79 74 |are read|.").(byt|
|00000ce0| 65 2d 63 6f 64 65 20 22 | c0 c1 4d 88 c2 c3 4d 88 |e-code "|..M...M.|
|00000cf0| c4 c5 4d 88 c6 c7 4d 88 | c8 c9 4d 88 ca cb 4d 88 |..M...M.|..M...M.|
|00000d00| cc cd 4d 88 ce cf 4d 87 | 22 20 5b 6e 65 77 73 2d |..M...M.|" [news-|
|00000d10| 70 75 73 68 20 28 6d 61 | 63 72 6f 20 2e 20 23 5b |push (ma|cro . #[|
|00000d20| 28 69 74 65 6d 20 72 65 | 66 29 20 22 c0 09 c2 0b |(item re|f) "....|
|00000d30| 09 45 45 87 22 20 5b 73 | 65 74 71 20 72 65 66 20 |.EE." [s|etq ref |
|00000d40| 63 6f 6e 73 20 69 74 65 | 6d 5d 20 35 5d 29 20 6e |cons ite|m] 5]) n|
|00000d50| 65 77 73 2d 63 61 64 72 | 20 28 6d 61 63 72 6f 20 |ews-cadr| (macro |
|00000d60| 2e 20 23 5b 28 78 29 20 | 22 c0 c1 5c 6e 44 44 87 |. #[(x) |"..\nDD.|
|00000d70| 22 20 5b 63 61 72 20 63 | 64 72 20 78 5d 20 33 5d |" [car c|dr x] 3]|
|00000d80| 29 20 6e 65 77 73 2d 63 | 64 61 72 20 28 6d 61 63 |) news-c|dar (mac|
|00000d90| 72 6f 20 2e 20 23 5b 28 | 78 29 20 22 c0 c1 5c 6e |ro . #[(|x) "..\n|
|00000da0| 44 44 87 22 20 5b 63 64 | 72 20 63 61 72 20 78 5d |DD." [cd|r car x]|
|00000db0| 20 33 5d 29 20 6e 65 77 | 73 2d 63 61 64 64 72 20 | 3]) new|s-caddr |
|00000dc0| 28 6d 61 63 72 6f 20 2e | 20 23 5b 28 78 29 20 22 |(macro .| #[(x) "|
|00000dd0| c0 c1 89 5c 6e 44 44 44 | 87 22 20 5b 63 61 72 20 |...\nDDD|." [car |
|00000de0| 63 64 72 20 78 5d 20 34 | 5d 29 20 6e 65 77 73 2d |cdr x] 4|]) news-|
|00000df0| 63 61 64 61 72 20 28 6d | 61 63 72 6f 20 2e 20 23 |cadar (m|acro . #|
|00000e00| 5b 28 78 29 20 22 c0 c1 | c0 5c 6e 44 44 44 87 22 |[(x) "..|.\nDDD."|
|00000e10| 20 5b 63 61 72 20 63 64 | 72 20 78 5d 20 34 5d 29 | [car cd|r x] 4])|
|00000e20| 20 6e 65 77 73 2d 63 61 | 61 64 72 20 28 6d 61 63 | news-ca|adr (mac|
|00000e30| 72 6f 20 2e 20 23 5b 28 | 78 29 20 22 c0 89 c1 5c |ro . #[(|x) "...\|
|00000e40| 6e 44 44 44 87 22 20 5b | 63 61 72 20 63 64 72 20 |nDDD." [|car cdr |
|00000e50| 78 5d 20 34 5d 29 20 6e | 65 77 73 2d 63 64 61 64 |x] 4]) n|ews-cdad|
|00000e60| 72 20 28 6d 61 63 72 6f | 20 2e 20 23 5b 28 78 29 |r (macro| . #[(x)|
|00000e70| 20 22 c0 c1 c0 5c 6e 44 | 44 44 87 22 20 5b 63 64 | "...\nD|DD." [cd|
|00000e80| 72 20 63 61 72 20 78 5d | 20 34 5d 29 20 6e 65 77 |r car x]| 4]) new|
|00000e90| 73 2d 77 69 6e 73 20 28 | 6d 61 63 72 6f 20 2e 20 |s-wins (|macro . |
|00000ea0| 23 5b 28 70 66 78 20 69 | 6e 64 65 78 29 20 22 c0 |#[(pfx i|ndex) ".|
|00000eb0| c1 5c 6e c3 c4 0d 44 46 | 44 87 22 20 5b 66 69 6c |.\n...DF|D." [fil|
|00000ec0| 65 2d 65 78 69 73 74 73 | 2d 70 20 63 6f 6e 63 61 |e-exists|-p conca|
|00000ed0| 74 20 70 66 78 20 22 2f | 22 20 69 6e 74 2d 74 6f |t pfx "/|" int-to|
|00000ee0| 2d 73 74 72 69 6e 67 20 | 69 6e 64 65 78 5d 20 36 |-string |index] 6|
|00000ef0| 5d 29 5d 20 32 29 0a 28 | 64 65 66 76 61 72 20 6e |])] 2).(|defvar n|
|00000f00| 65 77 73 2d 6d 61 78 2d | 70 6c 61 75 73 69 62 6c |ews-max-|plausibl|
|00000f10| 65 2d 67 61 70 20 32 20 | 22 5c 0a 2a 20 49 6e 20 |e-gap 2 |"\.* In |
|00000f20| 61 6e 20 72 6e 65 77 73 | 20 64 69 72 65 63 74 6f |an rnews| directo|
|00000f30| 72 79 2c 20 74 68 65 20 | 6d 61 78 69 6d 75 6d 20 |ry, the |maximum |
|00000f40| 70 6f 73 73 69 62 6c 65 | 20 67 61 70 20 73 69 7a |possible| gap siz|
|00000f50| 65 2e 0a 41 20 67 61 70 | 20 69 73 20 61 20 73 65 |e..A gap| is a se|
|00000f60| 71 75 65 6e 63 65 20 6f | 66 20 6d 69 73 73 69 6e |quence o|f missin|
|00000f70| 67 20 6d 65 73 73 61 67 | 65 73 20 62 65 74 77 65 |g messag|es betwe|
|00000f80| 65 6e 20 74 77 6f 20 6d | 65 73 73 61 67 65 73 20 |en two m|essages |
|00000f90| 74 68 61 74 20 65 78 69 | 73 74 2e 0a 41 6e 20 65 |that exi|st..An e|
|00000fa0| 6d 70 74 79 20 66 69 6c | 65 20 64 6f 65 73 20 6e |mpty fil|e does n|
|00000fb0| 6f 74 20 63 6f 6e 74 72 | 69 62 75 74 65 20 74 6f |ot contr|ibute to|
|00000fc0| 20 61 20 67 61 70 20 2d | 2d 20 69 74 20 65 6e 64 | a gap -|- it end|
|00000fd0| 73 20 6f 6e 65 2e 22 29 | 0a 28 62 79 74 65 2d 63 |s one.")|.(byte-c|
|00000fe0| 6f 64 65 20 22 c0 c1 4d | 88 c2 c3 4d 88 c4 c5 4d |ode "..M|...M...M|
|00000ff0| 87 22 20 5b 6e 65 77 73 | 2d 66 69 6e 64 2d 66 69 |." [news|-find-fi|
|00001000| 72 73 74 2d 61 6e 64 2d | 6c 61 73 74 20 23 5b 28 |rst-and-|last #[(|
|00001010| 70 72 65 66 69 78 20 62 | 61 73 65 29 20 22 c0 09 |prefix b|ase) "..|
|00001020| c2 c3 0c 21 51 21 ad 8b | c5 09 0c c6 23 c5 09 0c |...!Q!..|....#...|
|00001030| c7 23 42 87 22 20 5b 66 | 69 6c 65 2d 65 78 69 73 |.#B." [f|ile-exis|
|00001040| 74 73 2d 70 20 70 72 65 | 66 69 78 20 22 2f 22 20 |ts-p pre|fix "/" |
|00001050| 69 6e 74 2d 74 6f 2d 73 | 74 72 69 6e 67 20 62 61 |int-to-s|tring ba|
|00001060| 73 65 20 6e 65 77 73 2d | 66 69 6e 64 2d 66 69 72 |se news-|find-fir|
|00001070| 73 74 2d 6f 72 2d 6c 61 | 73 74 20 2d 31 20 31 5d |st-or-la|st -1 1]|
|00001080| 20 35 5d 20 6e 65 77 73 | 2d 2f 20 28 6d 61 63 72 | 5] news|-/ (macr|
|00001090| 6f 20 2e 20 23 5b 28 61 | 31 20 61 32 29 20 22 c0 |o . #[(a|1 a2) ".|
|000010a0| 09 5c 6e 45 87 22 20 5b | 2f 20 61 31 20 61 32 5d |.\nE." [|/ a1 a2]|
|000010b0| 20 33 5d 29 20 6e 65 77 | 73 2d 66 69 6e 64 2d 66 | 3]) new|s-find-f|
|000010c0| 69 72 73 74 2d 6f 72 2d | 6c 61 73 74 20 23 5b 28 |irst-or-|last #[(|
|000010d0| 70 66 78 20 62 61 73 65 | 20 64 69 72 6e 29 20 22 |pfx base| dirn) "|
|000010e0| 08 19 c2 0b c4 c5 0e 06 | 08 5c 5c 21 51 21 ab 86 |........|.\\!Q!..|
|000010f0| 08 89 5c 5c 10 aa 6d 08 | c7 a5 89 10 c7 a5 89 1e |..\\..m.|........|
|00001100| 08 c9 55 ac 9e c2 0b c4 | c5 0e 06 08 0e 08 5c 5c |..U.....|......\\|
|00001110| 5c 5c 21 51 21 ab 85 08 | 0e 08 5c 5c 10 0e 08 c7 |\\!Q!...|..\\....|
|00001120| a5 89 16 08 aa 5e 29 0e | 5c 6e 09 5f 89 1e 08 c9 |.....^).|\n._....|
|00001130| 55 ac 99 c2 0b c4 c5 0e | 06 08 0e 08 5c 5c 5c 5c |U.......|....\\\\|
|00001140| 21 51 21 ac 89 0e 08 09 | 5a 89 16 08 aa 63 0e 08 |!Q!.....|Z....c..|
|00001150| c9 55 ab 86 0e 06 08 5c | 5c aa 8b cb 0b 0e 06 08 |.U.....\|\.......|
|00001160| 0e 08 5c 5c 5c 5c 09 23 | 2a 87 22 20 5b 64 69 72 |..\\\\.#|*." [dir|
|00001170| 6e 20 6f 72 69 67 69 6e | 61 6c 2d 64 69 72 20 66 |n origin|al-dir f|
|00001180| 69 6c 65 2d 65 78 69 73 | 74 73 2d 70 20 70 66 78 |ile-exis|ts-p pfx|
|00001190| 20 22 2f 22 20 69 6e 74 | 2d 74 6f 2d 73 74 72 69 | "/" int|-to-stri|
|000011a0| 6e 67 20 62 61 73 65 20 | 32 20 6f 66 66 73 65 74 |ng base |2 offset|
|000011b0| 20 30 20 6e 65 77 73 2d | 6d 61 78 2d 70 6c 61 75 | 0 news-|max-plau|
|000011c0| 73 69 62 6c 65 2d 67 61 | 70 20 6e 65 77 73 2d 66 |sible-ga|p news-f|
|000011d0| 69 6e 64 2d 66 69 72 73 | 74 2d 6f 72 2d 6c 61 73 |ind-firs|t-or-las|
|000011e0| 74 5d 20 38 5d 5d 20 32 | 29 0a 28 66 73 65 74 20 |t] 8]] 2|).(fset |
|000011f0| 27 72 6e 65 77 73 20 23 | 5b 6e 69 6c 20 22 c0 20 |'rnews #|[nil ". |
|00001200| 19 c2 c3 21 88 c4 c5 c6 | 21 89 16 07 21 88 c8 20 |...!....|!...!.. |
|00001210| 88 09 16 09 ca 16 0b cc | 20 88 cd 16 0b ce cd 21 |........| ......!|
|00001220| 88 cf d0 21 88 d1 d2 21 | 88 d3 20 88 d4 20 88 d5 |...!...!|.. .. ..|
|00001230| 20 29 87 22 20 5b 62 75 | 66 66 65 72 2d 6e 61 6d | )." [bu|ffer-nam|
|00001240| 65 20 6c 61 73 74 2d 62 | 75 66 66 65 72 20 6d 61 |e last-b|uffer ma|
|00001250| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|00001260| 65 20 72 6d 61 69 6c 2d | 6c 61 73 74 2d 66 69 6c |e rmail-|last-fil|
|00001270| 65 20 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |e switch|-to-buff|
|00001280| 65 72 20 67 65 74 2d 62 | 75 66 66 65 72 2d 63 72 |er get-b|uffer-cr|
|00001290| 65 61 74 65 20 22 2a 6e | 65 77 73 2a 22 20 6e 65 |eate "*n|ews*" ne|
|000012a0| 77 73 2d 62 75 66 66 65 | 72 20 6e 65 77 73 2d 6d |ws-buffe|r news-m|
|000012b0| 6f 64 65 20 6e 65 77 73 | 2d 62 75 66 66 65 72 2d |ode news|-buffer-|
|000012c0| 73 61 76 65 20 6e 69 6c | 20 62 75 66 66 65 72 2d |save nil| buffer-|
|000012d0| 72 65 61 64 2d 6f 6e 6c | 79 20 65 72 61 73 65 2d |read-onl|y erase-|
|000012e0| 62 75 66 66 65 72 20 74 | 20 73 65 74 2d 62 75 66 |buffer t| set-buf|
|000012f0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 73 |fer-modi|fied-p s|
|00001300| 69 74 2d 66 6f 72 20 30 | 20 6d 65 73 73 61 67 65 |it-for 0| message|
|00001310| 20 22 47 65 74 74 69 6e | 67 20 6e 65 77 20 55 53 | "Gettin|g new US|
|00001320| 45 4e 45 54 20 6e 65 77 | 73 2e 2e 2e 22 20 6e 65 |ENET new|s..." ne|
|00001330| 77 73 2d 73 65 74 2d 6d | 6f 64 65 2d 6c 69 6e 65 |ws-set-m|ode-line|
|00001340| 20 6e 65 77 73 2d 67 65 | 74 2d 63 65 72 74 69 66 | news-ge|t-certif|
|00001350| 69 63 61 74 69 6f 6e 73 | 20 6e 65 77 73 2d 67 65 |ications| news-ge|
|00001360| 74 2d 6e 65 77 2d 6e 65 | 77 73 5d 20 33 20 22 5c |t-new-ne|ws] 3 "\|
|00001370| 0a 52 65 61 64 20 55 53 | 45 4e 45 54 20 6e 65 77 |.Read US|ENET new|
|00001380| 73 20 66 6f 72 20 67 72 | 6f 75 70 73 20 66 6f 72 |s for gr|oups for|
|00001390| 20 77 68 69 63 68 20 79 | 6f 75 20 61 72 65 20 61 | which y|ou are a|
|000013a0| 20 6d 65 6d 62 65 72 20 | 61 6e 64 20 61 64 64 20 | member |and add |
|000013b0| 6f 72 0a 64 65 6c 65 74 | 65 20 67 72 6f 75 70 73 |or.delet|e groups|
|000013c0| 2e 0a 59 6f 75 20 63 61 | 6e 20 72 65 70 6c 79 20 |..You ca|n reply |
|000013d0| 74 6f 20 61 72 74 69 63 | 6c 65 73 20 70 6f 73 74 |to artic|les post|
|000013e0| 65 64 20 61 6e 64 20 73 | 65 6e 64 20 61 72 74 69 |ed and s|end arti|
|000013f0| 63 6c 65 73 20 74 6f 20 | 61 6e 79 20 67 72 6f 75 |cles to |any grou|
|00001400| 70 2e 0a 0a 54 79 70 65 | 20 5c 5c 5b 64 65 73 63 |p...Type| \\[desc|
|00001410| 72 69 62 65 2d 6d 6f 64 | 65 5d 20 6f 6e 63 65 20 |ribe-mod|e] once |
|00001420| 72 65 61 64 69 6e 67 20 | 6e 65 77 73 20 74 6f 20 |reading |news to |
|00001430| 67 65 74 20 61 20 6c 69 | 73 74 20 6f 66 20 72 6e |get a li|st of rn|
|00001440| 65 77 73 20 63 6f 6d 6d | 61 6e 64 73 2e 22 20 6e |ews comm|ands." n|
|00001450| 69 6c 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |il]).(by|te-code |
|00001460| 22 c0 c1 4d 88 c2 c3 4d | 88 c4 c5 4d 88 c6 c7 4d |"..M...M|...M...M|
|00001470| 88 c8 c9 4d 87 22 20 5b | 6e 65 77 73 2d 67 72 6f |...M." [|news-gro|
|00001480| 75 70 2d 63 65 72 74 69 | 66 69 63 61 74 69 6f 6e |up-certi|fication|
|00001490| 20 23 5b 28 67 72 6f 75 | 70 29 20 22 c0 09 5c 6e | #[(grou|p) "..\n|
|000014a0| 5c 22 a3 87 22 20 5b 61 | 73 73 6f 63 20 67 72 6f |\".." [a|ssoc gro|
|000014b0| 75 70 20 6e 65 77 73 2d | 63 75 72 72 65 6e 74 2d |up news-|current-|
|000014c0| 63 65 72 74 69 66 69 63 | 61 74 69 6f 6e 73 5d 20 |certific|ations] |
|000014d0| 33 5d 20 6e 65 77 73 2d | 73 65 74 2d 63 75 72 72 |3] news-|set-curr|
|000014e0| 65 6e 74 2d 63 65 72 74 | 69 66 69 61 62 6c 65 20 |ent-cert|ifiable |
|000014f0| 23 5b 6e 69 6c 20 22 08 | c1 c2 c3 0c 23 50 1d c6 |#[nil ".|....#P..|
|00001500| c7 c8 0d 21 ae 81 0d 21 | 38 89 16 09 29 87 22 20 |...!...!|8...)." |
|00001510| 5b 6e 65 77 73 2d 70 61 | 74 68 20 73 74 72 69 6e |[news-pa|th strin|
|00001520| 67 2d 73 75 62 73 74 2d | 63 68 61 72 20 34 37 20 |g-subst-|char 47 |
|00001530| 34 36 20 6e 65 77 73 2d | 63 75 72 72 65 6e 74 2d |46 news-|current-|
|00001540| 6e 65 77 73 2d 67 72 6f | 75 70 20 66 69 6c 65 20 |news-gro|up file |
|00001550| 35 20 66 69 6c 65 2d 61 | 74 74 72 69 62 75 74 65 |5 file-a|ttribute|
|00001560| 73 20 66 69 6c 65 2d 73 | 79 6d 6c 69 6e 6b 2d 70 |s file-s|ymlink-p|
|00001570| 20 6e 65 77 73 2d 63 75 | 72 72 65 6e 74 2d 63 65 | news-cu|rrent-ce|
|00001580| 72 74 69 66 69 61 62 6c | 65 5d 20 35 5d 20 6e 65 |rtifiabl|e] 5] ne|
|00001590| 77 73 2d 67 65 74 2d 63 | 65 72 74 69 66 69 63 61 |ws-get-c|ertifica|
|000015a0| 74 69 6f 6e 73 20 23 5b | 6e 69 6c 20 22 8a c0 8b |tions #[|nil "...|
|000015b0| 29 87 22 20 5b 28 28 62 | 79 74 65 2d 63 6f 64 65 |)." [((b|yte-code|
|000015c0| 20 22 c0 c1 c2 8f a2 89 | 13 87 22 20 5b 76 61 72 | "......|.." [var|
|000015d0| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 09 21 | (byte-c|ode "..!|
|000015e0| 1a c3 5c 6e 21 1c c5 5c | 6e 21 ad 8c c6 0c c7 5c |..\n!..\|n!.....\|
|000015f0| 22 88 c8 8e c9 ca 20 21 | 29 2a 87 22 20 5b 73 75 |"..... !|)*." [su|
|00001600| 62 73 74 69 74 75 74 65 | 2d 69 6e 2d 66 69 6c 65 |bstitute|-in-file|
|00001610| 2d 6e 61 6d 65 20 6e 65 | 77 73 2d 63 65 72 74 69 |-name ne|ws-certi|
|00001620| 66 69 63 61 74 69 6f 6e | 2d 66 69 6c 65 20 66 69 |fication|-file fi|
|00001630| 6c 65 20 66 69 6e 64 2d | 66 69 6c 65 2d 6e 6f 73 |le find-|file-nos|
|00001640| 65 6c 65 63 74 20 62 75 | 66 20 66 69 6c 65 2d 65 |elect bu|f file-e|
|00001650| 78 69 73 74 73 2d 70 20 | 73 77 69 74 63 68 2d 74 |xists-p |switch-t|
|00001660| 6f 2d 62 75 66 66 65 72 | 20 6e 6f 72 65 63 6f 72 |o-buffer| norecor|
|00001670| 64 20 28 28 6b 69 6c 6c | 2d 62 75 66 66 65 72 20 |d ((kill|-buffer |
|00001680| 62 75 66 29 29 20 72 65 | 61 64 2d 66 72 6f 6d 2d |buf)) re|ad-from-|
|00001690| 73 74 72 69 6e 67 20 62 | 75 66 66 65 72 2d 73 74 |string b|uffer-st|
|000016a0| 72 69 6e 67 5d 20 33 29 | 20 28 28 65 72 72 6f 72 |ring] 3)| ((error|
|000016b0| 29 29 20 6e 65 77 73 2d | 63 75 72 72 65 6e 74 2d |)) news-|current-|
|000016c0| 63 65 72 74 69 66 69 63 | 61 74 69 6f 6e 73 5d 20 |certific|ations] |
|000016d0| 33 29 29 5d 20 31 5d 20 | 6e 65 77 73 2d 77 72 69 |3))] 1] |news-wri|
|000016e0| 74 65 2d 63 65 72 74 69 | 66 69 63 61 74 69 6f 6e |te-certi|fication|
|000016f0| 73 20 23 5b 6e 69 6c 20 | 22 8a c0 8b 29 87 22 20 |s #[nil |"...)." |
|00001700| 5b 28 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 90 |[((byte-|code "..|
|00001710| c1 5c 6e 21 91 88 c3 c0 | 21 1c c5 0c 21 88 c6 c7 |.\n!....|!...!...|
|00001720| 0e 08 21 21 88 c9 0c 21 | 29 87 22 20 5b 22 2a 43 |..!!...!|)." ["*C|
|00001730| 65 52 74 49 66 49 63 41 | 74 49 6f 4e 73 2a 22 20 |eRtIfIcA|tIoNs*" |
|00001740| 70 72 69 6e 74 20 6e 65 | 77 73 2d 63 75 72 72 65 |print ne|ws-curre|
|00001750| 6e 74 2d 63 65 72 74 69 | 66 69 63 61 74 69 6f 6e |nt-certi|fication|
|00001760| 73 20 67 65 74 2d 62 75 | 66 66 65 72 20 62 75 66 |s get-bu|ffer buf|
|00001770| 20 73 77 69 74 63 68 2d | 74 6f 2d 62 75 66 66 65 | switch-|to-buffe|
|00001780| 72 20 77 72 69 74 65 2d | 66 69 6c 65 20 73 75 62 |r write-|file sub|
|00001790| 73 74 69 74 75 74 65 2d | 69 6e 2d 66 69 6c 65 2d |stitute-|in-file-|
|000017a0| 6e 61 6d 65 20 6e 65 77 | 73 2d 63 65 72 74 69 66 |name new|s-certif|
|000017b0| 69 63 61 74 69 6f 6e 2d | 66 69 6c 65 20 6b 69 6c |ication-|file kil|
|000017c0| 6c 2d 62 75 66 66 65 72 | 5d 20 33 29 29 5d 20 31 |l-buffer|] 3))] 1|
|000017d0| 5d 20 6e 65 77 73 2d 73 | 65 74 2d 63 75 72 72 65 |] news-s|et-curre|
|000017e0| 6e 74 2d 67 72 6f 75 70 | 2d 63 65 72 74 69 66 69 |nt-group|-certifi|
|000017f0| 63 61 74 69 6f 6e 20 23 | 5b 6e 69 6c 20 22 c0 09 |cation #|[nil "..|
|00001800| 5c 6e 5c 22 89 1b ab 85 | 0b 0c a1 aa 87 09 0c 42 |\n\"....|.......B|
|00001810| 5c 6e 42 89 12 29 87 22 | 20 5b 61 73 73 6f 63 20 |\nB..)."| [assoc |
|00001820| 6e 65 77 73 2d 63 75 72 | 72 65 6e 74 2d 6e 65 77 |news-cur|rent-new|
|00001830| 73 2d 67 72 6f 75 70 20 | 6e 65 77 73 2d 63 75 72 |s-group |news-cur|
|00001840| 72 65 6e 74 2d 63 65 72 | 74 69 66 69 63 61 74 69 |rent-cer|tificati|
|00001850| 6f 6e 73 20 63 67 63 20 | 6e 65 77 73 2d 63 75 72 |ons cgc |news-cur|
|00001860| 72 65 6e 74 2d 63 65 72 | 74 69 66 69 61 62 6c 65 |rent-cer|tifiable|
|00001870| 5d 20 34 5d 5d 20 32 29 | 0a 28 66 73 65 74 20 27 |] 4]] 2)|.(fset '|
|00001880| 6e 65 77 73 2d 73 65 74 | 2d 6d 69 6e 6f 72 2d 6d |news-set|-minor-m|
|00001890| 6f 64 65 73 20 23 5b 6e | 69 6c 20 22 c0 09 c2 0b |odes #[n|il "....|
|000018a0| c4 20 52 42 43 15 c6 c7 | 21 ae 84 0d 89 16 08 87 |. RBC...|!.......|
|000018b0| 22 20 5b 66 6f 6f 20 6e | 65 77 73 2d 63 75 72 72 |" [foo n|ews-curr|
|000018c0| 65 6e 74 2d 6d 65 73 73 | 61 67 65 2d 6e 75 6d 62 |ent-mess|age-numb|
|000018d0| 65 72 20 22 2f 22 20 6e | 65 77 73 2d 74 6f 74 61 |er "/" n|ews-tota|
|000018e0| 6c 2d 63 75 72 72 65 6e | 74 2d 67 72 6f 75 70 20 |l-curren|t-group |
|000018f0| 6e 65 77 73 2d 67 65 74 | 2d 61 74 74 72 69 62 75 |news-get|-attribu|
|00001900| 74 65 2d 73 74 72 69 6e | 67 20 6e 65 77 73 2d 6d |te-strin|g news-m|
|00001910| 69 6e 6f 72 2d 6d 6f 64 | 65 73 20 62 6f 75 6e 64 |inor-mod|es bound|
|00001920| 70 20 6d 69 6e 6f 72 2d | 6d 6f 64 65 2d 61 6c 69 |p minor-|mode-ali|
|00001930| 73 74 20 6d 69 6e 6f 72 | 2d 6d 6f 64 65 73 5d 20 |st minor|-modes] |
|00001940| 35 20 22 5c 0a 43 72 65 | 61 74 65 73 20 61 20 6d |5 "\.Cre|ates a m|
|00001950| 69 6e 6f 72 20 6d 6f 64 | 65 20 6c 69 73 74 20 74 |inor mod|e list t|
|00001960| 68 61 74 20 68 61 73 20 | 67 72 6f 75 70 20 6e 61 |hat has |group na|
|00001970| 6d 65 2c 20 74 6f 74 61 | 6c 20 61 72 74 69 63 6c |me, tota|l articl|
|00001980| 65 73 2c 0a 61 6e 64 20 | 61 74 74 72 69 62 75 74 |es,.and |attribut|
|00001990| 65 20 66 6f 72 20 63 75 | 72 72 65 6e 74 20 61 72 |e for cu|rrent ar|
|000019a0| 74 69 63 6c 65 2e 22 5d | 29 0a 28 66 73 65 74 20 |ticle."]|).(fset |
|000019b0| 27 6e 65 77 73 2d 73 65 | 74 2d 6d 65 73 73 61 67 |'news-se|t-messag|
|000019c0| 65 2d 63 6f 75 6e 74 65 | 72 73 20 23 5b 6e 69 6c |e-counte|rs #[nil|
|000019d0| 20 22 08 3f ad 83 c1 89 | 12 87 22 20 5b 6e 65 77 | ".?....|.." [new|
|000019e0| 73 2d 6c 69 73 74 2d 6f | 66 2d 66 69 6c 65 73 20 |s-list-o|f-files |
|000019f0| 30 20 6e 65 77 73 2d 63 | 75 72 72 65 6e 74 2d 6d |0 news-c|urrent-m|
|00001a00| 65 73 73 61 67 65 2d 6e | 75 6d 62 65 72 5d 20 32 |essage-n|umber] 2|
|00001a10| 20 22 5c 0a 53 63 61 6e | 20 74 68 72 6f 75 67 68 | "\.Scan| through|
|00001a20| 20 63 75 72 72 65 6e 74 | 20 6e 65 77 73 2d 67 72 | current| news-gr|
|00001a30| 6f 75 70 73 20 66 69 6c | 65 6c 69 73 74 20 74 6f |oups fil|elist to|
|00001a40| 20 66 69 67 75 72 65 20 | 6f 75 74 20 68 6f 77 20 | figure |out how |
|00001a50| 6d 61 6e 79 20 6d 65 73 | 73 61 67 65 73 0a 61 72 |many mes|sages.ar|
|00001a60| 65 20 74 68 65 72 65 2e | 20 53 65 74 20 63 6f 75 |e there.| Set cou|
|00001a70| 6e 74 65 72 73 20 66 6f | 72 20 75 73 65 20 77 69 |nters fo|r use wi|
|00001a80| 74 68 20 6d 69 6e 6f 72 | 20 6d 6f 64 65 20 64 69 |th minor| mode di|
|00001a90| 73 70 6c 61 79 2e 22 5d | 29 0a 28 62 79 74 65 2d |splay."]|).(byte-|
|00001aa0| 63 6f 64 65 20 22 08 84 | ad 00 c1 20 10 c2 08 21 |code "..|... ...!|
|00001ab0| 88 c3 08 c4 c5 23 88 c3 | 08 c6 c7 23 88 c3 08 c8 |.....#..|...#....|
|00001ac0| c9 23 88 c3 08 ca cb 23 | 88 c3 08 cc cd 23 88 c3 |.#.....#|.....#..|
|00001ad0| 08 ce cf 23 88 c3 08 d0 | d1 23 88 c3 08 d2 d3 23 |...#....|.#.....#|
|00001ae0| 88 c3 08 d4 d3 23 88 c3 | 08 d5 d6 23 88 c3 08 d7 |.....#..|...#....|
|00001af0| d8 23 88 c3 08 d9 da 23 | 88 c3 08 db dc 23 88 c3 |.#.....#|.....#..|
|00001b00| 08 dd de 23 88 c3 08 df | e0 23 88 c3 08 e1 e2 23 |...#....|.#.....#|
|00001b10| 88 c3 08 e3 e4 23 88 c3 | 08 e5 e6 23 88 c3 08 e7 |.....#..|...#....|
|00001b20| e8 23 88 c3 08 e9 ea 23 | 88 c3 08 eb ec 23 88 c3 |.#.....#|.....#..|
|00001b30| 08 ed ee 23 88 c3 08 ef | f0 23 88 c3 08 f1 f2 23 |...#....|.#.....#|
|00001b40| 88 c3 08 f3 f4 23 88 c3 | 08 f5 f6 23 88 c3 08 f7 |.....#..|...#....|
|00001b50| f8 23 88 c1 87 22 20 5b | 6e 65 77 73 2d 6d 6f 64 |.#..." [|news-mod|
|00001b60| 65 2d 6d 61 70 20 6d 61 | 6b 65 2d 6b 65 79 6d 61 |e-map ma|ke-keyma|
|00001b70| 70 20 73 75 70 70 72 65 | 73 73 2d 6b 65 79 6d 61 |p suppre|ss-keyma|
|00001b80| 70 20 64 65 66 69 6e 65 | 2d 6b 65 79 20 22 2e 22 |p define|-key "."|
|00001b90| 20 62 65 67 69 6e 6e 69 | 6e 67 2d 6f 66 2d 62 75 | beginni|ng-of-bu|
|00001ba0| 66 66 65 72 20 22 20 22 | 20 73 63 72 6f 6c 6c 2d |ffer " "| scroll-|
|00001bb0| 75 70 20 22 7f 22 20 73 | 63 72 6f 6c 6c 2d 64 6f |up "." s|croll-do|
|00001bc0| 77 6e 20 22 6e 22 20 6e | 65 77 73 2d 6e 65 78 74 |wn "n" n|ews-next|
|00001bd0| 2d 6d 65 73 73 61 67 65 | 20 22 63 22 20 6e 65 77 |-message| "c" new|
|00001be0| 73 2d 6d 61 6b 65 2d 6c | 69 6e 6b 2d 74 6f 2d 6d |s-make-l|ink-to-m|
|00001bf0| 65 73 73 61 67 65 20 22 | 70 22 20 6e 65 77 73 2d |essage "|p" news-|
|00001c00| 70 72 65 76 69 6f 75 73 | 2d 6d 65 73 73 61 67 65 |previous|-message|
|00001c10| 20 22 6a 22 20 6e 65 77 | 73 2d 67 6f 74 6f 2d 6d | "j" new|s-goto-m|
|00001c20| 65 73 73 61 67 65 20 22 | 71 22 20 6e 65 77 73 2d |essage "|q" news-|
|00001c30| 65 78 69 74 20 22 65 22 | 20 22 1b 6a 22 20 6e 65 |exit "e"| ".j" ne|
|00001c40| 77 73 2d 67 6f 74 6f 2d | 6e 65 77 73 2d 67 72 6f |ws-goto-|news-gro|
|00001c50| 75 70 20 22 1b 6e 22 20 | 6e 65 77 73 2d 6e 65 78 |up ".n" |news-nex|
|00001c60| 74 2d 67 72 6f 75 70 20 | 22 1b 70 22 20 6e 65 77 |t-group |".p" new|
|00001c70| 73 2d 70 72 65 76 69 6f | 75 73 2d 67 72 6f 75 70 |s-previo|us-group|
|00001c80| 20 22 6c 22 20 6e 65 77 | 73 2d 6c 69 73 74 2d 6e | "l" new|s-list-n|
|00001c90| 65 77 73 2d 67 72 6f 75 | 70 73 20 22 3f 22 20 64 |ews-grou|ps "?" d|
|00001ca0| 65 73 63 72 69 62 65 2d | 6d 6f 64 65 20 22 67 22 |escribe-|mode "g"|
|00001cb0| 20 6e 65 77 73 2d 67 65 | 74 2d 6e 65 77 2d 6e 65 | news-ge|t-new-ne|
|00001cc0| 77 73 20 22 66 22 20 6e | 65 77 73 2d 72 65 70 6c |ws "f" n|ews-repl|
|00001cd0| 79 20 22 6d 22 20 6e 65 | 77 73 2d 6d 61 69 6c 2d |y "m" ne|ws-mail-|
|00001ce0| 6f 74 68 65 72 2d 77 69 | 6e 64 6f 77 20 22 61 22 |other-wi|ndow "a"|
|00001cf0| 20 6e 65 77 73 2d 70 6f | 73 74 2d 6e 65 77 73 20 | news-po|st-news |
|00001d00| 22 72 22 20 6e 65 77 73 | 2d 6d 61 69 6c 2d 72 65 |"r" news|-mail-re|
|00001d10| 70 6c 79 20 22 6f 22 20 | 6e 65 77 73 2d 73 61 76 |ply "o" |news-sav|
|00001d20| 65 2d 69 74 65 6d 2d 69 | 6e 2d 66 69 6c 65 20 22 |e-item-i|n-file "|
|00001d30| 0f 22 20 72 6d 61 69 6c | 2d 6f 75 74 70 75 74 20 |." rmail|-output |
|00001d40| 22 74 22 20 6e 65 77 73 | 2d 73 68 6f 77 2d 61 6c |"t" news|-show-al|
|00001d50| 6c 2d 68 65 61 64 65 72 | 73 20 22 78 22 20 6e 65 |l-header|s "x" ne|
|00001d60| 77 73 2d 66 6f 72 63 65 | 2d 75 70 64 61 74 65 20 |ws-force|-update |
|00001d70| 22 41 22 20 6e 65 77 73 | 2d 61 64 64 2d 6e 65 77 |"A" news|-add-new|
|00001d80| 73 2d 67 72 6f 75 70 20 | 22 75 22 20 6e 65 77 73 |s-group |"u" news|
|00001d90| 2d 75 6e 73 75 62 73 63 | 72 69 62 65 2d 63 75 72 |-unsubsc|ribe-cur|
|00001da0| 72 65 6e 74 2d 67 72 6f | 75 70 20 22 55 22 20 6e |rent-gro|up "U" n|
|00001db0| 65 77 73 2d 75 6e 73 75 | 62 73 63 72 69 62 65 2d |ews-unsu|bscribe-|
|00001dc0| 67 72 6f 75 70 20 22 03 | 12 22 20 6e 65 77 73 2d |group ".|." news-|
|00001dd0| 63 61 65 73 61 72 2d 62 | 75 66 66 65 72 2d 62 6f |caesar-b|uffer-bo|
|00001de0| 64 79 5d 20 34 29 0a 28 | 66 73 65 74 20 27 6e 65 |dy] 4).(|fset 'ne|
|00001df0| 77 73 2d 6d 6f 64 65 20 | 23 5b 6e 69 6c 20 22 c0 |ws-mode |#[nil ".|
|00001e00| 20 88 c1 c2 21 88 c3 12 | c1 c4 21 88 c1 c5 21 88 | ...!...|..!...!.|
|00001e10| c6 15 c1 c7 21 88 c6 16 | 07 c1 c8 21 88 c1 c9 21 |....!...|...!...!|
|00001e20| 88 c1 ca 21 88 cb 16 5c | 6e c1 cc 21 88 cd 16 0e |...!...\|n..!....|
|00001e30| cf d0 21 ab 85 d1 16 12 | aa 83 d3 16 12 d4 20 88 |..!.....|...... .|
|00001e40| d5 0e 16 21 88 d7 0e 18 | 21 88 0e 19 16 1a db dc |...!....|!.......|
|00001e50| 21 87 22 20 5b 6b 69 6c | 6c 2d 61 6c 6c 2d 6c 6f |!." [kil|l-all-lo|
|00001e60| 63 61 6c 2d 76 61 72 69 | 61 62 6c 65 73 20 6d 61 |cal-vari|ables ma|
|00001e70| 6b 65 2d 6c 6f 63 61 6c | 2d 76 61 72 69 61 62 6c |ke-local|-variabl|
|00001e80| 65 20 6e 65 77 73 2d 72 | 65 61 64 2d 66 69 72 73 |e news-r|ead-firs|
|00001e90| 74 2d 74 69 6d 65 2d 70 | 20 74 20 6e 65 77 73 2d |t-time-p| t news-|
|00001ea0| 63 75 72 72 65 6e 74 2d | 6e 65 77 73 2d 67 72 6f |current-|news-gro|
|00001eb0| 75 70 20 6e 65 77 73 2d | 63 75 72 72 65 6e 74 2d |up news-|current-|
|00001ec0| 67 72 6f 75 70 2d 62 65 | 67 69 6e 20 30 20 6e 65 |group-be|gin 0 ne|
|00001ed0| 77 73 2d 63 75 72 72 65 | 6e 74 2d 6d 65 73 73 61 |ws-curre|nt-messa|
|00001ee0| 67 65 2d 6e 75 6d 62 65 | 72 20 6e 65 77 73 2d 74 |ge-numbe|r news-t|
|00001ef0| 6f 74 61 6c 2d 63 75 72 | 72 65 6e 74 2d 67 72 6f |otal-cur|rent-gro|
|00001f00| 75 70 20 6e 65 77 73 2d | 62 75 66 66 65 72 2d 73 |up news-|buffer-s|
|00001f10| 61 76 65 20 76 65 72 73 | 69 6f 6e 2d 63 6f 6e 74 |ave vers|ion-cont|
|00001f20| 72 6f 6c 20 6e 65 76 65 | 72 20 6e 65 77 73 2d 70 |rol neve|r news-p|
|00001f30| 6f 69 6e 74 2d 70 64 6c | 20 6e 65 77 73 2d 6d 6f |oint-pdl| news-mo|
|00001f40| 64 65 20 6d 61 6a 6f 72 | 2d 6d 6f 64 65 20 62 6f |de major|-mode bo|
|00001f50| 75 6e 64 70 20 6d 69 6e | 6f 72 2d 6d 6f 64 65 2d |undp min|or-mode-|
|00001f60| 61 6c 69 73 74 20 28 22 | 4e 45 57 53 22 20 6e 65 |alist ("|NEWS" ne|
|00001f70| 77 73 2d 6d 69 6e 6f 72 | 2d 6d 6f 64 65 73 29 20 |ws-minor|-modes) |
|00001f80| 6d 6f 64 65 2d 6e 61 6d | 65 20 22 4e 45 57 53 22 |mode-nam|e "NEWS"|
|00001f90| 20 6e 65 77 73 2d 73 65 | 74 2d 6d 6f 64 65 2d 6c | news-se|t-mode-l|
|00001fa0| 69 6e 65 20 73 65 74 2d | 73 79 6e 74 61 78 2d 74 |ine set-|syntax-t|
|00001fb0| 61 62 6c 65 20 74 65 78 | 74 2d 6d 6f 64 65 2d 73 |able tex|t-mode-s|
|00001fc0| 79 6e 74 61 78 2d 74 61 | 62 6c 65 20 75 73 65 2d |yntax-ta|ble use-|
|00001fd0| 6c 6f 63 61 6c 2d 6d 61 | 70 20 6e 65 77 73 2d 6d |local-ma|p news-m|
|00001fe0| 6f 64 65 2d 6d 61 70 20 | 74 65 78 74 2d 6d 6f 64 |ode-map |text-mod|
|00001ff0| 65 2d 61 62 62 72 65 76 | 2d 74 61 62 6c 65 20 6c |e-abbrev|-table l|
|00002000| 6f 63 61 6c 2d 61 62 62 | 72 65 76 2d 74 61 62 6c |ocal-abb|rev-tabl|
|00002010| 65 20 72 75 6e 2d 68 6f | 6f 6b 73 20 6e 65 77 73 |e run-ho|oks news|
|00002020| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 32 20 22 5c |-mode-ho|ok] 2 "\|
|00002030| 0a 4e 65 77 73 20 4d 6f | 64 65 20 69 73 20 75 73 |.News Mo|de is us|
|00002040| 65 64 20 62 79 20 4d 2d | 78 20 72 6e 65 77 73 20 |ed by M-|x rnews |
|00002050| 66 6f 72 20 72 65 61 64 | 69 6e 67 20 55 53 45 4e |for read|ing USEN|
|00002060| 45 54 20 4e 65 77 73 67 | 72 6f 75 70 73 20 61 72 |ET Newsg|roups ar|
|00002070| 74 69 63 6c 65 73 2e 0a | 4e 65 77 20 72 65 61 64 |ticles..|New read|
|00002080| 65 72 73 20 63 61 6e 20 | 66 69 6e 64 20 61 64 64 |ers can |find add|
|00002090| 69 74 69 6f 6e 61 6c 20 | 68 65 6c 70 20 69 6e 20 |itional |help in |
|000020a0| 6e 65 77 73 67 72 6f 75 | 70 3a 20 6e 65 77 73 2e |newsgrou|p: news.|
|000020b0| 61 6e 6e 6f 75 6e 63 65 | 2e 6e 65 77 75 73 65 72 |announce|.newuser|
|000020c0| 73 20 2e 0a 41 6c 6c 20 | 6e 6f 72 6d 61 6c 20 65 |s ..All |normal e|
|000020d0| 64 69 74 69 6e 67 20 63 | 6f 6d 6d 61 6e 64 73 20 |diting c|ommands |
|000020e0| 61 72 65 20 74 75 72 6e | 65 64 20 6f 66 66 2e 0a |are turn|ed off..|
|000020f0| 49 6e 73 74 65 61 64 2c | 20 74 68 65 73 65 20 63 |Instead,| these c|
|00002100| 6f 6d 6d 61 6e 64 73 20 | 61 72 65 20 61 76 61 69 |ommands |are avai|
|00002110| 6c 61 62 6c 65 3a 0a 0a | 2e 09 6d 6f 76 65 20 70 |lable:..|..move p|
|00002120| 6f 69 6e 74 20 74 6f 20 | 66 72 6f 6e 74 20 6f 66 |oint to |front of|
|00002130| 20 74 68 69 73 20 6e 65 | 77 73 20 61 72 74 69 63 | this ne|ws artic|
|00002140| 6c 65 20 28 73 61 6d 65 | 20 61 73 20 4d 65 74 61 |le (same| as Meta|
|00002150| 2d 3c 29 2e 0a 53 70 61 | 63 65 09 73 63 72 6f 6c |-<)..Spa|ce.scrol|
|00002160| 6c 20 74 6f 20 6e 65 78 | 74 20 73 63 72 65 65 6e |l to nex|t screen|
|00002170| 20 6f 66 20 74 68 69 73 | 20 6e 65 77 73 20 61 72 | of this| news ar|
|00002180| 74 69 63 6c 65 2e 0a 44 | 65 6c 65 74 65 20 20 73 |ticle..D|elete s|
|00002190| 63 72 6f 6c 6c 20 64 6f | 77 6e 20 70 72 65 76 69 |croll do|wn previ|
|000021a0| 6f 75 73 20 70 61 67 65 | 20 6f 66 20 74 68 69 73 |ous page| of this|
|000021b0| 20 6e 65 77 73 20 61 72 | 74 69 63 6c 65 2e 0a 6e | news ar|ticle..n|
|000021c0| 09 6d 6f 76 65 20 74 6f | 20 6e 65 78 74 20 6e 65 |.move to| next ne|
|000021d0| 77 73 20 61 72 74 69 63 | 6c 65 2c 20 70 6f 73 73 |ws artic|le, poss|
|000021e0| 69 62 6c 79 20 6e 65 78 | 74 20 67 72 6f 75 70 2e |ibly nex|t group.|
|000021f0| 0a 70 09 6d 6f 76 65 20 | 74 6f 20 70 72 65 76 69 |.p.move |to previ|
|00002200| 6f 75 73 20 6e 65 77 73 | 20 61 72 74 69 63 6c 65 |ous news| article|
|00002210| 2c 20 70 6f 73 73 69 62 | 6c 79 20 70 72 65 76 69 |, possib|ly previ|
|00002220| 6f 75 73 20 67 72 6f 75 | 70 2e 0a 6a 09 6a 75 6d |ous grou|p..j.jum|
|00002230| 70 20 74 6f 20 6e 65 77 | 73 20 61 72 74 69 63 6c |p to new|s articl|
|00002240| 65 20 73 70 65 63 69 66 | 69 65 64 20 62 79 20 6e |e specif|ied by n|
|00002250| 75 6d 65 72 69 63 20 70 | 6f 73 69 74 69 6f 6e 2e |umeric p|osition.|
|00002260| 0a 4d 2d 6a 20 20 20 20 | 20 6a 75 6d 70 20 74 6f |.M-j | jump to|
|00002270| 20 6e 65 77 73 20 67 72 | 6f 75 70 2e 0a 4d 2d 6e | news gr|oup..M-n|
|00002280| 20 20 20 20 20 67 6f 74 | 6f 20 6e 65 78 74 20 6e | got|o next n|
|00002290| 65 77 73 20 67 72 6f 75 | 70 2e 0a 4d 2d 70 20 20 |ews grou|p..M-p |
|000022a0| 20 20 20 67 6f 74 6f 20 | 70 72 65 76 69 6f 75 73 | goto |previous|
|000022b0| 20 6e 65 77 73 20 67 72 | 6f 75 70 2e 0a 6c 20 20 | news gr|oup..l |
|000022c0| 20 20 20 20 20 6c 69 73 | 74 20 61 6c 6c 20 74 68 | lis|t all th|
|000022d0| 65 20 6e 65 77 73 20 67 | 72 6f 75 70 73 20 77 69 |e news g|roups wi|
|000022e0| 74 68 20 63 75 72 72 65 | 6e 74 20 73 74 61 74 75 |th curre|nt statu|
|000022f0| 73 2e 0a 3f 20 20 20 20 | 20 20 20 70 72 69 6e 74 |s..? | print|
|00002300| 20 74 68 69 73 20 68 65 | 6c 70 20 6d 65 73 73 61 | this he|lp messa|
|00002310| 67 65 2e 0a 43 2d 63 20 | 43 2d 72 20 63 61 65 73 |ge..C-c |C-r caes|
|00002320| 61 72 20 72 6f 74 61 74 | 65 20 61 6c 6c 20 6c 65 |ar rotat|e all le|
|00002330| 74 74 65 72 73 20 62 79 | 20 31 33 20 70 6c 61 63 |tters by| 13 plac|
|00002340| 65 73 20 69 6e 20 74 68 | 65 20 61 72 74 69 63 6c |es in th|e articl|
|00002350| 65 27 73 20 62 6f 64 79 | 20 28 72 6f 74 31 33 29 |e's body| (rot13)|
|00002360| 2e 0a 67 20 20 20 20 20 | 20 20 67 65 74 20 6e 65 |..g | get ne|
|00002370| 77 20 55 53 45 4e 45 54 | 20 6e 65 77 73 2e 0a 66 |w USENET| news..f|
|00002380| 20 20 20 20 20 20 20 70 | 6f 73 74 20 61 20 72 65 | p|ost a re|
|00002390| 70 6c 79 20 61 72 74 69 | 63 6c 65 20 74 6f 20 55 |ply arti|cle to U|
|000023a0| 53 45 4e 45 54 2e 0a 61 | 20 20 20 20 20 20 20 70 |SENET..a| p|
|000023b0| 6f 73 74 20 61 6e 20 6f | 72 69 67 69 6e 61 6c 20 |ost an o|riginal |
|000023c0| 6e 65 77 73 20 61 72 74 | 69 63 6c 65 2e 0a 41 20 |news art|icle..A |
|000023d0| 20 20 20 20 20 20 61 64 | 64 20 61 20 6e 65 77 73 | ad|d a news|
|000023e0| 67 72 6f 75 70 2e 20 0a | 6f 09 73 61 76 65 20 74 |group. .|o.save t|
|000023f0| 68 65 20 63 75 72 72 65 | 6e 74 20 61 72 74 69 63 |he curre|nt artic|
|00002400| 6c 65 20 69 6e 20 74 68 | 65 20 6e 61 6d 65 64 20 |le in th|e named |
|00002410| 66 69 6c 65 20 28 61 70 | 70 65 6e 64 20 69 66 20 |file (ap|pend if |
|00002420| 66 69 6c 65 20 65 78 69 | 73 74 73 29 2e 0a 43 2d |file exi|sts)..C-|
|00002430| 6f 09 6f 75 74 70 75 74 | 20 74 68 69 73 20 6d 65 |o.output| this me|
|00002440| 73 73 61 67 65 20 74 6f | 20 61 20 55 6e 69 78 2d |ssage to| a Unix-|
|00002450| 66 6f 72 6d 61 74 20 6d | 61 69 6c 20 66 69 6c 65 |format m|ail file|
|00002460| 20 28 61 70 70 65 6e 64 | 20 69 74 29 2e 0a 63 20 | (append| it)..c |
|00002470| 20 20 20 20 20 20 5c 22 | 63 6f 70 79 5c 22 20 28 | \"|copy\" (|
|00002480| 61 63 74 75 61 6c 6c 79 | 20 6c 69 6e 6b 29 20 63 |actually| link) c|
|00002490| 75 72 72 65 6e 74 20 6f | 72 20 70 72 65 66 69 78 |urrent o|r prefix|
|000024a0| 2d 61 72 67 20 6d 73 67 | 20 74 6f 20 66 69 6c 65 |-arg msg| to file|
|000024b0| 2e 0a 09 77 61 72 6e 69 | 6e 67 3a 20 74 61 72 67 |...warni|ng: targ|
|000024c0| 65 74 20 64 69 72 65 63 | 74 6f 72 79 20 61 6e 64 |et direc|tory and|
|000024d0| 20 6d 65 73 73 61 67 65 | 20 66 69 6c 65 20 6d 75 | message| file mu|
|000024e0| 73 74 20 62 65 20 6f 6e | 20 73 61 6d 65 20 64 65 |st be on| same de|
|000024f0| 76 69 63 65 0a 09 09 28 | 55 4e 49 58 20 6d 61 67 |vice...(|UNIX mag|
|00002500| 69 63 29 0a 74 20 20 20 | 20 20 20 20 73 68 6f 77 |ic).t | show|
|00002510| 20 61 6c 6c 20 74 68 65 | 20 68 65 61 64 65 72 73 | all the| headers|
|00002520| 20 74 68 69 73 20 6e 65 | 77 73 20 61 72 74 69 63 | this ne|ws artic|
|00002530| 6c 65 20 6f 72 69 67 69 | 6e 61 6c 6c 79 20 68 61 |le origi|nally ha|
|00002540| 64 2e 0a 71 09 71 75 69 | 74 20 72 65 61 64 69 6e |d..q.qui|t readin|
|00002550| 67 20 6e 65 77 73 20 61 | 66 74 65 72 20 75 70 64 |g news a|fter upd|
|00002560| 61 74 69 6e 67 20 2e 6e | 65 77 73 72 63 20 66 69 |ating .n|ewsrc fi|
|00002570| 6c 65 2e 0a 65 09 65 78 | 69 74 20 75 70 64 61 74 |le..e.ex|it updat|
|00002580| 69 6e 67 20 2e 6e 65 77 | 73 72 63 20 66 69 6c 65 |ing .new|src file|
|00002590| 2e 0a 6d 09 6d 61 69 6c | 20 61 20 6e 65 77 73 20 |..m.mail| a news |
|000025a0| 61 72 74 69 63 6c 65 2e | 20 20 53 61 6d 65 20 61 |article.| Same a|
|000025b0| 73 20 43 2d 78 20 34 20 | 6d 2e 0a 78 20 20 20 20 |s C-x 4 |m..x |
|000025c0| 20 20 20 75 70 64 61 74 | 65 20 6c 61 73 74 20 6d | updat|e last m|
|000025d0| 65 73 73 61 67 65 20 73 | 65 65 6e 20 74 6f 20 62 |essage s|een to b|
|000025e0| 65 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 6d 65 |e the cu|rrent me|
|000025f0| 73 73 61 67 65 2e 0a 72 | 09 6d 61 69 6c 20 61 20 |ssage..r|.mail a |
|00002600| 72 65 70 6c 79 20 74 6f | 20 74 68 69 73 20 6e 65 |reply to| this ne|
|00002610| 77 73 20 61 72 74 69 63 | 6c 65 2e 20 20 4c 69 6b |ws artic|le. Lik|
|00002620| 65 20 6d 20 62 75 74 20 | 69 6e 69 74 69 61 6c 69 |e m but |initiali|
|00002630| 7a 65 73 20 73 6f 6d 65 | 20 66 69 65 6c 64 73 2e |zes some| fields.|
|00002640| 0a 75 20 20 20 20 20 20 | 20 75 6e 73 75 62 73 63 |.u | unsubsc|
|00002650| 72 69 62 65 20 66 72 6f | 6d 20 63 75 72 72 65 6e |ribe fro|m curren|
|00002660| 74 20 6e 65 77 73 67 72 | 6f 75 70 2e 0a 55 20 20 |t newsgr|oup..U |
|00002670| 20 20 20 20 20 75 6e 73 | 75 62 73 63 72 69 62 65 | uns|ubscribe|
|00002680| 20 66 72 6f 6d 20 73 70 | 65 63 69 66 69 65 64 20 | from sp|ecified |
|00002690| 6e 65 77 73 67 72 6f 75 | 70 2e 22 20 6e 69 6c 5d |newsgrou|p." nil]|
|000026a0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|000026b0| 4d 88 c2 c3 4d 87 22 20 | 5b 73 74 72 69 6e 67 2d |M...M." |[string-|
|000026c0| 73 75 62 73 74 2d 63 68 | 61 72 20 23 5b 28 6e 65 |subst-ch|ar #[(ne|
|000026d0| 77 20 6f 6c 64 20 73 74 | 72 69 6e 67 29 20 22 c0 |w old st|ring) ".|
|000026e0| 19 c2 c3 0c 21 21 14 0d | c6 c0 4f 15 c7 0c 0d 5c |....!!..|..O....\|
|000026f0| 22 89 11 ab 88 0d 09 0e | 08 49 88 aa 70 29 0d 87 |".......|.I..p)..|
|00002700| 22 20 5b 6e 69 6c 20 69 | 6e 64 65 78 20 72 65 67 |" [nil i|ndex reg|
|00002710| 65 78 70 2d 71 75 6f 74 | 65 20 63 68 61 72 2d 74 |exp-quot|e char-t|
|00002720| 6f 2d 73 74 72 69 6e 67 | 20 6f 6c 64 20 73 74 72 |o-string| old str|
|00002730| 69 6e 67 20 30 20 73 74 | 72 69 6e 67 2d 6d 61 74 |ing 0 st|ring-mat|
|00002740| 63 68 20 6e 65 77 5d 20 | 33 5d 20 6e 65 77 73 2d |ch new] |3] news-|
|00002750| 75 70 64 61 74 65 2d 6d | 65 73 73 61 67 65 2d 72 |update-m|essage-r|
|00002760| 65 61 64 20 28 6d 61 63 | 72 6f 20 2e 20 23 5b 28 |ead (mac|ro . #[(|
|00002770| 6e 67 72 6f 75 70 20 6e | 6e 6f 29 20 22 c0 c1 c2 |ngroup n|no) "...|
|00002780| 0b c4 45 44 0d 45 87 22 | 20 5b 73 65 74 63 61 72 |..ED.E."| [setcar|
|00002790| 20 6e 65 77 73 2d 63 64 | 61 64 72 20 61 73 73 6f | news-cd|adr asso|
|000027a0| 63 20 6e 67 72 6f 75 70 | 20 6e 65 77 73 2d 67 72 |c ngroup| news-gr|
|000027b0| 6f 75 70 2d 61 72 74 69 | 63 6c 65 2d 61 73 73 6f |oup-arti|cle-asso|
|000027c0| 63 20 6e 6e 6f 5d 20 35 | 5d 29 5d 20 32 29 0a 28 |c nno] 5|])] 2).(|
|000027d0| 66 73 65 74 20 27 6e 65 | 77 73 2d 70 61 72 73 65 |fset 'ne|ws-parse|
|000027e0| 2d 72 61 6e 67 65 20 23 | 5b 28 6e 75 6d 62 65 72 |-range #|[(number|
|000027f0| 2d 73 74 72 69 6e 67 29 | 20 22 c0 c1 5c 6e 5c 22 |-string)| "..\n\"|
|00002800| 89 1b ab 90 c4 5c 6e c5 | 0b 4f 21 c4 5c 6e 0b 54 |.....\n.|.O!.\n.T|
|00002810| c6 4f 21 42 aa 87 c4 5c | 6e 21 89 13 89 42 29 87 |.O!B...\|n!...B).|
|00002820| 22 20 5b 73 74 72 69 6e | 67 2d 6d 61 74 63 68 20 |" [strin|g-match |
|00002830| 22 2d 22 20 6e 75 6d 62 | 65 72 2d 73 74 72 69 6e |"-" numb|er-strin|
|00002840| 67 20 6e 20 73 74 72 69 | 6e 67 2d 74 6f 2d 69 6e |g n stri|ng-to-in|
|00002850| 74 20 30 20 6e 69 6c 5d | 20 36 20 22 5c 0a 50 61 |t 0 nil]| 6 "\.Pa|
|00002860| 72 73 65 20 73 74 72 69 | 6e 67 20 72 65 70 72 65 |rse stri|ng repre|
|00002870| 73 65 6e 74 69 6e 67 20 | 72 61 6e 67 65 20 6f 66 |senting |range of|
|00002880| 20 6e 75 6d 62 65 72 73 | 20 6f 66 20 68 65 20 66 | numbers| of he f|
|00002890| 6f 72 6d 20 3c 61 3e 2d | 3c 62 3e 0a 74 6f 20 61 |orm <a>-|<b>.to a|
|000028a0| 20 6c 69 73 74 20 28 61 | 20 2e 20 62 29 22 5d 29 | list (a| . b)"])|
|000028b0| 0a 28 66 73 65 74 20 27 | 6e 65 77 73 2d 67 65 74 |.(fset '|news-get|
|000028c0| 2d 6e 65 77 2d 6e 65 77 | 73 20 23 5b 6e 69 6c 20 |-new-new|s #[nil |
|000028d0| 22 08 ab 83 c1 20 88 c2 | 13 c2 10 c4 c5 0e 06 5c |".... ..|.......\|
|000028e0| 22 88 c7 0e 06 21 c2 1e | 08 1e 09 8a ca 0e 09 21 |"....!..|.......!|
|000028f0| c2 89 89 89 1e 0b 1e 0c | 1e 0d 1e 0e 89 1e 0f 71 |........|.......q|
|00002900| 88 d0 62 88 d1 d2 c2 d3 | 23 ab ca 60 16 0d d0 79 |..b.....|#..`...y|
|00002910| 88 60 16 0e c2 7f 88 60 | 16 0c 0e 0e 0e 0d d4 5a |.`.....`|.......Z|
|00002920| 7b 16 0b d5 0e 0d 0e 0c | 7b 21 1e 16 d7 0e 0b 0b |{.......|{!......|
|00002930| 5c 22 ab 88 c4 d8 0e 0b | 5c 22 88 aa 97 0e 0b 0e |\"......|\"......|
|00002940| 08 42 16 08 0e 0b 0e 16 | 40 0e 16 41 0e 16 41 45 |.B......|@..A..AE|
|00002950| 44 0b 42 13 29 aa 2f d9 | 0e 0f 21 88 2e 06 0e 08 |D.B.)./.|..!.....|
|00002960| 9f 16 08 c4 da 21 88 db | 0e 1c 21 88 0e 08 10 0e |.....!..|..!.....|
|00002970| 08 ab 90 dd 0e 08 40 c2 | 5c 22 ac 88 0e 08 41 89 |......@.|\"....A.|
|00002980| 16 08 ac 70 0e 08 ac 85 | c4 de 21 aa 83 c4 df 21 |...p....|..!....!|
|00002990| 2a 87 22 20 5b 6e 65 77 | 73 2d 75 73 65 72 2d 67 |*." [new|s-user-g|
|000029a0| 72 6f 75 70 2d 6c 69 73 | 74 20 6e 65 77 73 2d 75 |roup-lis|t news-u|
|000029b0| 70 64 61 74 65 2d 6e 65 | 77 73 72 63 2d 66 69 6c |pdate-ne|wsrc-fil|
|000029c0| 65 20 6e 69 6c 20 6e 65 | 77 73 2d 67 72 6f 75 70 |e nil ne|ws-group|
|000029d0| 2d 61 72 74 69 63 6c 65 | 2d 61 73 73 6f 63 20 6d |-article|-assoc m|
|000029e0| 65 73 73 61 67 65 20 22 | 4c 6f 6f 6b 69 6e 67 20 |essage "|Looking |
|000029f0| 75 70 20 25 73 20 66 69 | 6c 65 2e 2e 2e 22 20 6e |up %s fi|le..." n|
|00002a00| 65 77 73 2d 73 74 61 72 | 74 75 70 2d 66 69 6c 65 |ews-star|tup-file|
|00002a10| 20 73 75 62 73 74 69 74 | 75 74 65 2d 69 6e 2d 66 | substit|ute-in-f|
|00002a20| 69 6c 65 2d 6e 61 6d 65 | 20 74 65 6d 70 2d 75 73 |ile-name| temp-us|
|00002a30| 65 72 2d 67 72 6f 75 70 | 73 20 66 69 6c 65 20 66 |er-group|s file f|
|00002a40| 69 6e 64 2d 66 69 6c 65 | 2d 6e 6f 73 65 6c 65 63 |ind-file|-noselec|
|00002a50| 74 20 74 65 6d 20 65 6e | 64 6f 66 6c 69 6e 65 20 |t tem en|dofline |
|00002a60| 65 6e 64 20 73 74 61 72 | 74 20 6e 65 77 73 72 63 |end star|t newsrc|
|00002a70| 62 75 66 20 30 20 73 65 | 61 72 63 68 2d 66 6f 72 |buf 0 se|arch-for|
|00002a80| 77 61 72 64 20 22 3a 20 | 22 20 74 20 32 20 6e 65 |ward ": |" t 2 ne|
|00002a90| 77 73 2d 70 61 72 73 65 | 2d 72 61 6e 67 65 20 72 |ws-parse|-range r|
|00002aa0| 61 6e 67 65 20 61 73 73 | 6f 63 20 22 59 6f 75 20 |ange ass|oc "You |
|00002ab0| 61 72 65 20 73 75 62 73 | 63 72 69 62 65 64 20 74 |are subs|cribed t|
|00002ac0| 77 69 63 65 20 74 6f 20 | 25 73 3b 20 49 20 69 67 |wice to |%s; I ig|
|00002ad0| 6e 6f 72 65 20 73 65 63 | 6f 6e 64 22 20 6b 69 6c |nore sec|ond" kil|
|00002ae0| 6c 2d 62 75 66 66 65 72 | 20 22 50 72 65 66 72 6f |l-buffer| "Prefro|
|00002af0| 62 6e 69 63 61 74 69 6e | 67 2e 2e 2e 22 20 73 77 |bnicatin|g..." sw|
|00002b00| 69 74 63 68 2d 74 6f 2d | 62 75 66 66 65 72 20 6e |itch-to-|buffer n|
|00002b10| 65 77 73 2d 62 75 66 66 | 65 72 20 6e 65 77 73 2d |ews-buff|er news-|
|00002b20| 72 65 61 64 2d 66 69 6c | 65 73 2d 69 6e 74 6f 2d |read-fil|es-into-|
|00002b30| 62 75 66 66 65 72 20 22 | 4e 6f 20 6e 65 77 73 20 |buffer "|No news |
|00002b40| 69 73 20 67 6f 6f 64 20 | 6e 65 77 73 2e 22 20 22 |is good |news." "|
|00002b50| 22 5d 20 36 20 22 5c 0a | 47 65 74 20 6e 65 77 20 |"] 6 "\.|Get new |
|00002b60| 55 53 45 4e 45 54 20 6e | 65 77 73 2c 20 69 66 20 |USENET n|ews, if |
|00002b70| 74 68 65 72 65 20 69 73 | 20 61 6e 79 20 66 6f 72 |there is| any for|
|00002b80| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 75 73 65 | the cur|rent use|
|00002b90| 72 2e 22 20 6e 69 6c 5d | 29 0a 28 66 73 65 74 20 |r." nil]|).(fset |
|00002ba0| 27 6e 65 77 73 2d 6c 69 | 73 74 2d 6e 65 77 73 2d |'news-li|st-news-|
|00002bb0| 67 72 6f 75 70 73 20 23 | 5b 6e 69 6c 20 22 c0 90 |groups #|[nil "..|
|00002bc0| 8a 09 71 88 c2 63 88 c3 | 63 88 0c c5 1e 06 1e 07 |..q..c..|c.......|
|00002bd0| 0e 07 ad ba c8 0e 07 40 | 0e 09 5c 22 89 1e 5c 6e |.......@|..\"..\n|
|00002be0| 40 63 88 0e 06 ab 83 cb | aa 81 cc 6a 88 cd 0e 5c |@c......|...j...\|
|00002bf0| 6e 41 40 41 40 21 63 88 | 0e 06 ab 85 ce 63 88 aa |nA@A@!c.|.....c..|
|00002c00| 83 cf 6a 88 0e 07 41 16 | 07 0e 06 3f 16 06 29 aa |..j...A.|...?..).|
|00002c10| 42 2b 91 87 22 20 5b 22 | 2a 4e 65 77 73 67 72 6f |B+.." ["|*Newsgro|
|00002c20| 75 70 73 2a 22 20 73 74 | 61 6e 64 61 72 64 2d 6f |ups*" st|andard-o|
|00002c30| 75 74 70 75 74 20 22 4e | 65 77 73 20 47 72 6f 75 |utput "N|ews Grou|
|00002c40| 70 20 20 20 20 20 20 20 | 20 4d 73 67 20 4e 6f 2e |p | Msg No.|
|00002c50| 20 20 20 20 20 20 20 4e | 65 77 73 20 47 72 6f 75 | N|ews Grou|
|00002c60| 70 20 20 20 20 20 20 20 | 20 4d 73 67 20 4e 6f 2e |p | Msg No.|
|00002c70| 5c 6e 22 20 22 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |\n" "---|--------|
|00002c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 20 20 |--------|------ |
|00002c90| 20 20 20 20 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | ---|--------|
|00002ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 5c 6e |--------|------\n|
|00002cb0| 22 20 6e 65 77 73 2d 75 | 73 65 72 2d 67 72 6f 75 |" news-u|ser-grou|
|00002cc0| 70 2d 6c 69 73 74 20 6e | 69 6c 20 66 6c 61 67 20 |p-list n|il flag |
|00002cd0| 74 65 6d 70 20 61 73 73 | 6f 63 20 6e 65 77 73 2d |temp ass|oc news-|
|00002ce0| 67 72 6f 75 70 2d 61 72 | 74 69 63 6c 65 2d 61 73 |group-ar|ticle-as|
|00002cf0| 73 6f 63 20 69 74 65 6d | 20 35 32 20 32 30 20 69 |soc item| 52 20 i|
|00002d00| 6e 74 2d 74 6f 2d 73 74 | 72 69 6e 67 20 22 5c 6e |nt-to-st|ring "\n|
|00002d10| 22 20 33 33 5d 20 35 20 | 22 5c 0a 44 69 73 70 6c |" 33] 5 |"\.Displ|
|00002d20| 61 79 20 61 6c 6c 20 74 | 68 65 20 6e 65 77 73 20 |ay all t|he news |
|00002d30| 67 72 6f 75 70 73 20 74 | 6f 20 77 68 69 63 68 20 |groups t|o which |
|00002d40| 79 6f 75 20 62 65 6c 6f | 6e 67 2e 22 20 6e 69 6c |you belo|ng." nil|
|00002d50| 5d 29 0a 28 66 73 65 74 | 20 27 6e 65 77 73 2d 73 |]).(fset| 'news-s|
|00002d60| 65 74 2d 6d 6f 64 65 2d | 6c 69 6e 65 20 23 5b 6e |et-mode-|line #[n|
|00002d70| 69 6c 20 22 c0 09 a8 ab | 85 c2 09 21 aa 81 c3 c4 |il "....|...!....|
|00002d80| 0d a8 ab 85 c2 0d 21 aa | 81 0d 52 16 06 c7 0e 08 |......!.|..R.....|
|00002d90| c9 ca 89 cb 0e 08 47 5a | 5d 4f 51 16 0c cd ce 21 |......GZ|]OQ....!|
|00002da0| 88 cf ca 21 87 22 20 5b | 22 20 22 20 6e 65 77 73 |...!." [|" " news|
|00002db0| 2d 63 75 72 72 65 6e 74 | 2d 6d 65 73 73 61 67 65 |-current|-message|
|00002dc0| 2d 6e 75 6d 62 65 72 20 | 69 6e 74 2d 74 6f 2d 73 |-number |int-to-s|
|00002dd0| 74 72 69 6e 67 20 22 3f | 3f 22 20 22 2f 22 20 6e |tring "?|?" "/" n|
|00002de0| 65 77 73 2d 63 75 72 72 | 65 6e 74 2d 67 72 6f 75 |ews-curr|ent-grou|
|00002df0| 70 2d 65 6e 64 20 6d 6f | 64 65 2d 6c 69 6e 65 2d |p-end mo|de-line-|
|00002e00| 70 72 6f 63 65 73 73 20 | 22 4e 45 57 53 3a 20 22 |process |"NEWS: "|
|00002e10| 20 6e 65 77 73 2d 63 75 | 72 72 65 6e 74 2d 6e 65 | news-cu|rrent-ne|
|00002e20| 77 73 2d 67 72 6f 75 70 | 20 22 20 20 20 20 20 20 |ws-group| " |
|00002e30| 20 20 20 20 20 20 20 20 | 20 20 20 22 20 30 20 31 | | " 0 1|
|00002e40| 37 20 6d 6f 64 65 2d 6c | 69 6e 65 2d 62 75 66 66 |7 mode-l|ine-buff|
|00002e50| 65 72 2d 69 64 65 6e 74 | 69 66 69 63 61 74 69 6f |er-ident|ificatio|
|00002e60| 6e 20 73 65 74 2d 62 75 | 66 66 65 72 2d 6d 6f 64 |n set-bu|ffer-mod|
|00002e70| 69 66 69 65 64 2d 70 20 | 74 20 73 69 74 2d 66 6f |ified-p |t sit-fo|
|00002e80| 72 5d 20 37 20 22 5c 0a | 53 65 74 20 6d 6f 64 65 |r] 7 "\.|Set mode|
|00002e90| 20 6c 69 6e 65 20 73 74 | 72 69 6e 67 20 74 6f 20 | line st|ring to |
|00002ea0| 73 6f 6d 65 74 68 69 6e | 67 20 75 73 65 66 75 6c |somethin|g useful|
|00002eb0| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 6e 65 77 73 |."]).(fs|et 'news|
|00002ec0| 2d 67 6f 74 6f 2d 6e 65 | 77 73 2d 67 72 6f 75 70 |-goto-ne|ws-group|
|00002ed0| 20 23 5b 28 67 70 29 20 | 22 c0 c1 5c 6e 5c 22 88 | #[(gp) |"..\n\".|
|00002ee0| c3 5c 6e 21 88 c0 c4 5c | 6e 5c 22 87 22 20 5b 6d |.\n!...\|n\"." [m|
|00002ef0| 65 73 73 61 67 65 20 22 | 4a 75 6d 70 69 6e 67 20 |essage "|Jumping |
|00002f00| 74 6f 20 6e 65 77 73 20 | 67 72 6f 75 70 20 25 73 |to news |group %s|
|00002f10| 2e 2e 2e 22 20 67 70 20 | 6e 65 77 73 2d 73 65 6c |..." gp |news-sel|
|00002f20| 65 63 74 2d 6e 65 77 73 | 2d 67 72 6f 75 70 20 22 |ect-news|-group "|
|00002f30| 4a 75 6d 70 69 6e 67 20 | 74 6f 20 6e 65 77 73 20 |Jumping |to news |
|00002f40| 67 72 6f 75 70 20 25 73 | 2e 2e 2e 20 64 6f 6e 65 |group %s|... done|
|00002f50| 2e 22 5d 20 33 20 22 5c | 0a 54 61 6b 65 73 20 61 |."] 3 "\|.Takes a|
|00002f60| 20 73 74 72 69 6e 67 20 | 61 6e 64 20 67 6f 65 73 | string |and goes|
|00002f70| 20 74 6f 20 74 68 61 74 | 20 6e 65 77 73 20 67 72 | to that| news gr|
|00002f80| 6f 75 70 2e 22 20 28 62 | 79 74 65 2d 63 6f 64 65 |oup." (b|yte-code|
|00002f90| 20 22 c0 c1 5c 6e 5c 22 | 43 87 22 20 5b 63 6f 6d | "..\n\"|C." [com|
|00002fa0| 70 6c 65 74 69 6e 67 2d | 72 65 61 64 20 22 4e 65 |pleting-|read "Ne|
|00002fb0| 77 73 47 72 6f 75 70 3a | 20 22 20 6e 65 77 73 2d |wsGroup:| " news-|
|00002fc0| 67 72 6f 75 70 2d 61 72 | 74 69 63 6c 65 2d 61 73 |group-ar|ticle-as|
|00002fd0| 73 6f 63 5d 20 33 29 5d | 29 0a 28 66 73 65 74 20 |soc] 3)]|).(fset |
|00002fe0| 27 6e 65 77 73 2d 73 65 | 6c 65 63 74 2d 6e 65 77 |'news-se|lect-new|
|00002ff0| 73 2d 67 72 6f 75 70 20 | 23 5b 28 67 70 29 20 22 |s-group |#[(gp) "|
|00003000| c0 09 5c 6e 5c 22 89 1b | ac 86 c4 c5 09 5c 22 aa |..\n\"..|.....\".|
|00003010| 96 c0 0e 06 5c 6e 5c 22 | 41 40 41 0e 07 40 41 a0 |....\n\"|A@A..@A.|
|00003020| 88 c8 0b 40 c9 5c 22 88 | ca 20 29 87 22 20 5b 61 |...@.\".|. )." [a|
|00003030| 73 73 6f 63 20 67 70 20 | 6e 65 77 73 2d 67 72 6f |ssoc gp |news-gro|
|00003040| 75 70 2d 61 72 74 69 63 | 6c 65 2d 61 73 73 6f 63 |up-artic|le-assoc|
|00003050| 20 67 72 70 20 65 72 72 | 6f 72 20 22 47 72 6f 75 | grp err|or "Grou|
|00003060| 70 20 25 73 20 6e 6f 74 | 20 73 75 62 73 63 72 69 |p %s not| subscri|
|00003070| 62 65 64 20 74 6f 22 20 | 6e 65 77 73 2d 63 75 72 |bed to" |news-cur|
|00003080| 72 65 6e 74 2d 6e 65 77 | 73 2d 67 72 6f 75 70 20 |rent-new|s-group |
|00003090| 6e 65 77 73 2d 70 6f 69 | 6e 74 2d 70 64 6c 20 6e |news-poi|nt-pdl n|
|000030a0| 65 77 73 2d 72 65 61 64 | 2d 66 69 6c 65 73 2d 69 |ews-read|-files-i|
|000030b0| 6e 74 6f 2d 62 75 66 66 | 65 72 20 6e 69 6c 20 6e |nto-buff|er nil n|
|000030c0| 65 77 73 2d 73 65 74 2d | 6d 6f 64 65 2d 6c 69 6e |ews-set-|mode-lin|
|000030d0| 65 5d 20 34 5d 29 0a 28 | 66 73 65 74 20 27 6e 65 |e] 4]).(|fset 'ne|
|000030e0| 77 73 2d 67 6f 74 6f 2d | 6d 65 73 73 61 67 65 20 |ws-goto-|message |
|000030f0| 23 5b 28 61 72 67 29 20 | 22 08 ac 85 c1 c2 c3 5c |#[(arg) |"......\|
|00003100| 22 14 c5 0c 21 87 22 20 | 5b 63 75 72 72 65 6e 74 |"...!." |[current|
|00003110| 2d 70 72 65 66 69 78 2d | 61 72 67 20 72 65 61 64 |-prefix-|arg read|
|00003120| 2d 6e 6f 2d 62 6c 61 6e | 6b 73 2d 69 6e 70 75 74 |-no-blan|ks-input|
|00003130| 20 22 47 6f 20 74 6f 20 | 61 72 74 69 63 6c 65 3a | "Go to |article:|
|00003140| 20 22 20 22 22 20 61 72 | 67 20 6e 65 77 73 2d 73 | " "" ar|g news-s|
|00003150| 65 6c 65 63 74 2d 6d 65 | 73 73 61 67 65 5d 20 33 |elect-me|ssage] 3|
|00003160| 20 22 5c 0a 47 6f 65 73 | 20 74 6f 20 74 68 65 20 | "\.Goes| to the |
|00003170| 61 72 74 69 63 6c 65 20 | 41 52 47 20 69 6e 20 63 |article |ARG in c|
|00003180| 75 72 72 65 6e 74 20 6e | 65 77 73 67 72 6f 75 70 |urrent n|ewsgroup|
|00003190| 2e 22 20 22 70 22 5d 29 | 0a 28 66 73 65 74 20 27 |." "p"])|.(fset '|
|000031a0| 6e 65 77 73 2d 73 65 6c | 65 63 74 2d 6d 65 73 73 |news-sel|ect-mess|
|000031b0| 61 67 65 20 23 5b 28 61 | 72 67 29 20 22 08 3b ab |age #[(a|rg) ".;.|
|000031c0| 84 c1 08 21 10 5c 6e c3 | c4 c5 0e 06 23 c7 08 52 |...!.\n.|....#..R|
|000031d0| 1e 08 c9 0e 08 21 ab a6 | ca 1e 0b 08 0e 0c 40 41 |.....!..|......@A|
|000031e0| 0e 0d 3e 41 40 ae 81 ce | 55 ab 86 0e 0c 40 08 a1 |..>A@...|U....@..|
|000031f0| 88 08 16 0f d0 0e 08 21 | 88 d1 20 29 aa 84 d2 d3 |.......!|.. )....|
|00003200| 08 5c 22 29 87 22 20 5b | 61 72 67 20 73 74 72 69 |.\")." [|arg stri|
|00003210| 6e 67 2d 74 6f 2d 69 6e | 74 20 6e 65 77 73 2d 70 |ng-to-in|t news-p|
|00003220| 61 74 68 20 73 74 72 69 | 6e 67 2d 73 75 62 73 74 |ath stri|ng-subst|
|00003230| 2d 63 68 61 72 20 34 37 | 20 34 36 20 6e 65 77 73 |-char 47| 46 news|
|00003240| 2d 63 75 72 72 65 6e 74 | 2d 6e 65 77 73 2d 67 72 |-current|-news-gr|
|00003250| 6f 75 70 20 22 2f 22 20 | 66 69 6c 65 20 66 69 6c |oup "/" |file fil|
|00003260| 65 2d 65 78 69 73 74 73 | 2d 70 20 6e 69 6c 20 62 |e-exists|-p nil b|
|00003270| 75 66 66 65 72 2d 72 65 | 61 64 2d 6f 6e 6c 79 20 |uffer-re|ad-only |
|00003280| 6e 65 77 73 2d 70 6f 69 | 6e 74 2d 70 64 6c 20 6e |news-poi|nt-pdl n|
|00003290| 65 77 73 2d 6c 69 73 74 | 2d 6f 66 2d 66 69 6c 65 |ews-list|-of-file|
|000032a0| 73 20 30 20 6e 65 77 73 | 2d 63 75 72 72 65 6e 74 |s 0 news|-current|
|000032b0| 2d 6d 65 73 73 61 67 65 | 2d 6e 75 6d 62 65 72 20 |-message|-number |
|000032c0| 6e 65 77 73 2d 72 65 61 | 64 2d 69 6e 2d 66 69 6c |news-rea|d-in-fil|
|000032d0| 65 20 6e 65 77 73 2d 73 | 65 74 2d 6d 6f 64 65 2d |e news-s|et-mode-|
|000032e0| 6c 69 6e 65 20 65 72 72 | 6f 72 20 22 41 72 74 69 |line err|or "Arti|
|000032f0| 63 6c 65 20 25 64 20 6e | 6f 6e 65 78 69 73 74 65 |cle %d n|onexiste|
|00003300| 6e 74 22 5d 20 35 5d 29 | 0a 28 66 73 65 74 20 27 |nt"] 5])|.(fset '|
|00003310| 6e 65 77 73 2d 66 6f 72 | 63 65 2d 75 70 64 61 74 |news-for|ce-updat|
|00003320| 65 20 23 5b 6e 69 6c 20 | 22 08 40 09 a1 88 c2 c3 |e #[nil |".@.....|
|00003330| 09 5c 22 87 22 20 5b 6e | 65 77 73 2d 70 6f 69 6e |.\"." [n|ews-poin|
|00003340| 74 2d 70 64 6c 20 6e 65 | 77 73 2d 63 75 72 72 65 |t-pdl ne|ws-curre|
|00003350| 6e 74 2d 6d 65 73 73 61 | 67 65 2d 6e 75 6d 62 65 |nt-messa|ge-numbe|
|00003360| 72 20 6d 65 73 73 61 67 | 65 20 22 55 70 64 61 74 |r messag|e "Updat|
|00003370| 65 64 20 74 6f 20 25 64 | 22 5d 20 33 20 22 5c 0a |ed to %d|"] 3 "\.|
|00003380| 75 70 64 61 74 65 73 20 | 74 68 65 20 70 6f 73 69 |updates |the posi|
|00003390| 74 69 6f 6e 20 6f 66 20 | 6c 61 73 74 20 61 72 74 |tion of |last art|
|000033a0| 69 63 6c 65 20 72 65 61 | 64 20 69 6e 20 74 68 65 |icle rea|d in the|
|000033b0| 20 63 75 72 72 65 6e 74 | 20 6e 65 77 73 20 67 72 | current| news gr|
|000033c0| 6f 75 70 22 20 6e 69 6c | 5d 29 0a 28 66 73 65 74 |oup" nil|]).(fset|
|000033d0| 20 27 6e 65 77 73 2d 6e | 65 78 74 2d 6d 65 73 73 | 'news-n|ext-mess|
|000033e0| 61 67 65 20 23 5b 28 61 | 72 67 29 20 22 08 09 5c |age #[(a|rg) "..\|
|000033f0| 5c 89 1a 0b 57 ac 85 5c | 6e 0c 56 ab 9a 08 c5 55 |\...W..\|n.V....U|
|00003400| ab 87 c6 20 88 c7 20 aa | af 08 c8 55 ab 84 c9 20 |... .. .|...U... |
|00003410| aa a6 ca cb 21 aa a1 cc | 09 0e 0d 5c 22 1e 0e 08 |....!...|...\"...|
|00003420| cf 57 ab 8c d0 08 5b 53 | 0e 0e 41 40 38 21 aa 88 |.W....[S|..A@8!..|
|00003430| d0 08 53 0e 0e 40 38 21 | 29 29 87 22 20 5b 61 72 |..S..@8!|))." [ar|
|00003440| 67 20 6e 65 77 73 2d 63 | 75 72 72 65 6e 74 2d 6d |g news-c|urrent-m|
|00003450| 65 73 73 61 67 65 2d 6e | 75 6d 62 65 72 20 6e 6f |essage-n|umber no|
|00003460| 20 6e 65 77 73 2d 63 75 | 72 72 65 6e 74 2d 67 72 | news-cu|rrent-gr|
|00003470| 6f 75 70 2d 62 65 67 69 | 6e 20 6e 65 77 73 2d 63 |oup-begi|n news-c|
|00003480| 75 72 72 65 6e 74 2d 67 | 72 6f 75 70 2d 65 6e 64 |urrent-g|roup-end|
|00003490| 20 31 20 6e 65 77 73 2d | 73 65 74 2d 63 75 72 72 | 1 news-|set-curr|
|000034a0| 65 6e 74 2d 67 72 6f 75 | 70 2d 63 65 72 74 69 66 |ent-grou|p-certif|
|000034b0| 69 63 61 74 69 6f 6e 20 | 6e 65 77 73 2d 6e 65 78 |ication |news-nex|
|000034c0| 74 2d 67 72 6f 75 70 20 | 2d 31 20 6e 65 77 73 2d |t-group |-1 news-|
|000034d0| 70 72 65 76 69 6f 75 73 | 2d 67 72 6f 75 70 20 65 |previous|-group e|
|000034e0| 72 72 6f 72 20 22 41 72 | 74 69 63 6c 65 20 6f 75 |rror "Ar|ticle ou|
|000034f0| 74 20 6f 66 20 72 61 6e | 67 65 22 20 6e 65 77 73 |t of ran|ge" news|
|00003500| 2d 67 65 74 2d 6d 6f 74 | 69 6f 6e 2d 6c 69 73 74 |-get-mot|ion-list|
|00003510| 73 20 6e 65 77 73 2d 6c | 69 73 74 2d 6f 66 2d 66 |s news-l|ist-of-f|
|00003520| 69 6c 65 73 20 70 6c 69 | 73 74 20 30 20 6e 65 77 |iles pli|st 0 new|
|00003530| 73 2d 73 65 6c 65 63 74 | 2d 6d 65 73 73 61 67 65 |s-select|-message|
|00003540| 5d 20 34 20 22 5c 0a 4d | 6f 76 65 20 41 52 47 20 |] 4 "\.M|ove ARG |
|00003550| 6d 65 73 73 61 67 65 73 | 20 66 6f 72 77 61 72 64 |messages| forward|
|00003560| 20 77 69 74 68 69 6e 20 | 6f 6e 65 20 6e 65 77 73 | within |one news|
|00003570| 67 72 6f 75 70 2e 0a 4e | 65 67 61 74 69 76 65 20 |group..N|egative |
|00003580| 41 52 47 20 6d 6f 76 65 | 73 20 62 61 63 6b 77 61 |ARG move|s backwa|
|00003590| 72 64 2e 0a 49 66 20 41 | 52 47 20 69 73 20 31 20 |rd..If A|RG is 1 |
|000035a0| 6f 72 20 2d 31 2c 20 6d | 6f 76 65 73 20 74 6f 20 |or -1, m|oves to |
|000035b0| 6e 65 78 74 20 6f 72 20 | 70 72 65 76 69 6f 75 73 |next or |previous|
|000035c0| 20 6e 65 77 73 67 72 6f | 75 70 20 69 66 20 61 74 | newsgro|up if at|
|000035d0| 20 65 6e 64 2e 22 20 22 | 70 22 5d 29 0a 28 66 73 | end." "|p"]).(fs|
|000035e0| 65 74 20 27 6e 65 77 73 | 2d 70 72 65 76 69 6f 75 |et 'news|-previou|
|000035f0| 73 2d 6d 65 73 73 61 67 | 65 20 23 5b 28 61 72 67 |s-messag|e #[(arg|
|00003600| 29 20 22 c0 09 5b 21 87 | 22 20 5b 6e 65 77 73 2d |) "..[!.|" [news-|
|00003610| 6e 65 78 74 2d 6d 65 73 | 73 61 67 65 20 61 72 67 |next-mes|sage arg|
|00003620| 5d 20 32 20 22 5c 0a 4d | 6f 76 65 20 41 52 47 20 |] 2 "\.M|ove ARG |
|00003630| 6d 65 73 73 61 67 65 73 | 20 62 61 63 6b 77 61 72 |messages| backwar|
|00003640| 64 20 69 6e 20 63 75 72 | 72 65 6e 74 20 6e 65 77 |d in cur|rent new|
|00003650| 73 67 72 6f 75 70 2e 0a | 57 69 74 68 20 6e 6f 20 |sgroup..|With no |
|00003660| 61 72 67 20 6f 72 20 61 | 72 67 20 6f 66 20 31 2c |arg or a|rg of 1,|
|00003670| 20 6d 6f 76 65 20 6f 6e | 65 20 6d 65 73 73 61 67 | move on|e messag|
|00003680| 65 0a 61 6e 64 20 6d 6f | 76 65 20 74 6f 20 70 72 |e.and mo|ve to pr|
|00003690| 65 76 69 6f 75 73 20 6e | 65 77 73 67 72 6f 75 70 |evious n|ewsgroup|
|000036a0| 20 69 66 20 61 74 20 62 | 65 67 69 6e 6e 69 6e 67 | if at b|eginning|
|000036b0| 2e 0a 41 20 6e 65 67 61 | 74 69 76 65 20 41 52 47 |..A nega|tive ARG|
|000036c0| 20 6d 65 61 6e 73 20 6d | 6f 76 65 20 66 6f 72 77 | means m|ove forw|
|000036d0| 61 72 64 2e 22 20 22 70 | 22 5d 29 0a 28 66 73 65 |ard." "p|"]).(fse|
|000036e0| 74 20 27 6e 65 77 73 2d | 6d 6f 76 65 2d 74 6f 2d |t 'news-|move-to-|
|000036f0| 67 72 6f 75 70 20 23 5b | 28 61 72 67 29 20 22 08 |group #[|(arg) ".|
|00003700| 19 c2 09 0b 5c 22 c4 1d | 1e 06 0e 07 c8 57 ab 93 |....\"..|.....W..|
|00003710| 0e 07 5b 53 0e 06 41 40 | 38 89 15 ac 94 c9 ca 21 |..[S..A@|8......!|
|00003720| 88 aa 8e 0e 07 0e 06 40 | 38 89 15 ac 84 c9 cb 21 |.......@|8......!|
|00003730| 88 cc 0d 21 2b 87 22 20 | 5b 6e 65 77 73 2d 63 75 |...!+." |[news-cu|
|00003740| 72 72 65 6e 74 2d 6e 65 | 77 73 2d 67 72 6f 75 70 |rrent-ne|ws-group|
|00003750| 20 63 67 20 6e 65 77 73 | 2d 67 65 74 2d 6d 6f 74 | cg news|-get-mot|
|00003760| 69 6f 6e 2d 6c 69 73 74 | 73 20 6e 65 77 73 2d 75 |ion-list|s news-u|
|00003770| 73 65 72 2d 67 72 6f 75 | 70 2d 6c 69 73 74 20 6e |ser-grou|p-list n|
|00003780| 69 6c 20 6e 67 72 70 20 | 70 6c 69 73 74 20 61 72 |il ngrp |plist ar|
|00003790| 67 20 30 20 65 72 72 6f | 72 20 22 4e 6f 20 70 72 |g 0 erro|r "No pr|
|000037a0| 65 76 69 6f 75 73 20 6e | 65 77 73 20 67 72 6f 75 |evious n|ews grou|
|000037b0| 70 73 22 20 22 4e 6f 20 | 6d 6f 72 65 20 6e 65 77 |ps" "No |more new|
|000037c0| 73 20 67 72 6f 75 70 73 | 22 20 6e 65 77 73 2d 73 |s groups|" news-s|
|000037d0| 65 6c 65 63 74 2d 6e 65 | 77 73 2d 67 72 6f 75 70 |elect-ne|ws-group|
|000037e0| 5d 20 33 20 22 5c 0a 47 | 69 76 65 6e 20 61 72 67 |] 3 "\.G|iven arg|
|000037f0| 20 6d 6f 76 65 20 66 6f | 72 77 61 72 64 20 6f 72 | move fo|rward or|
|00003800| 20 62 61 63 6b 77 61 72 | 64 20 74 6f 20 61 20 6e | backwar|d to a n|
|00003810| 65 77 20 6e 65 77 73 67 | 72 6f 75 70 2e 22 5d 29 |ew newsg|roup."])|
|00003820| 0a 28 66 73 65 74 20 27 | 6e 65 77 73 2d 6e 65 78 |.(fset '|news-nex|
|00003830| 74 2d 67 72 6f 75 70 20 | 23 5b 6e 69 6c 20 22 c0 |t-group |#[nil ".|
|00003840| c1 21 88 5c 6e 3f ad 86 | c0 c1 21 88 aa 76 87 22 |.!.\n?..|..!..v."|
|00003850| 20 5b 6e 65 77 73 2d 6d | 6f 76 65 2d 74 6f 2d 67 | [news-m|ove-to-g|
|00003860| 72 6f 75 70 20 30 20 6e | 65 77 73 2d 6c 69 73 74 |roup 0 n|ews-list|
|00003870| 2d 6f 66 2d 66 69 6c 65 | 73 5d 20 32 20 22 5c 0a |-of-file|s] 2 "\.|
|00003880| 4d 6f 76 65 73 20 74 6f | 20 74 68 65 20 6e 65 78 |Moves to| the nex|
|00003890| 74 20 75 73 65 72 20 67 | 72 6f 75 70 2e 22 20 6e |t user g|roup." n|
|000038a0| 69 6c 5d 29 0a 28 66 73 | 65 74 20 27 6e 65 77 73 |il]).(fs|et 'news|
|000038b0| 2d 70 72 65 76 69 6f 75 | 73 2d 67 72 6f 75 70 20 |-previou|s-group |
|000038c0| 23 5b 6e 69 6c 20 22 c0 | c1 21 88 5c 6e 3f ad 86 |#[nil ".|.!.\n?..|
|000038d0| c0 c1 21 88 aa 76 87 22 | 20 5b 6e 65 77 73 2d 6d |..!..v."| [news-m|
|000038e0| 6f 76 65 2d 74 6f 2d 67 | 72 6f 75 70 20 2d 31 20 |ove-to-g|roup -1 |
|000038f0| 6e 65 77 73 2d 6c 69 73 | 74 2d 6f 66 2d 66 69 6c |news-lis|t-of-fil|
|00003900| 65 73 5d 20 32 20 22 5c | 0a 4d 6f 76 65 73 20 74 |es] 2 "\|.Moves t|
|00003910| 6f 20 74 68 65 20 70 72 | 65 76 69 6f 75 73 20 75 |o the pr|evious u|
|00003920| 73 65 72 20 67 72 6f 75 | 70 2e 22 20 6e 69 6c 5d |ser grou|p." nil]|
|00003930| 29 0a 28 66 73 65 74 20 | 27 6e 65 77 73 2d 67 65 |).(fset |'news-ge|
|00003940| 74 2d 6d 6f 74 69 6f 6e | 2d 6c 69 73 74 73 20 23 |t-motion|-lists #|
|00003950| 5b 28 61 72 67 20 6c 69 | 73 74 79 29 20 22 08 c1 |[(arg li|sty) "..|
|00003960| 1a 1b c4 c5 8d 2a 87 22 | 20 5b 6c 69 73 74 79 20 |.....*."| [listy |
|00003970| 6e 69 6c 20 72 65 73 75 | 6c 74 20 74 65 6d 70 20 |nil resu|lt temp |
|00003980| 6f 75 74 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |out (byt|e-code "|
|00003990| 08 ad 9e 08 40 09 9a ab | 8b c2 c3 08 41 0c 43 42 |....@...|....A.CB|
|000039a0| 5c 22 88 aa 6c 08 40 43 | 0c a4 14 08 41 89 10 ac |\"..l.@C|....A...|
|000039b0| 63 c5 87 22 20 5b 74 65 | 6d 70 20 61 72 67 20 74 |c.." [te|mp arg t|
|000039c0| 68 72 6f 77 20 6f 75 74 | 20 72 65 73 75 6c 74 20 |hrow out| result |
|000039d0| 6e 69 6c 5d 20 35 29 5d | 20 32 20 22 5c 0a 47 69 |nil] 5)]| 2 "\.Gi|
|000039e0| 76 65 6e 20 61 20 6d 73 | 67 6e 75 6d 62 65 72 2f |ven a ms|gnumber/|
|000039f0| 67 72 6f 75 70 20 74 68 | 69 73 20 77 69 6c 6c 20 |group th|is will |
|00003a00| 72 65 74 75 72 6e 20 61 | 20 6c 69 73 74 20 6f 66 |return a| list of|
|00003a10| 20 74 77 6f 20 6c 69 73 | 74 73 3b 0a 6f 6e 65 20 | two lis|ts;.one |
|00003a20| 66 6f 72 20 6d 6f 76 69 | 6e 67 20 66 6f 72 77 61 |for movi|ng forwa|
|00003a30| 72 64 20 61 6e 64 20 6f | 6e 65 20 66 6f 72 20 6d |rd and o|ne for m|
|00003a40| 6f 76 69 6e 67 20 62 61 | 63 6b 77 61 72 64 2e 22 |oving ba|ckward."|
|00003a50| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|00003a60| c1 4d 88 c2 c3 4d 87 22 | 20 5b 6e 65 77 73 2d 72 |.M...M."| [news-r|
|00003a70| 65 61 64 2d 69 6e 2d 66 | 69 6c 65 20 23 5b 28 66 |ead-in-f|ile #[(f|
|00003a80| 69 6c 65 6e 61 6d 65 29 | 20 22 c0 20 88 60 19 c2 |ilename)| ". .`..|
|00003a90| 0b 21 88 c4 20 88 0d 89 | 1e 06 ab 9b 09 62 88 c7 |.!.. ...|.....b..|
|00003aa0| 0e 06 40 40 0e 08 5c 22 | ab 86 0e 06 40 41 20 88 |..@@..\"|....@A .|
|00003ab0| 0e 06 41 89 16 06 ac 65 | 29 09 62 88 c9 79 88 6d |..A....e|).b..y.m|
|00003ac0| ab 85 ca cb 21 aa 82 09 | 62 29 87 22 20 5b 65 72 |....!...|b)." [er|
|00003ad0| 61 73 65 2d 62 75 66 66 | 65 72 20 73 74 61 72 74 |ase-buff|er start|
|00003ae0| 20 69 6e 73 65 72 74 2d | 66 69 6c 65 2d 63 6f 6e | insert-|file-con|
|00003af0| 74 65 6e 74 73 20 66 69 | 6c 65 6e 61 6d 65 20 6e |tents fi|lename n|
|00003b00| 65 77 73 2d 63 6f 6e 76 | 65 72 74 2d 66 6f 72 6d |ews-conv|ert-form|
|00003b10| 61 74 20 6e 65 77 73 2d | 67 72 6f 75 70 2d 68 6f |at news-|group-ho|
|00003b20| 6f 6b 2d 61 6c 69 73 74 | 20 68 6f 6f 6b 73 20 73 |ok-alist| hooks s|
|00003b30| 74 72 69 6e 67 2d 6d 61 | 74 63 68 20 6e 65 77 73 |tring-ma|tch news|
|00003b40| 2d 67 72 6f 75 70 2d 6e | 61 6d 65 20 31 20 6d 65 |-group-n|ame 1 me|
|00003b50| 73 73 61 67 65 20 22 28 | 45 6d 70 74 79 20 66 69 |ssage "(|Empty fi|
|00003b60| 6c 65 3f 29 22 5d 20 34 | 5d 20 6e 65 77 73 2d 63 |le?)"] 4|] news-c|
|00003b70| 6f 6e 76 65 72 74 2d 66 | 6f 72 6d 61 74 20 23 5b |onvert-f|ormat #[|
|00003b80| 6e 69 6c 20 22 8a 8c 60 | 18 c1 c2 c3 8f 1c c1 1d |nil "..`|........|
|00003b90| c1 1e 06 0c ad aa 08 0c | 7d 88 08 62 88 c7 c8 c1 |........|}..b....|
|00003ba0| c9 23 89 15 ac 94 0e 06 | ab 90 08 62 88 c7 ca 21 |.#......|...b...!|
|00003bb0| 88 cb 79 88 cc 20 88 cc | 20 88 cd 08 21 88 08 62 |..y.. ..| ...!..b|
|00003bc0| 2e 06 87 22 20 5b 73 74 | 61 72 74 20 6e 69 6c 20 |..." [st|art nil |
|00003bd0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 21 88 |(byte-co|de "..!.|
|00003be0| 60 87 22 20 5b 73 65 61 | 72 63 68 2d 66 6f 72 77 |`." [sea|rch-forw|
|00003bf0| 61 72 64 20 22 5c 6e 5c | 6e 22 5d 20 32 29 20 28 |ard "\n\|n"] 2) (|
|00003c00| 28 65 72 72 6f 72 29 29 | 20 65 6e 64 20 68 61 73 |(error))| end has|
|00003c10| 2d 66 72 6f 6d 20 68 61 | 73 2d 64 61 74 65 20 73 |-from ha|s-date s|
|00003c20| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 5c |earch-fo|rward "\|
|00003c30| 6e 46 72 6f 6d 3a 22 20 | 74 20 22 5c 6e 44 61 74 |nFrom:" |t "\nDat|
|00003c40| 65 3a 22 20 30 20 6b 69 | 6c 6c 2d 6c 69 6e 65 20 |e:" 0 ki|ll-line |
|00003c50| 6e 65 77 73 2d 64 65 6c | 65 74 65 2d 68 65 61 64 |news-del|ete-head|
|00003c60| 65 72 73 5d 20 35 5d 5d | 20 32 29 0a 28 66 73 65 |ers] 5]]| 2).(fse|
|00003c70| 74 20 27 6e 65 77 73 2d | 73 68 6f 77 2d 61 6c 6c |t 'news-|show-all|
|00003c80| 2d 68 65 61 64 65 72 73 | 20 23 5b 6e 69 6c 20 22 |-headers| #[nil "|
|00003c90| c0 89 19 1a c3 20 88 c4 | 20 88 c5 0e 06 c7 c8 c9 |..... ..| .......|
|00003ca0| 0e 5c 6e 23 cb cc 0e 0d | 21 52 21 2a 87 22 20 5b |.\n#....|!R!*." [|
|00003cb0| 6e 69 6c 20 62 75 66 66 | 65 72 2d 72 65 61 64 2d |nil buff|er-read-|
|00003cc0| 6f 6e 6c 79 20 6e 65 77 | 73 2d 69 67 6e 6f 72 65 |only new|s-ignore|
|00003cd0| 64 2d 68 65 61 64 65 72 | 73 20 65 72 61 73 65 2d |d-header|s erase-|
|00003ce0| 62 75 66 66 65 72 20 6e | 65 77 73 2d 73 65 74 2d |buffer n|ews-set-|
|00003cf0| 6d 6f 64 65 2d 6c 69 6e | 65 20 6e 65 77 73 2d 72 |mode-lin|e news-r|
|00003d00| 65 61 64 2d 69 6e 2d 66 | 69 6c 65 20 6e 65 77 73 |ead-in-f|ile news|
|00003d10| 2d 70 61 74 68 20 73 74 | 72 69 6e 67 2d 73 75 62 |-path st|ring-sub|
|00003d20| 73 74 2d 63 68 61 72 20 | 34 37 20 34 36 20 6e 65 |st-char |47 46 ne|
|00003d30| 77 73 2d 63 75 72 72 65 | 6e 74 2d 6e 65 77 73 2d |ws-curre|nt-news-|
|00003d40| 67 72 6f 75 70 20 22 2f | 22 20 69 6e 74 2d 74 6f |group "/|" int-to|
|00003d50| 2d 73 74 72 69 6e 67 20 | 6e 65 77 73 2d 63 75 72 |-string |news-cur|
|00003d60| 72 65 6e 74 2d 6d 65 73 | 73 61 67 65 2d 6e 75 6d |rent-mes|sage-num|
|00003d70| 62 65 72 5d 20 36 20 22 | 5c 0a 52 65 64 69 73 70 |ber] 6 "|\.Redisp|
|00003d80| 6c 61 79 20 63 75 72 72 | 65 6e 74 20 6e 65 77 73 |lay curr|ent news|
|00003d90| 20 69 74 65 6d 20 77 69 | 74 68 20 61 6c 6c 20 6f | item wi|th all o|
|00003da0| 72 69 67 69 6e 61 6c 20 | 68 65 61 64 65 72 73 22 |riginal |headers"|
|00003db0| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 6e 65 | nil]).(|fset 'ne|
|00003dc0| 77 73 2d 64 65 6c 65 74 | 65 2d 68 65 61 64 65 72 |ws-delet|e-header|
|00003dd0| 73 20 23 5b 28 70 6f 73 | 29 20 22 08 62 88 09 3b |s #[(pos|) ".b..;|
|00003de0| ad 97 c2 09 c3 c4 23 ad | 90 c5 79 88 60 c2 c6 21 |......#.|..y.`..!|
|00003df0| 88 c7 75 88 60 7c 88 aa | 69 87 22 20 5b 70 6f 73 |..u.`|..|i." [pos|
|00003e00| 20 6e 65 77 73 2d 69 67 | 6e 6f 72 65 64 2d 68 65 | news-ig|nored-he|
|00003e10| 61 64 65 72 73 20 72 65 | 2d 73 65 61 72 63 68 2d |aders re|-search-|
|00003e20| 66 6f 72 77 61 72 64 20 | 6e 69 6c 20 74 20 30 20 |forward |nil t 0 |
|00003e30| 22 5c 6e 5b 5e 20 09 5d | 22 20 2d 31 5d 20 34 5d |"\n[^ .]|" -1] 4]|
|00003e40| 29 0a 28 66 73 65 74 20 | 27 6e 65 77 73 2d 65 78 |).(fset |'news-ex|
|00003e50| 69 74 20 23 5b 6e 69 6c | 20 22 c0 c1 21 ab a7 c2 |it #[nil| "..!...|
|00003e60| c3 0c 5c 22 88 c5 20 88 | c6 20 88 c2 c7 0c 5c 22 |..\".. .|. ....\"|
|00003e70| 88 c2 c8 21 88 c9 ca 21 | ab 84 ca 70 21 88 cb 0e |...!...!|...p!...|
|00003e80| 0c 21 88 cd 89 16 0e 87 | c2 cf 21 87 22 20 5b 79 |.!......|..!." [y|
|00003e90| 2d 6f 72 2d 6e 2d 70 20 | 22 44 6f 20 79 6f 75 20 |-or-n-p |"Do you |
|00003ea0| 72 65 61 6c 6c 79 20 77 | 61 6e 6e 61 20 71 75 69 |really w|anna qui|
|00003eb0| 74 20 72 65 61 64 69 6e | 67 20 6e 65 77 73 20 3f |t readin|g news ?|
|00003ec0| 20 22 20 6d 65 73 73 61 | 67 65 20 22 55 70 64 61 | " messa|ge "Upda|
|00003ed0| 74 69 6e 67 20 25 73 2e | 2e 2e 22 20 6e 65 77 73 |ting %s.|.." news|
|00003ee0| 2d 73 74 61 72 74 75 70 | 2d 66 69 6c 65 20 6e 65 |-startup|-file ne|
|00003ef0| 77 73 2d 75 70 64 61 74 | 65 2d 6e 65 77 73 72 63 |ws-updat|e-newsrc|
|00003f00| 2d 66 69 6c 65 20 6e 65 | 77 73 2d 77 72 69 74 65 |-file ne|ws-write|
|00003f10| 2d 63 65 72 74 69 66 69 | 63 61 74 69 6f 6e 73 20 |-certifi|cations |
|00003f20| 22 55 70 64 61 74 69 6e | 67 20 25 73 2e 2e 2e 20 |"Updatin|g %s... |
|00003f30| 64 6f 6e 65 22 20 22 4e | 6f 77 20 64 6f 20 73 6f |done" "N|ow do so|
|00003f40| 6d 65 20 72 65 61 6c 20 | 77 6f 72 6b 22 20 66 62 |me real |work" fb|
|00003f50| 6f 75 6e 64 70 20 62 75 | 72 79 2d 62 75 66 66 65 |oundp bu|ry-buffe|
|00003f60| 72 20 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |r switch|-to-buff|
|00003f70| 65 72 20 6e 65 77 73 2d | 62 75 66 66 65 72 2d 73 |er news-|buffer-s|
|00003f80| 61 76 65 20 6e 69 6c 20 | 6e 65 77 73 2d 75 73 65 |ave nil |news-use|
|00003f90| 72 2d 67 72 6f 75 70 2d | 6c 69 73 74 20 22 22 5d |r-group-|list ""]|
|00003fa0| 20 33 20 22 5c 0a 51 75 | 69 74 20 6e 65 77 73 20 | 3 "\.Qu|it news |
|00003fb0| 72 65 61 64 69 6e 67 20 | 73 65 73 73 69 6f 6e 20 |reading |session |
|00003fc0| 61 6e 64 20 75 70 64 61 | 74 65 20 74 68 65 20 2e |and upda|te the .|
|00003fd0| 6e 65 77 73 72 63 20 66 | 69 6c 65 2e 22 20 6e 69 |newsrc f|ile." ni|
|00003fe0| 6c 5d 29 0a 28 66 73 65 | 74 20 27 6e 65 77 73 2d |l]).(fse|t 'news-|
|00003ff0| 75 70 64 61 74 65 2d 6e | 65 77 73 72 63 2d 66 69 |update-n|ewsrc-fi|
|00004000| 6c 65 20 23 5b 6e 69 6c | 20 22 c0 c1 5c 6e 21 21 |le #[nil| "..\n!!|
|00004010| 0b c4 1d 1e 06 1e 07 8a | 0e 08 ab 8f c9 0e 08 0e |........|........|
|00004020| 5c 6e 5c 22 41 40 41 0e | 0b 40 41 a0 88 0e 07 71 |\n\"A@A.|.@A....q|
|00004030| 88 0e 06 ab cc c9 0e 06 | 40 0e 5c 6e 5c 22 89 15 |........|@.\n\"..|
|00004040| 41 40 41 40 0d 41 40 41 | 41 40 55 ac ae cc 62 88 |A@A@.A@A|A@U...b.|
|00004050| cd 0d 40 ce 50 c4 cf 23 | ab 86 d0 c4 21 88 aa 8a |..@.P..#|....!...|
|00004060| 0d 40 d1 b1 02 88 d2 d3 | 21 88 d4 0d 41 40 40 21 |.@......|!...A@@!|
|00004070| d5 d4 0d 41 40 41 40 21 | b1 03 88 0e 06 41 89 16 |...A@A@!|.....A..|
|00004080| 06 ac 34 0e 16 ab b7 c9 | 0e 16 40 0e 5c 6e 5c 22 |..4.....|..@.\n\"|
|00004090| 15 cc 62 88 cd 0d 40 ce | 50 c4 cf 23 ab 9a d2 d7 |..b...@.|P..#....|
|000040a0| 21 88 d0 c4 21 88 d8 d4 | 0d 41 40 40 21 d5 d4 0d |!...!...|.A@@!...|
|000040b0| 41 40 41 40 21 b1 04 88 | 0e 16 41 89 16 16 ac 49 |A@A@!...|..A....I|
|000040c0| d9 20 88 da 70 21 2c 87 | 22 20 5b 66 69 6e 64 2d |. ..p!,.|" [find-|
|000040d0| 66 69 6c 65 2d 6e 6f 73 | 65 6c 65 63 74 20 73 75 |file-nos|elect su|
|000040e0| 62 73 74 69 74 75 74 65 | 2d 69 6e 2d 66 69 6c 65 |bstitute|-in-file|
|000040f0| 2d 6e 61 6d 65 20 6e 65 | 77 73 2d 73 74 61 72 74 |-name ne|ws-start|
|00004100| 75 70 2d 66 69 6c 65 20 | 6e 65 77 73 2d 75 73 65 |up-file |news-use|
|00004110| 72 2d 67 72 6f 75 70 2d | 6c 69 73 74 20 6e 69 6c |r-group-|list nil|
|00004120| 20 67 72 6f 75 70 20 74 | 65 6d 20 6e 65 77 73 72 | group t|em newsr|
|00004130| 63 62 75 66 20 6e 65 77 | 73 2d 63 75 72 72 65 6e |cbuf new|s-curren|
|00004140| 74 2d 6e 65 77 73 2d 67 | 72 6f 75 70 20 61 73 73 |t-news-g|roup ass|
|00004150| 6f 63 20 6e 65 77 73 2d | 67 72 6f 75 70 2d 61 72 |oc news-|group-ar|
|00004160| 74 69 63 6c 65 2d 61 73 | 73 6f 63 20 6e 65 77 73 |ticle-as|soc news|
|00004170| 2d 70 6f 69 6e 74 2d 70 | 64 6c 20 30 20 73 65 61 |-point-p|dl 0 sea|
|00004180| 72 63 68 2d 66 6f 72 77 | 61 72 64 20 22 3a 20 22 |rch-forw|ard ": "|
|00004190| 20 74 20 6b 69 6c 6c 2d | 6c 69 6e 65 20 22 3a 20 | t kill-|line ": |
|000041a0| 5c 6e 22 20 62 61 63 6b | 77 61 72 64 2d 63 68 61 |\n" back|ward-cha|
|000041b0| 72 20 31 20 69 6e 74 2d | 74 6f 2d 73 74 72 69 6e |r 1 int-|to-strin|
|000041c0| 67 20 22 2d 22 20 6e 65 | 77 73 2d 75 6e 73 75 62 |g "-" ne|ws-unsub|
|000041d0| 73 63 72 69 62 65 2d 67 | 72 6f 75 70 73 20 32 20 |scribe-g|roups 2 |
|000041e0| 22 21 20 22 20 73 61 76 | 65 2d 62 75 66 66 65 72 |"! " sav|e-buffer|
|000041f0| 20 6b 69 6c 6c 2d 62 75 | 66 66 65 72 5d 20 36 20 | kill-bu|ffer] 6 |
|00004200| 22 5c 0a 55 70 64 61 74 | 65 73 20 74 68 65 20 2e |"\.Updat|es the .|
|00004210| 6e 65 77 73 72 63 20 66 | 69 6c 65 20 69 6e 20 74 |newsrc f|ile in t|
|00004220| 68 65 20 75 73 65 72 73 | 20 68 6f 6d 65 20 64 69 |he users| home di|
|00004230| 72 2e 22 5d 29 0a 28 66 | 73 65 74 20 27 6e 65 77 |r."]).(f|set 'new|
|00004240| 73 2d 75 6e 73 75 62 73 | 63 72 69 62 65 2d 67 72 |s-unsubs|cribe-gr|
|00004250| 6f 75 70 20 23 5b 28 67 | 72 6f 75 70 29 20 22 c0 |oup #[(g|roup) ".|
|00004260| 09 21 87 22 20 5b 6e 65 | 77 73 2d 75 6e 73 75 62 |.!." [ne|ws-unsub|
|00004270| 73 63 72 69 62 65 2d 69 | 6e 74 65 72 6e 61 6c 20 |scribe-i|nternal |
|00004280| 67 72 6f 75 70 5d 20 32 | 20 22 5c 0a 52 65 6d 6f |group] 2| "\.Remo|
|00004290| 76 65 73 20 79 6f 75 20 | 66 72 6f 6d 20 6e 65 77 |ves you |from new|
|000042a0| 67 72 6f 75 70 20 47 52 | 4f 55 50 2e 22 20 28 62 |group GR|OUP." (b|
|000042b0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 5c 6e 5c 22 |yte-code| "..\n\"|
|000042c0| 43 87 22 20 5b 63 6f 6d | 70 6c 65 74 69 6e 67 2d |C." [com|pleting-|
|000042d0| 72 65 61 64 20 22 55 6e | 73 75 62 73 63 72 69 62 |read "Un|subscrib|
|000042e0| 65 20 66 72 6f 6d 20 67 | 72 6f 75 70 3a 20 22 20 |e from g|roup: " |
|000042f0| 6e 65 77 73 2d 67 72 6f | 75 70 2d 61 72 74 69 63 |news-gro|up-artic|
|00004300| 6c 65 2d 61 73 73 6f 63 | 5d 20 33 29 5d 29 0a 28 |le-assoc|] 3)]).(|
|00004310| 66 73 65 74 20 27 6e 65 | 77 73 2d 75 6e 73 75 62 |fset 'ne|ws-unsub|
|00004320| 73 63 72 69 62 65 2d 63 | 75 72 72 65 6e 74 2d 67 |scribe-c|urrent-g|
|00004330| 72 6f 75 70 20 23 5b 6e | 69 6c 20 22 c0 c1 21 ad |roup #[n|il "..!.|
|00004340| 83 c2 0b 21 87 22 20 5b | 79 2d 6f 72 2d 6e 2d 70 |...!." [|y-or-n-p|
|00004350| 20 22 44 6f 20 79 6f 75 | 20 72 65 61 6c 6c 79 20 | "Do you| really |
|00004360| 77 61 6e 74 20 74 6f 20 | 75 6e 73 75 62 73 63 72 |want to |unsubscr|
|00004370| 69 62 65 20 66 72 6f 6d | 20 74 68 69 73 20 67 72 |ibe from| this gr|
|00004380| 6f 75 70 20 3f 20 22 20 | 6e 65 77 73 2d 75 6e 73 |oup ? " |news-uns|
|00004390| 75 62 73 63 72 69 62 65 | 2d 69 6e 74 65 72 6e 61 |ubscribe|-interna|
|000043a0| 6c 20 6e 65 77 73 2d 63 | 75 72 72 65 6e 74 2d 6e |l news-c|urrent-n|
|000043b0| 65 77 73 2d 67 72 6f 75 | 70 5d 20 32 20 22 5c 0a |ews-grou|p] 2 "\.|
|000043c0| 52 65 6d 6f 76 65 73 20 | 79 6f 75 20 66 72 6f 6d |Removes |you from|
|000043d0| 20 74 68 65 20 6e 65 77 | 73 67 72 6f 75 70 20 79 | the new|sgroup y|
|000043e0| 6f 75 20 61 72 65 20 6e | 6f 77 20 72 65 61 64 69 |ou are n|ow readi|
|000043f0| 6e 67 2e 22 20 6e 69 6c | 5d 29 0a 28 66 73 65 74 |ng." nil|]).(fset|
|00004400| 20 27 6e 65 77 73 2d 75 | 6e 73 75 62 73 63 72 69 | 'news-u|nsubscri|
|00004410| 62 65 2d 69 6e 74 65 72 | 6e 61 6c 20 23 5b 28 67 |be-inter|nal #[(g|
|00004420| 72 6f 75 70 29 20 22 c0 | 09 5c 6e 5c 22 89 1b ab |roup) ".|.\n\"...|
|00004430| 9e 09 0c 42 14 c0 09 5c | 6e 5c 22 41 40 41 0d 40 |...B...\|n\"A@A.@|
|00004440| 41 a0 88 09 0e 06 9a ab | 83 c7 20 88 c8 c9 21 aa |A.......|.. ...!.|
|00004450| 84 ca cb 09 5c 22 29 87 | 22 20 5b 61 73 73 6f 63 |....\").|" [assoc|
|00004460| 20 67 72 6f 75 70 20 6e | 65 77 73 2d 67 72 6f 75 | group n|ews-grou|
|00004470| 70 2d 61 72 74 69 63 6c | 65 2d 61 73 73 6f 63 20 |p-articl|e-assoc |
|00004480| 74 65 6d 20 6e 65 77 73 | 2d 75 6e 73 75 62 73 63 |tem news|-unsubsc|
|00004490| 72 69 62 65 2d 67 72 6f | 75 70 73 20 6e 65 77 73 |ribe-gro|ups news|
|000044a0| 2d 70 6f 69 6e 74 2d 70 | 64 6c 20 6e 65 77 73 2d |-point-p|dl news-|
|000044b0| 63 75 72 72 65 6e 74 2d | 6e 65 77 73 2d 67 72 6f |current-|news-gro|
|000044c0| 75 70 20 6e 65 77 73 2d | 6e 65 78 74 2d 67 72 6f |up news-|next-gro|
|000044d0| 75 70 20 6d 65 73 73 61 | 67 65 20 22 22 20 65 72 |up messa|ge "" er|
|000044e0| 72 6f 72 20 22 4e 6f 74 | 20 73 75 62 73 63 72 69 |ror "Not| subscri|
|000044f0| 62 65 64 20 74 6f 20 67 | 72 6f 75 70 3a 20 25 73 |bed to g|roup: %s|
|00004500| 22 5d 20 34 5d 29 0a 28 | 66 73 65 74 20 27 6e 65 |"] 4]).(|fset 'ne|
|00004510| 77 73 2d 73 61 76 65 2d | 69 74 65 6d 2d 69 6e 2d |ws-save-|item-in-|
|00004520| 66 69 6c 65 20 23 5b 28 | 66 69 6c 65 29 20 22 c0 |file #[(|file) ".|
|00004530| 65 64 09 23 87 22 20 5b | 61 70 70 65 6e 64 2d 74 |ed.#." [|append-t|
|00004540| 6f 2d 66 69 6c 65 20 66 | 69 6c 65 5d 20 34 20 22 |o-file f|ile] 4 "|
|00004550| 5c 0a 53 61 76 65 20 74 | 68 65 20 63 75 72 72 65 |\.Save t|he curre|
|00004560| 6e 74 20 61 72 74 69 63 | 6c 65 20 74 68 61 74 20 |nt artic|le that |
|00004570| 69 73 20 62 65 69 6e 67 | 20 72 65 61 64 20 62 79 |is being| read by|
|00004580| 20 61 70 70 65 6e 64 69 | 6e 67 20 74 6f 20 61 20 | appendi|ng to a |
|00004590| 66 69 6c 65 2e 22 20 22 | 46 53 61 76 65 20 69 74 |file." "|FSave it|
|000045a0| 65 6d 20 69 6e 20 66 69 | 6c 65 3a 20 22 5d 29 0a |em in fi|le: "]).|
|000045b0| 28 66 73 65 74 20 27 6e | 65 77 73 2d 67 65 74 2d |(fset 'n|ews-get-|
|000045c0| 70 72 75 6e 65 64 2d 6c | 69 73 74 2d 6f 66 2d 66 |pruned-l|ist-of-f|
|000045d0| 69 6c 65 73 20 23 5b 28 | 67 70 2d 6c 69 73 74 20 |iles #[(|gp-list |
|000045e0| 65 6e 64 2d 66 69 6c 65 | 2d 6e 6f 29 20 22 08 ad |end-file|-no) "..|
|000045f0| 8e c1 20 c2 0b 21 9a ad | 86 c4 15 c6 89 16 07 3f |.. ..!..|.......?|
|00004600| 85 bf 00 0e 08 c9 ca cb | 0b 23 50 1e 0c c4 1e 0d |........|.#P.....|
|00004610| 08 ad 91 ce 0e 0c cf d0 | 08 21 51 21 ad 86 d1 0e |........|.!Q!....|
|00004620| 0c 08 d2 23 1e 13 c6 16 | 07 c4 15 0e 13 ab 9d c6 |...#....|........|
|00004630| 16 07 0e 13 16 14 0e 13 | 08 56 ab 8d 0e 13 0d 42 |........|.V.....B|
|00004640| 15 0e 13 53 89 16 13 aa | 6f 0d aa e0 d5 0e 0c 21 |...S....|o......!|
|00004650| 3f ae 85 d6 0e 0c 21 3f | 3f ad d1 d7 d8 d9 8f 89 |?.....!?|?.......|
|00004660| 15 89 16 0d ab ab da db | 0e 0d 40 5c 22 ab 94 d5 |........|..@\"...|
|00004670| 0e 0c cf 0e 0d 40 51 21 | ac 89 dc 0e 0d 40 21 08 |.....@Q!|.....@!.|
|00004680| 58 ab 87 dd 0e 0d 40 0d | 5c 22 15 0e 0d 41 89 16 |X.....@.|\"...A..|
|00004690| 0d ac 55 0d ac 86 de 16 | 14 c4 aa 92 df dc 0d 5c |..U.....|.......\|
|000046a0| 22 15 e0 0d e1 5c 22 89 | 15 89 47 53 9c 16 14 0d |"....\".|..GS....|
|000046b0| 2b 89 1e 5c 22 ae 84 e3 | 20 88 c4 29 87 22 20 5b |+..\"...| ..)." [|
|000046c0| 65 6e 64 2d 66 69 6c 65 | 2d 6e 6f 20 6e 65 77 73 |end-file|-no news|
|000046d0| 2d 73 65 74 2d 63 75 72 | 72 65 6e 74 2d 63 65 72 |-set-cur|rent-cer|
|000046e0| 74 69 66 69 61 62 6c 65 | 20 6e 65 77 73 2d 67 72 |tifiable| news-gr|
|000046f0| 6f 75 70 2d 63 65 72 74 | 69 66 69 63 61 74 69 6f |oup-cert|ificatio|
|00004700| 6e 20 67 70 2d 6c 69 73 | 74 20 6e 69 6c 20 6e 65 |n gp-lis|t nil ne|
|00004710| 77 73 2d 6c 69 73 74 2d | 6f 66 2d 66 69 6c 65 73 |ws-list-|of-files|
|00004720| 20 74 20 6e 65 77 73 2d | 6c 69 73 74 2d 6f 66 2d | t news-|list-of-|
|00004730| 66 69 6c 65 73 2d 70 6f | 73 73 69 62 6c 79 2d 62 |files-po|ssibly-b|
|00004740| 6f 67 75 73 20 6e 65 77 | 73 2d 70 61 74 68 20 73 |ogus new|s-path s|
|00004750| 74 72 69 6e 67 2d 73 75 | 62 73 74 2d 63 68 61 72 |tring-su|bst-char|
|00004760| 20 34 37 20 34 36 20 66 | 69 6c 65 2d 64 69 72 65 | 47 46 f|ile-dire|
|00004770| 63 74 6f 72 79 20 74 65 | 6d 20 66 69 6c 65 2d 65 |ctory te|m file-e|
|00004780| 78 69 73 74 73 2d 70 20 | 22 2f 22 20 69 6e 74 2d |xists-p |"/" int-|
|00004790| 74 6f 2d 73 74 72 69 6e | 67 20 6e 65 77 73 2d 66 |to-strin|g news-f|
|000047a0| 69 6e 64 2d 66 69 72 73 | 74 2d 6f 72 2d 6c 61 73 |ind-firs|t-or-las|
|000047b0| 74 20 31 20 6c 61 73 74 | 2d 77 69 6e 6e 65 72 20 |t 1 last|-winner |
|000047c0| 6e 65 77 73 2d 63 75 72 | 72 65 6e 74 2d 67 72 6f |news-cur|rent-gro|
|000047d0| 75 70 2d 65 6e 64 20 66 | 69 6c 65 2d 64 69 72 65 |up-end f|ile-dire|
|000047e0| 63 74 6f 72 79 2d 70 20 | 66 69 6c 65 2d 72 65 61 |ctory-p |file-rea|
|000047f0| 64 61 62 6c 65 2d 70 20 | 65 72 72 6f 72 20 28 64 |dable-p |error (d|
|00004800| 69 72 65 63 74 6f 72 79 | 2d 66 69 6c 65 73 20 66 |irectory|-files f|
|00004810| 69 6c 65 2d 64 69 72 65 | 63 74 6f 72 79 29 20 28 |ile-dire|ctory) (|
|00004820| 28 66 69 6c 65 2d 65 72 | 72 6f 72 20 28 62 79 74 |(file-er|ror (byt|
|00004830| 65 2d 63 6f 64 65 20 22 | c0 09 38 c2 98 ab 87 c3 |e-code "|..8.....|
|00004840| c4 0d 5c 22 88 aa 86 c6 | c7 09 41 5c 22 88 c8 87 |..\"....|..A\"...|
|00004850| 22 20 5b 32 20 65 72 72 | 6f 72 20 22 70 65 72 6d |" [2 err|or "perm|
|00004860| 69 73 73 69 6f 6e 20 64 | 65 6e 69 65 64 22 20 6d |ission d|enied" m|
|00004870| 65 73 73 61 67 65 20 22 | 4e 65 77 73 67 72 6f 75 |essage "|Newsgrou|
|00004880| 70 20 25 73 20 69 73 20 | 72 65 61 64 2d 70 72 6f |p %s is |read-pro|
|00004890| 74 65 63 74 65 64 22 20 | 67 70 2d 6c 69 73 74 20 |tected" |gp-list |
|000048a0| 73 69 67 6e 61 6c 20 66 | 69 6c 65 2d 65 72 72 6f |signal f|ile-erro|
|000048b0| 72 20 6e 69 6c 5d 20 33 | 29 29 29 20 73 74 72 69 |r nil] 3|))) stri|
|000048c0| 6e 67 2d 6d 61 74 63 68 | 20 22 5e 5b 30 2d 39 5d |ng-match| "^[0-9]|
|000048d0| 2a 24 22 20 73 74 72 69 | 6e 67 2d 74 6f 2d 69 6e |*$" stri|ng-to-in|
|000048e0| 74 20 64 65 6c 71 20 30 | 20 6d 61 70 63 61 72 20 |t delq 0| mapcar |
|000048f0| 73 6f 72 74 20 3c 20 61 | 6e 73 77 65 72 20 6e 65 |sort < a|nswer ne|
|00004900| 77 73 2d 73 65 74 2d 63 | 75 72 72 65 6e 74 2d 67 |ws-set-c|urrent-g|
|00004910| 72 6f 75 70 2d 63 65 72 | 74 69 66 69 63 61 74 69 |roup-cer|tificati|
|00004920| 6f 6e 5d 20 36 20 22 5c | 0a 47 69 76 65 6e 20 61 |on] 6 "\|.Given a|
|00004930| 20 6e 65 77 73 20 67 72 | 6f 75 70 20 69 74 20 66 | news gr|oup it f|
|00004940| 69 6e 64 73 20 61 6c 6c | 20 66 69 6c 65 73 20 69 |inds all| files i|
|00004950| 6e 20 74 68 65 20 6e 65 | 77 73 20 67 72 6f 75 70 |n the ne|ws group|
|00004960| 2e 0a 54 68 65 20 61 72 | 67 20 6d 75 73 74 20 62 |..The ar|g must b|
|00004970| 65 20 69 6e 20 73 6c 61 | 73 68 69 66 69 65 64 20 |e in sla|shified |
|00004980| 66 6f 72 6d 61 74 2e 0a | 55 73 69 6e 67 20 6c 73 |format..|Using ls|
|00004990| 20 77 61 73 20 66 6f 75 | 6e 64 20 74 6f 20 62 65 | was fou|nd to be|
|000049a0| 20 74 6f 6f 20 73 6c 6f | 77 20 69 6e 20 61 20 70 | too slo|w in a p|
|000049b0| 72 65 76 69 6f 75 73 20 | 76 65 72 73 69 6f 6e 2e |revious |version.|
|000049c0| 22 5d 29 0a 28 66 73 65 | 74 20 27 6e 65 77 73 2d |"]).(fse|t 'news-|
|000049d0| 72 65 61 64 2d 66 69 6c | 65 73 2d 69 6e 74 6f 2d |read-fil|es-into-|
|000049e0| 62 75 66 66 65 72 20 23 | 5b 28 67 72 6f 75 70 20 |buffer #|[(group |
|000049f0| 72 65 76 65 72 73 65 70 | 29 20 22 c0 09 5c 6e 5c |reversep|) "..\n\|
|00004a00| 22 41 40 89 1b 40 1c 0b | 41 40 1d c6 1e 07 09 16 |"A@..@..|A@......|
|00004a10| 08 c6 16 09 c6 16 5c 6e | cb 20 88 cc 09 0d 5c 22 |......\n|. ....\"|
|00004a20| 88 cb 20 88 0b 40 0b 41 | 40 42 43 16 0d 0e 0e ac |.. ..@.A|@BC.....|
|00004a30| 92 cf 20 88 0d 16 5c 6e | 0d 16 10 0d 16 09 cb 20 |.. ...\n|....... |
|00004a40| 88 c6 aa bf 0e 0e 40 16 | 10 0e 11 ab 86 0e 5c 6e |......@.|......\n|
|00004a50| 16 09 aa 93 0e 0e 40 0d | 56 ab 88 0e 0d 40 0e 0e |......@.|V....@..|
|00004a60| 40 a1 88 0e 10 16 09 d2 | 20 88 cb 20 88 d3 0e 14 |@.......| .. ....|
|00004a70| d5 d6 d7 09 23 d8 d9 0e | 09 21 52 21 88 d2 20 88 |....#...|.!R!.. .|
|00004a80| cb 20 88 da 2c 87 22 20 | 5b 61 73 73 6f 63 20 67 |. ..,." |[assoc g|
|00004a90| 72 6f 75 70 20 6e 65 77 | 73 2d 67 72 6f 75 70 2d |roup new|s-group-|
|00004aa0| 61 72 74 69 63 6c 65 2d | 61 73 73 6f 63 20 66 69 |article-|assoc fi|
|00004ab0| 6c 65 73 2d 73 74 61 72 | 74 2d 65 6e 64 20 73 74 |les-star|t-end st|
|00004ac0| 61 72 74 2d 66 69 6c 65 | 2d 6e 6f 20 65 6e 64 2d |art-file|-no end-|
|00004ad0| 66 69 6c 65 2d 6e 6f 20 | 6e 69 6c 20 62 75 66 66 |file-no |nil buff|
|00004ae0| 65 72 2d 72 65 61 64 2d | 6f 6e 6c 79 20 6e 65 77 |er-read-|only new|
|00004af0| 73 2d 63 75 72 72 65 6e | 74 2d 6e 65 77 73 2d 67 |s-curren|t-news-g|
|00004b00| 72 6f 75 70 20 6e 65 77 | 73 2d 63 75 72 72 65 6e |roup new|s-curren|
|00004b10| 74 2d 6d 65 73 73 61 67 | 65 2d 6e 75 6d 62 65 72 |t-messag|e-number|
|00004b20| 20 6e 65 77 73 2d 63 75 | 72 72 65 6e 74 2d 67 72 | news-cu|rrent-gr|
|00004b30| 6f 75 70 2d 65 6e 64 20 | 6e 65 77 73 2d 73 65 74 |oup-end |news-set|
|00004b40| 2d 6d 6f 64 65 2d 6c 69 | 6e 65 20 6e 65 77 73 2d |-mode-li|ne news-|
|00004b50| 67 65 74 2d 70 72 75 6e | 65 64 2d 6c 69 73 74 2d |get-prun|ed-list-|
|00004b60| 6f 66 2d 66 69 6c 65 73 | 20 6e 65 77 73 2d 70 6f |of-files| news-po|
|00004b70| 69 6e 74 2d 70 64 6c 20 | 6e 65 77 73 2d 6c 69 73 |int-pdl |news-lis|
|00004b80| 74 2d 6f 66 2d 66 69 6c | 65 73 20 65 72 61 73 65 |t-of-fil|es erase|
|00004b90| 2d 62 75 66 66 65 72 20 | 6e 65 77 73 2d 63 75 72 |-buffer |news-cur|
|00004ba0| 72 65 6e 74 2d 67 72 6f | 75 70 2d 62 65 67 69 6e |rent-gro|up-begin|
|00004bb0| 20 72 65 76 65 72 73 65 | 70 20 6e 65 77 73 2d 73 | reverse|p news-s|
|00004bc0| 65 74 2d 6d 65 73 73 61 | 67 65 2d 63 6f 75 6e 74 |et-messa|ge-count|
|00004bd0| 65 72 73 20 6e 65 77 73 | 2d 72 65 61 64 2d 69 6e |ers news|-read-in|
|00004be0| 2d 66 69 6c 65 20 6e 65 | 77 73 2d 70 61 74 68 20 |-file ne|ws-path |
|00004bf0| 73 74 72 69 6e 67 2d 73 | 75 62 73 74 2d 63 68 61 |string-s|ubst-cha|
|00004c00| 72 20 34 37 20 34 36 20 | 22 2f 22 20 69 6e 74 2d |r 47 46 |"/" int-|
|00004c10| 74 6f 2d 73 74 72 69 6e | 67 20 74 5d 20 37 5d 29 |to-strin|g t] 7])|
|00004c20| 0a 28 66 73 65 74 20 27 | 6e 65 77 73 2d 61 64 64 |.(fset '|news-add|
|00004c30| 2d 6e 65 77 73 2d 67 72 | 6f 75 70 20 23 5b 28 67 |-news-gr|oup #[(g|
|00004c40| 70 29 20 22 08 c1 c2 c3 | 0c 23 50 1d 8a c6 0c 0e |p) "....|.#P.....|
|00004c50| 07 5c 22 84 aa 00 c8 c9 | 0e 5c 6e 21 21 1e 0b cc |.\".....|.\n!!...|
|00004c60| 0d 21 83 a3 00 cd 0e 0b | 21 88 ce 62 88 cf 0c d0 |.!......|!..b....|
|00004c70| 50 d1 d2 23 ab 92 d3 d4 | 0c 5c 22 88 d5 d6 21 88 |P..#....|.\"...!.|
|00004c80| d7 d8 21 88 d9 63 88 aa | 8d d3 da 0c 5c 22 88 db |..!..c..|....\"..|
|00004c90| 20 88 0c dc b1 02 88 dd | 0c d1 d2 23 88 d1 89 89 | .......|...#....|
|00004ca0| 89 1e 1e 1e 1f 1e 20 1e | 21 cf e2 d1 d2 23 88 60 |...... .|!....#.`|
|00004cb0| 16 20 ce 79 88 60 16 21 | d1 7f 88 60 16 1f 0e 21 |. .y.`.!|...`...!|
|00004cc0| 0e 20 d6 5a 7b 16 1e e3 | 0e 20 0e 1f 7b 21 1e 24 |. .Z{...|. ..{!.$|
|00004cd0| 0e 1e 0e 24 40 0e 24 41 | 0e 24 41 45 44 0e 07 42 |...$@.$A|.$AED..B|
|00004ce0| 16 07 2d e5 20 88 e6 70 | 21 aa 84 d3 e7 0c 5c 22 |..-. ..p|!.....\"|
|00004cf0| 29 aa 84 d3 e8 0c 5c 22 | 2a 87 22 20 5b 6e 65 77 |).....\"|*." [new|
|00004d00| 73 2d 70 61 74 68 20 73 | 74 72 69 6e 67 2d 73 75 |s-path s|tring-su|
|00004d10| 62 73 74 2d 63 68 61 72 | 20 34 37 20 34 36 20 67 |bst-char| 47 46 g|
|00004d20| 70 20 66 69 6c 65 2d 64 | 69 72 20 61 73 73 6f 63 |p file-d|ir assoc|
|00004d30| 20 6e 65 77 73 2d 67 72 | 6f 75 70 2d 61 72 74 69 | news-gr|oup-arti|
|00004d40| 63 6c 65 2d 61 73 73 6f | 63 20 66 69 6e 64 2d 66 |cle-asso|c find-f|
|00004d50| 69 6c 65 2d 6e 6f 73 65 | 6c 65 63 74 20 73 75 62 |ile-nose|lect sub|
|00004d60| 73 74 69 74 75 74 65 2d | 69 6e 2d 66 69 6c 65 2d |stitute-|in-file-|
|00004d70| 6e 61 6d 65 20 6e 65 77 | 73 2d 73 74 61 72 74 75 |name new|s-startu|
|00004d80| 70 2d 66 69 6c 65 20 6e | 65 77 73 72 63 62 75 66 |p-file n|ewsrcbuf|
|00004d90| 20 66 69 6c 65 2d 64 69 | 72 65 63 74 6f 72 79 2d | file-di|rectory-|
|00004da0| 70 20 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |p switch|-to-buff|
|00004db0| 65 72 20 30 20 73 65 61 | 72 63 68 2d 66 6f 72 77 |er 0 sea|rch-forw|
|00004dc0| 61 72 64 20 22 21 20 22 | 20 6e 69 6c 20 74 20 6d |ard "! "| nil t m|
|00004dd0| 65 73 73 61 67 65 20 22 | 52 65 2d 73 75 62 73 63 |essage "|Re-subsc|
|00004de0| 72 69 62 69 6e 67 20 74 | 6f 20 67 72 6f 75 70 20 |ribing t|o group |
|00004df0| 25 73 2e 22 20 62 61 63 | 6b 77 61 72 64 2d 63 68 |%s." bac|kward-ch|
|00004e00| 61 72 20 32 20 64 65 6c | 65 74 65 2d 63 68 61 72 |ar 2 del|ete-char|
|00004e10| 20 31 20 22 3a 22 20 22 | 41 64 64 65 64 20 25 73 | 1 ":" "|Added %s|
|00004e20| 20 74 6f 20 79 6f 75 72 | 20 6c 69 73 74 20 6f 66 | to your| list of|
|00004e30| 20 6e 65 77 73 67 72 6f | 75 70 73 2e 22 20 65 6e | newsgro|ups." en|
|00004e40| 64 2d 6f 66 2d 62 75 66 | 66 65 72 20 22 3a 20 31 |d-of-buf|fer ": 1|
|00004e50| 2d 31 5c 6e 22 20 73 65 | 61 72 63 68 2d 62 61 63 |-1\n" se|arch-bac|
|00004e60| 6b 77 61 72 64 20 74 65 | 6d 20 65 6e 64 6f 66 6c |kward te|m endofl|
|00004e70| 69 6e 65 20 65 6e 64 20 | 73 74 61 72 74 20 22 3a |ine end |start ":|
|00004e80| 20 22 20 6e 65 77 73 2d | 70 61 72 73 65 2d 72 61 | " news-|parse-ra|
|00004e90| 6e 67 65 20 72 61 6e 67 | 65 20 73 61 76 65 2d 62 |nge rang|e save-b|
|00004ea0| 75 66 66 65 72 20 6b 69 | 6c 6c 2d 62 75 66 66 65 |uffer ki|ll-buffe|
|00004eb0| 72 20 22 4e 65 77 73 67 | 72 6f 75 70 20 25 73 20 |r "Newsg|roup %s |
|00004ec0| 64 6f 65 73 6e 27 74 20 | 65 78 69 73 74 2e 22 20 |doesn't |exist." |
|00004ed0| 22 41 6c 72 65 61 64 79 | 20 73 75 62 73 63 72 69 |"Already| subscri|
|00004ee0| 62 65 64 20 74 6f 20 67 | 72 6f 75 70 20 25 73 2e |bed to g|roup %s.|
|00004ef0| 22 5d 20 35 20 22 5c 0a | 52 65 73 75 62 73 63 72 |"] 5 "\.|Resubscr|
|00004f00| 69 62 65 20 74 6f 20 6f | 72 20 61 64 64 20 61 20 |ibe to o|r add a |
|00004f10| 55 53 45 4e 45 54 20 6e | 65 77 73 20 67 72 6f 75 |USENET n|ews grou|
|00004f20| 70 20 6e 61 6d 65 64 20 | 47 52 4f 55 50 20 28 61 |p named |GROUP (a|
|00004f30| 20 73 74 72 69 6e 67 29 | 2e 22 20 22 73 41 64 64 | string)|." "sAdd|
|00004f40| 20 6e 65 77 73 20 67 72 | 6f 75 70 3a 20 22 5d 29 | news gr|oup: "])|
|00004f50| 0a 28 66 73 65 74 20 27 | 6e 65 77 73 2d 6d 61 6b |.(fset '|news-mak|
|00004f60| 65 2d 6c 69 6e 6b 2d 74 | 6f 2d 6d 65 73 73 61 67 |e-link-t|o-messag|
|00004f70| 65 20 23 5b 28 6e 75 6d | 62 65 72 20 6e 65 77 6e |e #[(num|ber newn|
|00004f80| 61 6d 65 29 20 22 c0 09 | c2 c3 c4 0d 23 c6 0e 07 |ame) "..|....#...|
|00004f90| ab 86 c8 0e 07 21 aa 82 | 0e 09 52 0e 5c 6e 5c 22 |.....!..|..R.\n\"|
|00004fa0| 87 22 20 5b 61 64 64 2d | 6e 61 6d 65 2d 74 6f 2d |." [add-|name-to-|
|00004fb0| 66 69 6c 65 20 6e 65 77 | 73 2d 70 61 74 68 20 73 |file new|s-path s|
|00004fc0| 74 72 69 6e 67 2d 73 75 | 62 73 74 2d 63 68 61 72 |tring-su|bst-char|
|00004fd0| 20 34 37 20 34 36 20 6e | 65 77 73 2d 63 75 72 72 | 47 46 n|ews-curr|
|00004fe0| 65 6e 74 2d 6e 65 77 73 | 2d 67 72 6f 75 70 20 22 |ent-news|-group "|
|00004ff0| 2f 22 20 6e 75 6d 62 65 | 72 20 70 72 65 66 69 78 |/" numbe|r prefix|
|00005000| 2d 6e 75 6d 65 72 69 63 | 2d 76 61 6c 75 65 20 6e |-numeric|-value n|
|00005010| 65 77 73 2d 63 75 72 72 | 65 6e 74 2d 6d 65 73 73 |ews-curr|ent-mess|
|00005020| 61 67 65 2d 6e 75 6d 62 | 65 72 20 6e 65 77 6e 61 |age-numb|er newna|
|00005030| 6d 65 5d 20 36 20 22 5c | 0a 46 6f 72 67 65 73 20 |me] 6 "\|.Forges |
|00005040| 61 20 6c 69 6e 6b 20 74 | 6f 20 61 6e 20 72 6e 65 |a link t|o an rne|
|00005050| 77 73 20 6d 65 73 73 61 | 67 65 20 6e 75 6d 62 65 |ws messa|ge numbe|
|00005060| 72 65 64 20 6e 75 6d 62 | 65 72 20 28 63 75 72 72 |red numb|er (curr|
|00005070| 65 6e 74 20 69 66 20 6e | 6f 20 61 72 67 29 0a 47 |ent if n|o arg).G|
|00005080| 6f 6f 64 20 66 6f 72 20 | 68 61 6e 67 69 6e 67 20 |ood for |hanging |
|00005090| 6f 6e 20 74 6f 20 61 20 | 6d 65 73 73 61 67 65 20 |on to a |message |
|000050a0| 74 68 61 74 20 6d 69 67 | 68 74 20 6f 72 20 6d 69 |that mig|ht or mi|
|000050b0| 67 68 74 20 6e 6f 74 20 | 62 65 0a 61 75 74 6f 6d |ght not |be.autom|
|000050c0| 61 74 69 63 61 6c 6c 79 | 20 64 65 6c 65 74 65 64 |atically| deleted|
|000050d0| 2e 22 20 22 50 5c 6e 46 | 4e 61 6d 65 20 74 6f 20 |." "P\nF|Name to |
|000050e0| 6c 69 6e 6b 20 74 6f 20 | 6d 65 73 73 61 67 65 3a |link to |message:|
|000050f0| 20 22 5d 29 0a 28 66 73 | 65 74 20 27 63 61 65 73 | "]).(fs|et 'caes|
|00005100| 61 72 2d 72 65 67 69 6f | 6e 20 23 5b 28 26 6f 70 |ar-regio|n #[(&op|
|00005110| 74 69 6f 6e 61 6c 20 6e | 29 20 22 08 a7 ac 84 c1 |tional n|) ".....|
|00005120| 10 aa 92 08 c2 57 ab 89 | c3 08 5b c3 a6 5a 10 aa |.....W..|..[..Z..|
|00005130| 84 08 c3 a6 10 08 c2 55 | 3f 85 d6 00 c4 c5 21 ab |.......U|?.....!.|
|00005140| 89 0d c6 48 08 c6 5c 5c | 55 ac e1 c2 c7 c8 1e 09 |...H..\\|U.......|
|00005150| 1e 5c 6e 1e 0b cc cd 21 | 88 ce cf c2 5c 22 15 0e |.\n....!|....\"..|
|00005160| 0b cf 57 ab 8e 0d 0e 0b | 89 49 88 0e 0b 54 89 16 |..W.....|.I...T..|
|00005170| 0b aa 6e 0e 5c 6e 89 50 | 89 16 5c 6e 96 16 09 c2 |..n.\n.P|..\n....|
|00005180| 16 0b c2 c3 57 ab a4 0d | 0e 0b c6 5c 5c 0e 5c 6e |....W...|...\\.\n|
|00005190| 0e 0b 08 5c 5c 48 49 88 | 0d 0e 0b d0 5c 5c 0e 09 |...\\HI.|....\\..|
|000051a0| 0e 0b 08 5c 5c 48 49 88 | 0e 0b 54 89 16 0b aa 58 |...\\HI.|..T....X|
|000051b0| cc d1 21 88 2b d2 20 d3 | 20 c2 c8 89 1e 14 1e 15 |..!.+. .| .......|
|000051c0| 1e 0b 1e 16 89 1e 17 0e | 16 7b 89 16 15 47 16 14 |........|.{...G..|
|000051d0| 0e 0b 0e 14 57 ab 95 0e | 15 0e 0b 0d 0e 15 0e 0b |....W...|........|
|000051e0| 48 48 49 88 0e 0b 54 89 | 16 0b aa 66 0e 17 62 88 |HHI...T.|...f..b.|
|000051f0| d8 0e 17 0e 16 5c 22 88 | 0e 15 63 2d 87 22 20 5b |.....\".|..c-." [|
|00005200| 6e 20 31 33 20 30 20 32 | 36 20 62 6f 75 6e 64 70 |n 13 0 2|6 boundp|
|00005210| 20 63 61 65 73 61 72 2d | 74 72 61 6e 73 6c 61 74 | caesar-|translat|
|00005220| 65 2d 74 61 62 6c 65 20 | 39 37 20 22 61 62 63 64 |e-table |97 "abcd|
|00005230| 65 66 67 68 69 6a 6b 6c | 6d 6e 6f 70 71 72 73 74 |efghijkl|mnopqrst|
|00005240| 75 76 77 78 79 7a 22 20 | 6e 69 6c 20 75 70 70 65 |uvwxyz" |nil uppe|
|00005250| 72 20 6c 6f 77 65 72 20 | 69 20 6d 65 73 73 61 67 |r lower |i messag|
|00005260| 65 20 22 42 75 69 6c 64 | 69 6e 67 20 63 61 65 73 |e "Build|ing caes|
|00005270| 61 72 2d 74 72 61 6e 73 | 6c 61 74 65 2d 74 61 62 |ar-trans|late-tab|
|00005280| 6c 65 2e 2e 2e 22 20 6d | 61 6b 65 2d 76 65 63 74 |le..." m|ake-vect|
|00005290| 6f 72 20 32 35 36 20 36 | 35 20 22 42 75 69 6c 64 |or 256 6|5 "Build|
|000052a0| 69 6e 67 20 63 61 65 73 | 61 72 2d 74 72 61 6e 73 |ing caes|ar-trans|
|000052b0| 6c 61 74 65 2d 74 61 62 | 6c 65 2e 2e 2e 20 64 6f |late-tab|le... do|
|000052c0| 6e 65 22 20 72 65 67 69 | 6f 6e 2d 62 65 67 69 6e |ne" regi|on-begin|
|000052d0| 6e 69 6e 67 20 72 65 67 | 69 6f 6e 2d 65 6e 64 20 |ning reg|ion-end |
|000052e0| 6c 65 6e 20 73 74 72 20 | 74 6f 20 66 72 6f 6d 20 |len str |to from |
|000052f0| 6b 69 6c 6c 2d 72 65 67 | 69 6f 6e 5d 20 36 20 22 |kill-reg|ion] 6 "|
|00005300| 5c 0a 43 61 65 73 61 72 | 20 72 6f 74 61 74 69 6f |\.Caesar| rotatio|
|00005310| 6e 20 6f 66 20 72 65 67 | 69 6f 6e 20 62 79 20 4e |n of reg|ion by N|
|00005320| 2c 20 64 65 66 61 75 6c | 74 20 31 33 2c 20 66 6f |, defaul|t 13, fo|
|00005330| 72 20 64 65 63 72 79 70 | 74 69 6e 67 20 6e 65 74 |r decryp|ting net|
|00005340| 6e 65 77 73 2e 22 20 28 | 62 79 74 65 2d 63 6f 64 |news." (|byte-cod|
|00005350| 65 20 22 08 ab 85 c1 08 | 21 43 87 c2 43 87 22 20 |e ".....|!C..C." |
|00005360| 5b 63 75 72 72 65 6e 74 | 2d 70 72 65 66 69 78 2d |[current|-prefix-|
|00005370| 61 72 67 20 70 72 65 66 | 69 78 2d 6e 75 6d 65 72 |arg pref|ix-numer|
|00005380| 69 63 2d 76 61 6c 75 65 | 20 6e 69 6c 5d 20 32 29 |ic-value| nil] 2)|
|00005390| 5d 29 0a 28 66 73 65 74 | 20 27 6e 65 77 73 2d 63 |]).(fset| 'news-c|
|000053a0| 61 65 73 61 72 2d 62 75 | 66 66 65 72 2d 62 6f 64 |aesar-bu|ffer-bod|
|000053b0| 79 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 72 |y #[(&op|tional r|
|000053c0| 6f 74 6e 75 6d 29 20 22 | 8a 08 19 c2 10 c3 65 62 |otnum) "|......eb|
|000053d0| 88 c4 c5 0e 06 c7 9a ab | 83 c8 aa 82 0e 09 c5 51 |........|.......Q|
|000053e0| c2 ca 23 ab 83 60 aa 81 | 65 21 88 64 62 88 cb 0e |..#..`..|e!.db...|
|000053f0| 0c 21 88 09 89 10 2a 87 | 22 20 5b 62 75 66 66 65 |.!....*.|" [buffe|
|00005400| 72 2d 72 65 61 64 2d 6f | 6e 6c 79 20 62 75 66 66 |r-read-o|nly buff|
|00005410| 65 72 2d 73 74 61 74 75 | 73 20 6e 69 6c 20 73 65 |er-statu|s nil se|
|00005420| 74 2d 6d 61 72 6b 20 73 | 65 61 72 63 68 2d 66 6f |t-mark s|earch-fo|
|00005430| 72 77 61 72 64 20 22 5c | 6e 22 20 6d 61 6a 6f 72 |rward "\|n" major|
|00005440| 2d 6d 6f 64 65 20 6e 65 | 77 73 2d 6d 6f 64 65 20 |-mode ne|ws-mode |
|00005450| 22 22 20 6d 61 69 6c 2d | 68 65 61 64 65 72 2d 73 |"" mail-|header-s|
|00005460| 65 70 61 72 61 74 6f 72 | 20 74 20 63 61 65 73 61 |eparator| t caesa|
|00005470| 72 2d 72 65 67 69 6f 6e | 20 72 6f 74 6e 75 6d 5d |r-region| rotnum]|
|00005480| 20 35 20 22 5c 0a 43 61 | 65 73 61 72 20 72 6f 74 | 5 "\.Ca|esar rot|
|00005490| 61 74 65 73 20 61 6c 6c | 20 6c 65 74 74 65 72 73 |ates all| letters|
|000054a0| 20 69 6e 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | in the |current |
|000054b0| 62 75 66 66 65 72 20 62 | 79 20 31 33 20 70 6c 61 |buffer b|y 13 pla|
|000054c0| 63 65 73 2e 0a 55 73 65 | 64 20 74 6f 20 65 6e 63 |ces..Use|d to enc|
|000054d0| 6f 64 65 2f 64 65 63 6f | 64 65 20 70 6f 73 73 69 |ode/deco|de possi|
|000054e0| 62 6c 79 20 6f 66 66 65 | 6e 73 69 76 65 20 6d 65 |bly offe|nsive me|
|000054f0| 73 73 61 67 65 73 20 28 | 63 6f 6d 6d 6f 6e 6c 79 |ssages (|commonly|
|00005500| 20 69 6e 20 6e 65 74 2e | 6a 6f 6b 65 73 29 2e 0a | in net.|jokes)..|
|00005510| 57 69 74 68 20 70 72 65 | 66 69 78 20 61 72 67 2c |With pre|fix arg,|
|00005520| 20 73 70 65 63 69 66 69 | 65 73 20 74 68 65 20 6e | specifi|es the n|
|00005530| 75 6d 62 65 72 20 6f 66 | 20 70 6c 61 63 65 73 20 |umber of| places |
|00005540| 74 6f 20 72 6f 74 61 74 | 65 20 65 61 63 68 20 6c |to rotat|e each l|
|00005550| 65 74 74 65 72 20 66 6f | 72 77 61 72 64 2e 0a 4d |etter fo|rward..M|
|00005560| 61 69 6c 20 61 6e 64 20 | 55 53 45 4e 45 54 20 6e |ail and |USENET n|
|00005570| 65 77 73 20 68 65 61 64 | 65 72 73 20 61 72 65 20 |ews head|ers are |
|00005580| 6e 6f 74 20 72 6f 74 61 | 74 65 64 2e 22 20 28 62 |not rota|ted." (b|
|00005590| 79 74 65 2d 63 6f 64 65 | 20 22 08 ab 85 c1 08 21 |yte-code| ".....!|
|000055a0| 43 87 c2 43 87 22 20 5b | 63 75 72 72 65 6e 74 2d |C..C." [|current-|
|000055b0| 70 72 65 66 69 78 2d 61 | 72 67 20 70 72 65 66 69 |prefix-a|rg prefi|
|000055c0| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 20 |x-numeri|c-value |
|000055d0| 6e 69 6c 5d 20 32 29 5d | 29 0a |nil] 2)]|). |
+--------+-------------------------+-------------------------+--------+--------+
