/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 1 / 1926

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 3a 20 44 61 | 6e 5f 4a 61 63 6f 62 73 |From: Da|n_Jacobs|
|00000010| 6f 6e 40 41 54 54 2e 43 | 4f 4d 0a 4e 65 77 73 67 |on@ATT.C|OM.Newsg|
|00000020| 72 6f 75 70 73 3a 20 67 | 6e 75 2e 65 6d 61 63 73 |roups: g|nu.emacs|
|00000030| 2e 67 6e 75 73 2c 6e 65 | 77 73 2e 6e 65 77 75 73 |.gnus,ne|ws.newus|
|00000040| 65 72 73 2e 71 75 65 73 | 74 69 6f 6e 73 2c 61 6c |ers.ques|tions,al|
|00000050| 74 2e 73 6f 75 72 63 65 | 73 0a 53 75 62 6a 65 63 |t.source|s.Subjec|
|00000060| 74 3a 20 72 6e 4b 49 4c | 4c 32 67 6e 75 73 3a 20 |t: rnKIL|L2gnus: |
|00000070| 72 6e 20 6e 65 77 73 72 | 65 61 64 65 72 20 22 4b |rn newsr|eader "K|
|00000080| 49 4c 4c 22 20 66 69 6c | 65 20 74 6f 20 47 4e 55 |ILL" fil|e to GNU|
|00000090| 20 45 6d 61 63 73 27 20 | 47 4e 55 53 20 63 6f 6e | Emacs' |GNUS con|
|000000a0| 76 65 72 74 65 72 0a 4d | 65 73 73 61 67 65 2d 49 |verter.M|essage-I|
|000000b0| 44 3a 20 3c 31 39 39 30 | 4f 63 74 38 2e 31 38 32 |D: <1990|Oct8.182|
|000000c0| 31 31 30 2e 31 36 38 32 | 40 63 62 6e 65 77 73 65 |110.1682|@cbnewse|
|000000d0| 2e 61 74 74 2e 63 6f 6d | 3e 0a 44 61 74 65 3a 20 |.att.com|>.Date: |
|000000e0| 38 20 4f 63 74 20 39 30 | 20 31 38 3a 32 31 3a 31 |8 Oct 90| 18:21:1|
|000000f0| 30 20 47 4d 54 0a 0a 5b | 70 72 65 76 69 6f 75 73 |0 GMT..[|previous|
|00000100| 20 74 68 72 65 65 20 70 | 6f 73 74 69 6e 67 73 20 | three p|ostings |
|00000110| 64 69 64 6e 27 74 20 6d | 61 6b 65 20 69 74 20 74 |didn't m|ake it t|
|00000120| 6f 20 74 68 65 20 6e 65 | 74 77 6f 72 6b 5d 0a 0a |o the ne|twork]..|
|00000130| 41 72 63 68 69 76 65 2d | 6e 61 6d 65 3a 20 72 6e |Archive-|name: rn|
|00000140| 4b 49 4c 4c 32 67 6e 75 | 73 0a 23 21 20 2f 62 69 |KILL2gnu|s.#! /bi|
|00000150| 6e 2f 73 68 0a 23 20 54 | 68 69 73 20 69 73 20 61 |n/sh.# T|his is a|
|00000160| 20 73 68 65 6c 6c 20 61 | 72 63 68 69 76 65 2e 20 | shell a|rchive. |
|00000170| 20 52 65 6d 6f 76 65 20 | 61 6e 79 74 68 69 6e 67 | Remove |anything|
|00000180| 20 62 65 66 6f 72 65 20 | 74 68 69 73 20 6c 69 6e | before |this lin|
|00000190| 65 2c 20 74 68 65 6e 20 | 66 65 65 64 20 69 74 0a |e, then |feed it.|
|000001a0| 23 20 69 6e 74 6f 20 61 | 20 73 68 65 6c 6c 20 76 |# into a| shell v|
|000001b0| 69 61 20 22 73 68 20 66 | 69 6c 65 22 20 6f 72 20 |ia "sh f|ile" or |
|000001c0| 73 69 6d 69 6c 61 72 2e | 20 20 54 6f 20 6f 76 65 |similar.|  To ove|
|000001d0| 72 77 72 69 74 65 20 65 | 78 69 73 74 69 6e 67 20 |rwrite e|xisting |
|000001e0| 66 69 6c 65 73 2c 0a 23 | 20 74 79 70 65 20 22 73 |files,.#| type "s|
|000001f0| 68 20 66 69 6c 65 20 2d | 63 22 2e 0a 23 20 54 68 |h file -|c"..# Th|
|00000200| 65 20 74 6f 6f 6c 20 74 | 68 61 74 20 67 65 6e 65 |e tool t|hat gene|
|00000210| 72 61 74 65 64 20 74 68 | 69 73 20 61 70 70 65 61 |rated th|is appea|
|00000220| 72 65 64 20 69 6e 20 74 | 68 65 20 63 6f 6d 70 2e |red in t|he comp.|
|00000230| 73 6f 75 72 63 65 73 2e | 75 6e 69 78 20 6e 65 77 |sources.|unix new|
|00000240| 73 67 72 6f 75 70 3b 0a | 23 20 73 65 6e 64 20 6d |sgroup;.|# send m|
|00000250| 61 69 6c 20 74 6f 20 63 | 6f 6d 70 2d 73 6f 75 72 |ail to c|omp-sour|
|00000260| 63 65 73 2d 75 6e 69 78 | 40 75 75 6e 65 74 2e 75 |ces-unix|@uunet.u|
|00000270| 75 2e 6e 65 74 20 69 66 | 20 79 6f 75 20 77 61 6e |u.net if| you wan|
|00000280| 74 20 74 68 61 74 20 74 | 6f 6f 6c 2e 0a 23 20 43 |t that t|ool..# C|
|00000290| 6f 6e 74 65 6e 74 73 3a | 20 20 72 6e 4b 49 4c 4c |ontents:|  rnKILL|
|000002a0| 32 67 6e 75 73 0a 23 20 | 57 72 61 70 70 65 64 20 |2gnus.# |Wrapped |
|000002b0| 62 79 20 64 61 6e 6a 31 | 40 69 68 6c 70 61 20 6f |by danj1|@ihlpa o|
|000002c0| 6e 20 53 61 74 20 53 65 | 70 20 32 39 20 31 39 3a |n Sat Se|p 29 19:|
|000002d0| 34 33 3a 34 31 20 31 39 | 39 30 0a 50 41 54 48 3d |43:41 19|90.PATH=|
|000002e0| 2f 62 69 6e 3a 2f 75 73 | 72 2f 62 69 6e 3a 2f 75 |/bin:/us|r/bin:/u|
|000002f0| 73 72 2f 75 63 62 20 3b | 20 65 78 70 6f 72 74 20 |sr/ucb ;| export |
|00000300| 50 41 54 48 0a 65 63 68 | 6f 20 49 66 20 74 68 69 |PATH.ech|o If thi|
|00000310| 73 20 61 72 63 68 69 76 | 65 20 69 73 20 63 6f 6d |s archiv|e is com|
|00000320| 70 6c 65 74 65 2c 20 79 | 6f 75 20 77 69 6c 6c 20 |plete, y|ou will |
|00000330| 73 65 65 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e |see the |followin|
|00000340| 67 20 6d 65 73 73 61 67 | 65 3a 0a 65 63 68 6f 20 |g messag|e:.echo |
|00000350| 27 20 20 20 20 20 20 20 | 20 20 20 22 73 68 61 72 |'       |   "shar|
|00000360| 3a 20 45 6e 64 20 6f 66 | 20 61 72 63 68 69 76 65 |: End of| archive|
|00000370| 2e 22 27 0a 69 66 20 74 | 65 73 74 20 2d 66 20 27 |."'.if t|est -f '|
|00000380| 72 6e 4b 49 4c 4c 32 67 | 6e 75 73 27 20 2d 61 20 |rnKILL2g|nus' -a |
|00000390| 22 24 7b 31 7d 22 20 21 | 3d 20 22 2d 63 22 20 3b |"${1}" !|= "-c" ;|
|000003a0| 20 74 68 65 6e 20 0a 20 | 20 65 63 68 6f 20 73 68 | then . | echo sh|
|000003b0| 61 72 3a 20 57 69 6c 6c | 20 6e 6f 74 20 63 6c 6f |ar: Will| not clo|
|000003c0| 62 62 65 72 20 65 78 69 | 73 74 69 6e 67 20 66 69 |bber exi|sting fi|
|000003d0| 6c 65 20 5c 22 27 72 6e | 4b 49 4c 4c 32 67 6e 75 |le \"'rn|KILL2gnu|
|000003e0| 73 27 5c 22 0a 65 6c 73 | 65 0a 20 20 65 63 68 6f |s'\".els|e.  echo|
|000003f0| 20 73 68 61 72 3a 20 45 | 78 74 72 61 63 74 69 6e | shar: E|xtractin|
|00000400| 67 20 5c 22 27 72 6e 4b | 49 4c 4c 32 67 6e 75 73 |g \"'rnK|ILL2gnus|
|00000410| 27 5c 22 20 5c 28 32 30 | 38 33 20 63 68 61 72 61 |'\" \(20|83 chara|
|00000420| 63 74 65 72 73 5c 29 0a | 20 20 73 65 64 20 22 73 |cters\).|  sed "s|
|00000430| 2f 5e 58 2f 2f 22 20 3e | 27 72 6e 4b 49 4c 4c 32 |/^X//" >|'rnKILL2|
|00000440| 67 6e 75 73 27 20 3c 3c | 27 45 4e 44 5f 4f 46 5f |gnus' <<|'END_OF_|
|00000450| 46 49 4c 45 27 0a 58 3a | 20 44 61 6e 5f 4a 61 63 |FILE'.X:| Dan_Jac|
|00000460| 6f 62 73 6f 6e 40 41 54 | 54 2e 43 4f 4d 20 39 2f |obson@AT|T.COM 9/|
|00000470| 31 39 39 30 0a 58 23 72 | 65 61 6c 20 73 69 6d 70 |1990.X#r|eal simp|
|00000480| 6c 65 20 70 72 6f 67 72 | 61 6d 20 74 68 61 74 20 |le progr|am that |
|00000490| 72 65 61 64 73 20 61 20 | 74 72 65 65 20 6f 66 20 |reads a |tree of |
|000004a0| 22 72 6e 22 20 6e 65 77 | 73 72 65 61 64 65 72 20 |"rn" new|sreader |
|000004b0| 4b 49 4c 4c 20 66 69 6c | 65 73 0a 58 23 61 6e 64 |KILL fil|es.X#and|
|000004c0| 20 73 70 69 74 73 20 6f | 75 74 20 22 67 6e 75 73 | spits o|ut "gnus|
|000004d0| 2d 41 70 70 6c 79 2d 6b | 69 6c 6c 2d 68 6f 6f 6b |-Apply-k|ill-hook|
|000004e0| 22 20 6c 69 73 70 20 63 | 6f 64 65 20 66 6f 72 20 |" lisp c|ode for |
|000004f0| 75 73 65 20 69 6e 20 74 | 68 65 20 47 4e 55 53 20 |use in t|he GNUS |
|00000500| 6e 65 77 73 72 65 61 64 | 65 72 0a 58 23 28 61 20 |newsread|er.X#(a |
|00000510| 73 75 62 73 79 73 74 65 | 6d 20 6f 66 20 47 4e 55 |subsyste|m of GNU|
|00000520| 20 45 6d 61 63 73 29 2e | 20 20 53 61 6d 70 6c 65 | Emacs).|  Sample|
|00000530| 20 28 22 6d 6f 72 65 22 | 20 6f 75 74 70 75 74 29 | ("more"| output)|
|00000540| 3a 0a 58 0a 58 23 09 3a | 3a 3a 3a 3a 3a 3a 3a 3a |:.X.X#.:|::::::::|
|00000550| 3a 3a 3a 3a 3a 0a 58 23 | 09 72 65 63 2f 66 6f 6f |:::::.X#|.rec/foo|
|00000560| 64 2f 76 65 67 2f 4b 49 | 4c 4c 0a 58 23 09 3a 3a |d/veg/KI|LL.X#.::|
|00000570| 3a 3a 3a 3a 3a 3a 3a 3a | 3a 3a 3a 3a 0a 58 23 09 |::::::::|::::.X#.|
|00000580| 54 48 52 55 20 34 34 32 | 39 0a 58 23 09 2f 72 65 |THRU 442|9.X#./re|
|00000590| 63 69 70 65 2f 6a 0a 58 | 23 09 2f 63 6f 6f 6b 62 |cipe/j.X|#./cookb|
|000005a0| 6f 6f 6b 2f 6a 0a 58 23 | 09 3a 3a 3a 3a 3a 3a 3a |ook/j.X#|.:::::::|
|000005b0| 3a 3a 3a 3a 3a 3a 3a 0a | 58 23 09 72 65 63 2f 74 |:::::::.|X#.rec/t|
|000005c0| 72 61 76 65 6c 2f 4b 49 | 4c 4c 0a 58 23 09 3a 3a |ravel/KI|LL.X#.::|
|000005d0| 3a 3a 3a 3a 3a 3a 3a 3a | 3a 3a 3a 3a 0a 58 23 09 |::::::::|::::.X#.|
|000005e0| 54 48 52 55 20 31 31 30 | 32 31 0a 58 23 09 2f 63 |THRU 110|21.X#./c|
|000005f0| 61 72 20 72 65 6e 74 61 | 6c 2f 6a 0a 58 23 09 2f |ar renta|l/j.X#./|
|00000600| 72 65 6e 74 69 6e 67 20 | 61 20 63 61 72 2f 6a 0a |renting |a car/j.|
|00000610| 58 23 5b 2e 2e 2e 5d 0a | 58 0a 58 23 62 65 63 6f |X#[...].|X.X#beco|
|00000620| 6d 65 73 0a 58 0a 58 23 | 09 28 73 65 74 71 20 67 |mes.X.X#|.(setq g|
|00000630| 6e 75 73 2d 41 70 70 6c | 79 2d 6b 69 6c 6c 2d 68 |nus-Appl|y-kill-h|
|00000640| 6f 6f 6b 0a 58 23 09 20 | 20 27 28 6c 61 6d 62 64 |ook.X#. | '(lambd|
|00000650| 61 20 28 29 0a 58 23 09 | 20 20 20 20 20 28 63 6f |a ().X#.|     (co|
|00000660| 6e 64 0a 58 23 09 20 20 | 20 20 20 20 28 28 73 74 |nd.X#.  |    ((st|
|00000670| 72 69 6e 67 2d 65 71 75 | 61 6c 20 67 6e 75 73 2d |ring-equ|al gnus-|
|00000680| 6e 65 77 73 67 72 6f 75 | 70 2d 6e 61 6d 65 20 22 |newsgrou|p-name "|
|00000690| 72 65 63 2e 66 6f 6f 64 | 2e 76 65 67 22 29 0a 58 |rec.food|.veg").X|
|000006a0| 23 09 20 20 20 20 20 20 | 20 28 70 72 6f 67 6e 0a |#.      | (progn.|
|000006b0| 58 23 09 09 20 28 67 6e | 75 73 2d 6b 69 6c 6c 20 |X#.. (gn|us-kill |
|000006c0| 22 53 75 62 6a 65 63 74 | 22 20 22 72 65 63 69 70 |"Subject|" "recip|
|000006d0| 65 22 29 0a 58 23 09 09 | 20 28 67 6e 75 73 2d 6b |e").X#..| (gnus-k|
|000006e0| 69 6c 6c 20 22 53 75 62 | 6a 65 63 74 22 20 22 63 |ill "Sub|ject" "c|
|000006f0| 6f 6f 6b 62 6f 6f 6b 22 | 29 0a 58 23 09 09 20 28 |ookbook"|).X#.. (|
|00000700| 67 6e 75 73 2d 65 78 70 | 75 6e 67 65 20 22 58 22 |gnus-exp|unge "X"|
|00000710| 29 29 29 0a 58 23 09 20 | 20 20 20 20 20 28 28 73 |))).X#. |     ((s|
|00000720| 74 72 69 6e 67 2d 65 71 | 75 61 6c 20 67 6e 75 73 |tring-eq|ual gnus|
|00000730| 2d 6e 65 77 73 67 72 6f | 75 70 2d 6e 61 6d 65 20 |-newsgro|up-name |
|00000740| 22 72 65 63 2e 74 72 61 | 76 65 6c 22 29 0a 58 23 |"rec.tra|vel").X#|
|00000750| 09 20 20 20 20 20 20 20 | 28 70 72 6f 67 6e 0a 58 |.       |(progn.X|
|00000760| 23 09 09 20 28 67 6e 75 | 73 2d 6b 69 6c 6c 20 22 |#.. (gnu|s-kill "|
|00000770| 53 75 62 6a 65 63 74 22 | 20 22 63 61 72 20 72 65 |Subject"| "car re|
|00000780| 6e 74 61 6c 22 29 0a 58 | 23 09 09 20 28 67 6e 75 |ntal").X|#.. (gnu|
|00000790| 73 2d 6b 69 6c 6c 20 22 | 53 75 62 6a 65 63 74 22 |s-kill "|Subject"|
|000007a0| 20 22 72 65 6e 74 69 6e | 67 20 61 20 63 61 72 22 | "rentin|g a car"|
|000007b0| 29 0a 58 23 09 09 20 28 | 67 6e 75 73 2d 65 78 70 |).X#.. (|gnus-exp|
|000007c0| 75 6e 67 65 20 22 58 22 | 29 29 29 0a 58 23 5b 2e |unge "X"|))).X#[.|
|000007d0| 2e 2e 5d 0a 58 0a 58 23 | 59 6f 75 20 70 72 6f 62 |..].X.X#|You prob|
|000007e0| 61 62 6c 79 20 77 61 6e | 74 20 74 6f 20 70 75 74 |ably wan|t to put|
|000007f0| 20 74 68 61 74 20 6c 69 | 73 70 20 63 6f 64 65 20 | that li|sp code |
|00000800| 69 6e 74 6f 20 79 6f 75 | 72 20 67 6e 75 73 2d 53 |into you|r gnus-S|
|00000810| 74 61 72 74 75 70 2d 68 | 6f 6f 6b 2e 0a 58 23 41 |tartup-h|ook..X#A|
|00000820| 73 73 75 6d 65 73 3a 20 | 74 68 61 74 20 79 6f 75 |ssumes: |that you|
|00000830| 72 20 72 6e 20 4b 49 4c | 4c 20 66 69 6c 65 73 20 |r rn KIL|L files |
|00000840| 61 72 65 20 61 6c 6c 20 | 73 69 6d 70 6c 65 20 22 |are all |simple "|
|00000850| 2f 62 6c 61 20 62 6c 61 | 2f 6a 22 20 6b 69 6e 64 |/bla bla|/j" kind|
|00000860| 20 6f 66 0a 58 23 6c 69 | 6e 65 73 2c 20 74 68 61 | of.X#li|nes, tha|
|00000870| 74 20 79 6f 75 72 20 24 | 48 4f 4d 45 2f 4e 65 77 |t your $|HOME/New|
|00000880| 73 20 74 72 65 65 20 68 | 61 73 20 66 69 6c 65 73 |s tree h|as files|
|00000890| 20 6c 69 6b 65 20 61 6c | 74 2f 77 61 78 2f 4b 49 | like al|t/wax/KI|
|000008a0| 4c 4c 20 28 66 72 6f 6d | 0a 58 23 72 6e 27 73 20 |LL (from|.X#rn's |
|000008b0| 22 2d 2f 22 20 6f 70 74 | 69 6f 6e 29 2c 20 6e 6f |"-/" opt|ion), no|
|000008c0| 74 20 65 2e 67 2e 2c 20 | 61 6c 74 2e 77 61 78 2f |t e.g., |alt.wax/|
|000008d0| 4b 49 4c 4c 2e 20 20 4e | 61 74 75 72 61 6c 6c 79 |KILL.  N|aturally|
|000008e0| 20 64 6f 75 62 6c 65 20 | 63 68 65 63 6b 0a 58 23 | double |check.X#|
|000008f0| 74 68 65 20 6f 75 74 70 | 75 74 2e 20 20 49 20 6a |the outp|ut.  I j|
|00000900| 75 73 74 20 75 73 65 64 | 20 4d 61 73 61 6e 6f 62 |ust used| Masanob|
|00000910| 75 20 55 6d 65 64 61 27 | 73 20 67 6e 75 73 2d 41 |u Umeda'|s gnus-A|
|00000920| 70 70 6c 79 2d 6b 69 6c | 6c 2d 68 6f 6f 6b 0a 58 |pply-kil|l-hook.X|
|00000930| 23 65 78 61 6d 70 6c 65 | 73 20 74 6f 20 6d 61 6b |#example|s to mak|
|00000940| 65 20 74 68 65 20 6f 75 | 74 70 75 74 2e 20 20 49 |e the ou|tput.  I|
|00000950| 20 61 6d 20 6e 6f 20 6c | 69 73 70 20 70 72 6f 2e | am no l|isp pro.|
|00000960| 20 20 49 74 20 64 6f 65 | 73 20 6d 61 6b 65 20 28 |  It doe|s make (|
|00000970| 64 69 73 6b 29 20 62 6c | 6f 63 6b 73 0a 58 23 61 |disk) bl|ocks.X#a|
|00000980| 6e 64 20 62 6c 6f 63 6b | 73 20 6f 66 20 4b 49 4c |nd block|s of KIL|
|00000990| 4c 20 66 69 6c 65 73 20 | 69 6e 74 6f 20 6a 75 73 |L files |into jus|
|000009a0| 74 20 61 20 66 65 77 20 | 6c 69 6e 65 73 20 6f 66 |t a few |lines of|
|000009b0| 20 6c 69 73 70 2e 20 20 | 4e 6f 74 65 20 47 4e 55 | lisp.  |Note GNU|
|000009c0| 53 0a 58 23 61 6c 73 6f | 20 68 61 73 20 4b 49 4c |S.X#also| has KIL|
|000009d0| 4c 20 66 69 6c 65 73 20 | 69 66 20 79 6f 75 20 77 |L files |if you w|
|000009e0| 61 6e 74 20 74 68 65 6d | 2e 20 0a 58 0a 58 23 54 |ant them|. .X.X#T|
|000009f0| 6f 6f 6b 20 6f 6e 6c 79 | 20 31 2f 32 20 68 6f 75 |ook only| 1/2 hou|
|00000a00| 72 20 74 6f 20 77 68 69 | 70 20 75 70 2e 20 20 41 |r to whi|p up.  A|
|00000a10| 6e 64 20 49 27 76 65 20 | 61 6c 72 65 61 64 79 20 |nd I've |already |
|00000a20| 70 72 6f 63 65 73 73 65 | 64 20 6d 79 20 4b 49 4c |processe|d my KIL|
|00000a30| 4c 0a 58 23 66 69 6c 65 | 73 2c 20 73 6f 2c 20 65 |L.X#file|s, so, e|
|00000a40| 72 2e 2e 2e 20 49 20 64 | 6f 6e 27 74 20 70 6c 61 |r... I d|on't pla|
|00000a50| 6e 20 74 6f 20 65 6e 68 | 61 6e 63 65 2f 66 69 78 |n to enh|ance/fix|
|00000a60| 2f 6d 61 69 6e 74 61 69 | 6e 20 74 68 69 73 20 70 |/maintai|n this p|
|00000a70| 72 6f 67 72 61 6d 2e 0a | 58 23 54 6f 64 61 79 20 |rogram..|X#Today |
|00000a80| 69 73 20 61 6c 73 6f 20 | 6d 79 20 66 69 72 73 74 |is also |my first|
|00000a90| 20 64 61 79 20 6d 65 73 | 73 69 6e 67 20 77 69 74 | day mes|sing wit|
|00000aa0| 68 20 47 4e 55 53 20 6b | 69 6c 6c 20 63 6f 64 65 |h GNUS k|ill code|
|00000ab0| 2e 0a 58 0a 58 73 65 74 | 20 2d 65 0a 58 63 64 20 |..X.Xset| -e.Xcd |
|00000ac0| 24 48 4f 4d 45 2f 4e 65 | 77 73 20 23 6f 72 20 77 |$HOME/Ne|ws #or w|
|00000ad0| 68 65 72 65 76 65 72 20 | 79 6f 75 72 20 70 65 72 |herever |your per|
|00000ae0| 73 6f 6e 61 6c 20 6e 65 | 77 73 20 74 72 65 65 20 |sonal ne|ws tree |
|00000af0| 69 73 20 61 74 0a 58 65 | 63 68 6f 20 22 28 73 65 |is at.Xe|cho "(se|
|00000b00| 74 71 20 67 6e 75 73 2d | 41 70 70 6c 79 2d 6b 69 |tq gnus-|Apply-ki|
|00000b10| 6c 6c 2d 68 6f 6f 6b 0a | 58 20 27 28 6c 61 6d 62 |ll-hook.|X '(lamb|
|00000b20| 64 61 20 28 29 0a 58 20 | 20 28 63 6f 6e 64 22 0a |da ().X | (cond".|
|00000b30| 58 66 6f 72 20 69 20 69 | 6e 20 60 66 69 6e 64 20 |Xfor i i|n `find |
|00000b40| 2e 20 2d 6e 61 6d 65 20 | 4b 49 4c 4c 20 2d 70 72 |. -name |KILL -pr|
|00000b50| 69 6e 74 7c 73 6f 72 74 | 60 3b 20 64 6f 20 65 63 |int|sort|`; do ec|
|00000b60| 68 6f 20 58 58 58 58 20 | 24 69 3b 20 63 61 74 20 |ho XXXX |$i; cat |
|00000b70| 24 69 3b 20 64 6f 6e 65 | 7c 0a 58 73 65 64 20 27 |$i; done||.Xsed '|
|00000b80| 0a 58 2f 5e 58 58 58 58 | 2f 7b 0a 58 31 21 69 5c |.X/^XXXX|/{.X1!i\|
|00000b90| 0a 58 20 20 20 20 20 28 | 67 6e 75 73 2d 65 78 70 |.X     (|gnus-exp|
|00000ba0| 75 6e 67 65 20 22 58 22 | 29 29 29 0a 58 0a 58 73 |unge "X"|))).X.Xs|
|00000bb0| 2f 5e 58 58 58 58 20 2e | 2e 2f 2f 0a 58 73 2f 2e |/^XXXX .|.//.Xs/.|
|00000bc0| 4b 49 4c 4c 24 2f 2f 0a | 58 73 23 2f 23 2e 23 67 |KILL$//.|Xs#/#.#g|
|00000bd0| 0a 58 73 2f 5e 2f 20 20 | 20 28 28 73 74 72 69 6e |.Xs/^/  | ((strin|
|00000be0| 67 2d 65 71 75 61 6c 20 | 67 6e 75 73 2d 6e 65 77 |g-equal |gnus-new|
|00000bf0| 73 67 72 6f 75 70 2d 6e | 61 6d 65 20 22 2f 0a 58 |sgroup-n|ame "/.X|
|00000c00| 73 2f 24 2f 22 29 2f 0a | 58 61 5c 0a 58 20 20 20 |s/$/")/.|Xa\.X   |
|00000c10| 20 28 70 72 6f 67 6e 0a | 58 0a 58 6e 0a 58 7d 0a | (progn.|X.Xn.X}.|
|00000c20| 58 2f 5e 54 48 52 55 2f | 64 0a 58 73 23 5e 2f 23 |X/^THRU/|d.Xs#^/#|
|00000c30| 20 20 20 20 20 28 67 6e | 75 73 2d 6b 69 6c 6c 20 |     (gn|us-kill |
|00000c40| 22 53 75 62 6a 65 63 74 | 22 20 22 23 0a 58 73 23 |"Subject|" "#.Xs#|
|00000c50| 2f 5b 5e 2f 5d 5b 5e 2f | 5d 2a 24 23 22 29 23 0a |/[^/][^/|]*$#")#.|
|00000c60| 58 24 61 5c 0a 58 20 20 | 20 20 20 28 67 6e 75 73 |X$a\.X  |   (gnus|
|00000c70| 2d 65 78 70 75 6e 67 65 | 20 22 58 22 29 29 29 29 |-expunge| "X"))))|
|00000c80| 29 29 0a 58 27 0a 58 23 | 66 75 6e 6e 79 3a 20 68 |)).X'.X#|funny: h|
|00000c90| 61 64 20 74 6f 20 70 75 | 74 20 22 2f 5e 54 48 52 |ad to pu|t "/^THR|
|00000ca0| 55 2f 64 22 20 6e 65 61 | 72 20 74 68 65 20 65 6e |U/d" nea|r the en|
|00000cb0| 64 20 74 6f 20 61 76 6f | 69 64 20 73 65 64 20 62 |d to avo|id sed b|
|00000cc0| 75 67 5b 3f 5d 0a 45 4e | 44 5f 4f 46 5f 46 49 4c |ug[?].EN|D_OF_FIL|
|00000cd0| 45 0a 20 20 69 66 20 74 | 65 73 74 20 32 30 38 33 |E.  if t|est 2083|
|00000ce0| 20 2d 6e 65 20 60 77 63 | 20 2d 63 20 3c 27 72 6e | -ne `wc| -c <'rn|
|00000cf0| 4b 49 4c 4c 32 67 6e 75 | 73 27 60 3b 20 74 68 65 |KILL2gnu|s'`; the|
|00000d00| 6e 0a 20 20 20 20 65 63 | 68 6f 20 73 68 61 72 3a |n.    ec|ho shar:|
|00000d10| 20 5c 22 27 72 6e 4b 49 | 4c 4c 32 67 6e 75 73 27 | \"'rnKI|LL2gnus'|
|00000d20| 5c 22 20 75 6e 70 61 63 | 6b 65 64 20 77 69 74 68 |\" unpac|ked with|
|00000d30| 20 77 72 6f 6e 67 20 73 | 69 7a 65 21 0a 20 20 66 | wrong s|ize!.  f|
|00000d40| 69 0a 20 20 63 68 6d 6f | 64 20 2b 78 20 27 72 6e |i.  chmo|d +x 'rn|
|00000d50| 4b 49 4c 4c 32 67 6e 75 | 73 27 0a 20 20 23 20 65 |KILL2gnu|s'.  # e|
|00000d60| 6e 64 20 6f 66 20 27 72 | 6e 4b 49 4c 4c 32 67 6e |nd of 'r|nKILL2gn|
|00000d70| 75 73 27 0a 66 69 0a 65 | 63 68 6f 20 73 68 61 72 |us'.fi.e|cho shar|
|00000d80| 3a 20 45 6e 64 20 6f 66 | 20 61 72 63 68 69 76 65 |: End of| archive|
|00000d90| 2e 0a 65 78 69 74 20 30 | 0a 2d 2d 20 0a 44 61 6e |..exit 0|.-- .Dan|
|00000da0| 5f 4a 61 63 6f 62 73 6f | 6e 40 41 54 54 2e 43 4f |_Jacobso|n@ATT.CO|
|00000db0| 4d 20 20 4e 61 70 65 72 | 76 69 6c 6c 65 20 49 4c |M  Naper|ville IL|
|00000dc0| 20 55 53 41 20 20 2b 31 | 20 37 30 38 2d 39 37 39 | USA  +1| 708-979|
|00000dd0| 2d 36 33 36 34 0a       |                         |-6364.  |        |
+--------+-------------------------+-------------------------+--------+--------+