/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / hyperbole / hui-mouse.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 35 32 3a 33 | 32 20 31 39 39 35 0a 3b | 14:52:3|2 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 65 78 |;; from |file /ex|
|00000060| 70 6f 72 74 2f 77 69 6c | 6c 6f 77 33 2f 78 65 6d |port/wil|low3/xem|
|00000070| 61 63 73 2d 31 39 2e 31 | 33 2d 72 65 6c 65 61 73 |acs-19.1|3-releas|
|00000080| 65 2f 65 64 69 74 6f 72 | 2f 6c 69 73 70 2f 68 79 |e/editor|/lisp/hy|
|00000090| 70 65 72 62 6f 6c 65 2f | 68 75 69 2d 6d 6f 75 73 |perbole/|hui-mous|
|000000a0| 65 2e 65 6c 0a 3b 3b 3b | 20 65 6d 61 63 73 20 76 |e.el.;;;| emacs v|
|000000b0| 65 72 73 69 6f 6e 20 31 | 39 2e 31 33 20 58 45 6d |ersion 1|9.13 XEm|
|000000c0| 61 63 73 20 4c 75 63 69 | 64 2e 0a 3b 3b 3b 20 62 |acs Luci|d..;;; b|
|000000d0| 79 74 65 63 6f 6d 70 20 | 76 65 72 73 69 6f 6e 20 |ytecomp |version |
|000000e0| 32 2e 32 35 3b 20 31 2d | 53 65 70 2d 39 34 2e 0a |2.25; 1-|Sep-94..|
|000000f0| 3b 3b 3b 20 6f 70 74 69 | 6d 69 7a 61 74 69 6f 6e |;;; opti|mization|
|00000100| 20 69 73 20 6f 6e 2e 0a | 3b 3b 3b 20 74 68 69 73 | is on..|;;; this|
|00000110| 20 66 69 6c 65 20 75 73 | 65 73 20 6f 70 63 6f 64 | file us|es opcod|
|00000120| 65 73 20 77 68 69 63 68 | 20 64 6f 20 6e 6f 74 20 |es which| do not |
|00000130| 65 78 69 73 74 20 69 6e | 20 45 6d 61 63 73 20 31 |exist in| Emacs 1|
|00000140| 38 2e 0a 0a 28 69 66 20 | 28 61 6e 64 20 28 62 6f |8...(if |(and (bo|
|00000150| 75 6e 64 70 20 27 65 6d | 61 63 73 2d 76 65 72 73 |undp 'em|acs-vers|
|00000160| 69 6f 6e 29 0a 09 20 28 | 6f 72 20 28 61 6e 64 20 |ion).. (|or (and |
|00000170| 28 62 6f 75 6e 64 70 20 | 27 65 70 6f 63 68 3a 3a |(boundp |'epoch::|
|00000180| 76 65 72 73 69 6f 6e 29 | 20 65 70 6f 63 68 3a 3a |version)| epoch::|
|00000190| 76 65 72 73 69 6f 6e 29 | 0a 09 20 20 20 20 20 28 |version)|..     (|
|000001a0| 73 74 72 69 6e 67 2d 6c | 65 73 73 70 20 65 6d 61 |string-l|essp ema|
|000001b0| 63 73 2d 76 65 72 73 69 | 6f 6e 20 22 31 39 22 29 |cs-versi|on "19")|
|000001c0| 29 29 0a 20 20 20 20 28 | 65 72 72 6f 72 20 22 54 |)).    (|error "T|
|000001d0| 68 69 73 20 66 69 6c 65 | 20 77 61 73 20 63 6f 6d |his file| was com|
|000001e0| 70 69 6c 65 64 20 66 6f | 72 20 45 6d 61 63 73 20 |piled fo|r Emacs |
|000001f0| 31 39 2e 22 29 29 0a 0a | 28 64 65 66 76 61 72 20 |19."))..|(defvar |
|00000200| 68 6d 6f 75 73 65 2d 73 | 65 74 2d 70 6f 69 6e 74 |hmouse-s|et-point|
|00000210| 2d 63 6f 6d 6d 61 6e 64 | 20 6e 69 6c 20 22 5c 0a |-command| nil "\.|
|00000220| 2a 43 6f 6d 6d 61 6e 64 | 20 74 68 61 74 20 73 65 |*Command| that se|
|00000230| 74 73 20 70 6f 69 6e 74 | 20 74 6f 20 6d 6f 75 73 |ts point| to mous|
|00000240| 65 20 63 75 72 73 6f 72 | 20 70 6f 73 69 74 69 6f |e cursor| positio|
|00000250| 6e 2e 22 29 0a 28 64 65 | 66 76 61 72 20 61 63 74 |n.").(de|fvar act|
|00000260| 69 6f 6e 2d 6b 65 79 2d | 64 65 66 61 75 6c 74 2d |ion-key-|default-|
|00000270| 66 75 6e 63 74 69 6f 6e | 20 27 68 75 69 3a 6d 65 |function| 'hui:me|
|00000280| 6e 75 20 22 5c 0a 2a 53 | 79 6d 62 6f 6c 20 6e 61 |nu "\.*S|ymbol na|
|00000290| 6d 65 20 6f 66 20 66 75 | 6e 63 74 69 6f 6e 20 72 |me of fu|nction r|
|000002a0| 75 6e 20 62 79 20 74 68 | 65 20 41 63 74 69 6f 6e |un by th|e Action|
|000002b0| 20 4b 65 79 20 69 6e 20 | 61 6e 20 75 6e 73 70 65 | Key in |an unspe|
|000002c0| 63 69 66 69 65 64 20 63 | 6f 6e 74 65 78 74 2e 22 |cified c|ontext."|
|000002d0| 29 0a 28 64 65 66 76 61 | 72 20 61 73 73 69 73 74 |).(defva|r assist|
|000002e0| 2d 6b 65 79 2d 64 65 66 | 61 75 6c 74 2d 66 75 6e |-key-def|ault-fun|
|000002f0| 63 74 69 6f 6e 20 27 68 | 6b 65 79 2d 73 75 6d 6d |ction 'h|key-summ|
|00000300| 61 72 69 7a 65 20 22 5c | 0a 2a 53 79 6d 62 6f 6c |arize "\|.*Symbol|
|00000310| 20 6e 61 6d 65 20 6f 66 | 20 66 75 6e 63 74 69 6f | name of| functio|
|00000320| 6e 20 72 75 6e 20 62 79 | 20 74 68 65 20 41 73 73 |n run by| the Ass|
|00000330| 69 73 74 20 4b 65 79 20 | 69 6e 20 61 6e 20 75 6e |ist Key |in an un|
|00000340| 73 70 65 63 69 66 69 65 | 64 20 63 6f 6e 74 65 78 |specifie|d contex|
|00000350| 74 2e 22 29 0a 28 64 65 | 66 76 61 72 20 68 6b 65 |t.").(de|fvar hke|
|00000360| 79 2d 76 61 6c 75 65 20 | 6e 69 6c 20 22 5c 0a 43 |y-value |nil "\.C|
|00000370| 6f 6d 6d 75 6e 69 63 61 | 74 65 73 20 61 20 76 61 |ommunica|tes a va|
|00000380| 6c 75 65 20 62 65 74 77 | 65 65 6e 20 61 20 53 6d |lue betw|een a Sm|
|00000390| 61 72 74 20 4b 65 79 20 | 70 72 65 64 69 63 61 74 |art Key |predicat|
|000003a0| 65 20 61 6e 64 20 69 74 | 73 20 61 63 74 69 6f 6e |e and it|s action|
|000003b0| 73 2e 22 29 0a 28 64 65 | 66 76 61 72 20 68 6b 65 |s.").(de|fvar hke|
|000003c0| 79 2d 61 6c 69 73 74 20 | 27 28 28 28 61 6e 64 20 |y-alist |'(((and |
|000003d0| 28 3e 20 28 6d 69 6e 69 | 62 75 66 66 65 72 2d 64 |(> (mini|buffer-d|
|000003e0| 65 70 74 68 29 20 30 29 | 20 28 65 71 20 28 73 65 |epth) 0)| (eq (se|
|000003f0| 6c 65 63 74 65 64 2d 77 | 69 6e 64 6f 77 29 20 28 |lected-w|indow) (|
|00000400| 6d 69 6e 69 62 75 66 66 | 65 72 2d 77 69 6e 64 6f |minibuff|er-windo|
|00000410| 77 29 29 20 28 6e 6f 74 | 20 28 65 71 20 68 61 72 |w)) (not| (eq har|
|00000420| 67 73 3a 72 65 61 64 69 | 6e 67 2d 70 20 27 68 6d |gs:readi|ng-p 'hm|
|00000430| 65 6e 75 29 29 29 20 28 | 65 78 69 74 2d 6d 69 6e |enu))) (|exit-min|
|00000440| 69 62 75 66 66 65 72 29 | 20 73 6d 61 72 74 2d 63 |ibuffer)| smart-c|
|00000450| 6f 6d 70 6c 65 74 69 6f | 6e 2d 68 65 6c 70 29 20 |ompletio|n-help) |
|00000460| 28 28 69 66 20 28 3e 20 | 28 6d 69 6e 69 62 75 66 |((if (> |(minibuf|
|00000470| 66 65 72 2d 64 65 70 74 | 68 29 20 30 29 20 28 73 |fer-dept|h) 0) (s|
|00000480| 65 74 71 20 68 6b 65 79 | 2d 76 61 6c 75 65 20 28 |etq hkey|-value (|
|00000490| 68 61 72 67 73 3a 61 74 | 2d 70 29 29 29 20 28 68 |hargs:at|-p))) (h|
|000004a0| 61 72 67 73 3a 73 65 6c | 65 63 74 2d 70 20 68 6b |args:sel|ect-p hk|
|000004b0| 65 79 2d 76 61 6c 75 65 | 29 20 68 61 72 67 73 3a |ey-value|) hargs:|
|000004c0| 73 65 6c 65 63 74 2d 70 | 20 68 6b 65 79 2d 76 61 |select-p| hkey-va|
|000004d0| 6c 75 65 20 27 61 73 73 | 69 73 74 29 20 28 28 69 |lue 'ass|ist) ((i|
|000004e0| 66 20 28 6e 6f 74 20 28 | 65 6f 62 70 29 29 20 28 |f (not (|eobp)) (|
|000004f0| 6f 72 20 28 65 6f 6c 70 | 29 20 28 69 66 20 73 65 |or (eolp|) (if se|
|00000500| 6c 65 63 74 69 76 65 2d | 64 69 73 70 6c 61 79 20 |lective-|display |
|00000510| 28 3d 20 28 66 6f 6c 6c | 6f 77 69 6e 67 2d 63 68 |(= (foll|owing-ch|
|00000520| 61 72 29 20 31 33 29 29 | 29 29 20 28 73 63 72 6f |ar) 13))|)) (scro|
|00000530| 6c 6c 2d 75 70 2d 65 6f | 6c 29 20 73 63 72 6f 6c |ll-up-eo|l) scrol|
|00000540| 6c 2d 64 6f 77 6e 2d 65 | 6f 6c 29 20 28 28 69 66 |l-down-e|ol) ((if|
|00000550| 20 28 66 62 6f 75 6e 64 | 70 20 27 68 62 75 74 3a | (fbound|p 'hbut:|
|00000560| 61 74 2d 70 29 20 28 6f | 72 20 28 68 62 75 74 3a |at-p) (o|r (hbut:|
|00000570| 61 74 2d 70 29 20 28 68 | 62 75 74 3a 6c 61 62 65 |at-p) (h|but:labe|
|00000580| 6c 2d 70 29 29 29 20 28 | 68 75 69 3a 68 62 75 74 |l-p))) (|hui:hbut|
|00000590| 2d 61 63 74 20 27 68 62 | 75 74 3a 63 75 72 72 65 |-act 'hb|ut:curre|
|000005a0| 6e 74 29 20 68 75 69 3a | 68 62 75 74 2d 68 65 6c |nt) hui:|hbut-hel|
|000005b0| 70 20 27 68 62 75 74 3a | 63 75 72 72 65 6e 74 29 |p 'hbut:|current)|
|000005c0| 20 28 28 69 66 20 28 62 | 6f 75 6e 64 70 20 27 76 | ((if (b|oundp 'v|
|000005d0| 69 65 77 2d 6d 69 6e 6f | 72 2d 6d 6f 64 65 29 20 |iew-mino|r-mode) |
|000005e0| 76 69 65 77 2d 6d 69 6e | 6f 72 2d 6d 6f 64 65 29 |view-min|or-mode)|
|000005f0| 20 28 63 6f 6e 64 20 28 | 28 6c 61 73 74 2d 6c 69 | (cond (|(last-li|
|00000600| 6e 65 2d 70 29 20 28 76 | 69 65 77 2d 71 75 69 74 |ne-p) (v|iew-quit|
|00000610| 29 29 20 28 28 70 6f 73 | 2d 76 69 73 69 62 6c 65 |)) ((pos|-visible|
|00000620| 2d 69 6e 2d 77 69 6e 64 | 6f 77 2d 70 20 28 70 6f |-in-wind|ow-p (po|
|00000630| 69 6e 74 2d 6d 61 78 29 | 29 20 28 67 6f 74 6f 2d |int-max)|) (goto-|
|00000640| 63 68 61 72 20 28 70 6f | 69 6e 74 2d 6d 61 78 29 |char (po|int-max)|
|00000650| 29 29 20 28 74 20 28 73 | 63 72 6f 6c 6c 2d 75 70 |)) (t (s|croll-up|
|00000660| 29 29 29 20 73 63 72 6f | 6c 6c 2d 64 6f 77 6e 29 |))) scro|ll-down)|
|00000670| 20 28 28 65 71 20 6d 61 | 6a 6f 72 2d 6d 6f 64 65 | ((eq ma|jor-mode|
|00000680| 20 27 76 69 65 77 2d 6d | 6f 64 65 29 20 28 56 69 | 'view-m|ode) (Vi|
|00000690| 65 77 2d 73 63 72 6f 6c | 6c 2d 6c 69 6e 65 73 2d |ew-scrol|l-lines-|
|000006a0| 66 6f 72 77 61 72 64 29 | 20 56 69 65 77 2d 73 63 |forward)| View-sc|
|000006b0| 72 6f 6c 6c 2d 6c 69 6e | 65 73 2d 62 61 63 6b 77 |roll-lin|es-backw|
|000006c0| 61 72 64 29 20 28 28 65 | 71 20 6d 61 6a 6f 72 2d |ard) ((e|q major-|
|000006d0| 6d 6f 64 65 20 27 6b 6f | 74 6c 2d 6d 6f 64 65 29 |mode 'ko|tl-mode)|
|000006e0| 20 28 6b 6f 74 6c 2d 6d | 6f 64 65 3a 61 63 74 69 | (kotl-m|ode:acti|
|000006f0| 6f 6e 2d 6b 65 79 29 20 | 6b 6f 74 6c 2d 6d 6f 64 |on-key) |kotl-mod|
|00000700| 65 3a 68 65 6c 70 2d 6b | 65 79 29 20 28 28 65 71 |e:help-k|ey) ((eq|
|00000710| 20 6d 61 6a 6f 72 2d 6d | 6f 64 65 20 27 73 6d 61 | major-m|ode 'sma|
|00000720| 72 74 2d 6d 65 6e 75 2d | 6d 6f 64 65 29 20 28 73 |rt-menu-|mode) (s|
|00000730| 6d 61 72 74 2d 6d 65 6e | 75 2d 73 65 6c 65 63 74 |mart-men|u-select|
|00000740| 29 20 73 6d 61 72 74 2d | 6d 65 6e 75 2d 68 65 6c |) smart-|menu-hel|
|00000750| 70 29 20 28 28 65 71 20 | 6d 61 6a 6f 72 2d 6d 6f |p) ((eq |major-mo|
|00000760| 64 65 20 27 72 64 62 2d | 6d 6f 64 65 29 20 28 73 |de 'rdb-|mode) (s|
|00000770| 6d 61 72 74 2d 72 64 62 | 29 20 73 6d 61 72 74 2d |mart-rdb|) smart-|
|00000780| 72 64 62 2d 61 73 73 69 | 73 74 29 20 28 28 69 66 |rdb-assi|st) ((if|
|00000790| 20 28 3d 20 28 70 6f 69 | 6e 74 29 20 28 70 6f 69 | (= (poi|nt) (poi|
|000007a0| 6e 74 2d 6d 61 78 29 29 | 20 28 73 74 72 69 6e 67 |nt-max))| (string|
|000007b0| 2d 6d 61 74 63 68 20 22 | 48 65 6c 70 5c 5c 2a 24 |-match "|Help\\*$|
|000007c0| 22 20 28 62 75 66 66 65 | 72 2d 6e 61 6d 65 29 29 |" (buffe|r-name))|
|000007d0| 29 20 28 68 6b 65 79 2d | 68 65 6c 70 2d 68 69 64 |) (hkey-|help-hid|
|000007e0| 65 29 20 68 6b 65 79 2d | 68 65 6c 70 2d 68 69 64 |e) hkey-|help-hid|
|000007f0| 65 29 20 28 28 6f 72 20 | 28 62 72 2d 69 6e 2d 62 |e) ((or |(br-in-b|
|00000800| 72 6f 77 73 65 72 29 20 | 28 65 71 20 6d 61 6a 6f |rowser) |(eq majo|
|00000810| 72 2d 6d 6f 64 65 20 27 | 62 72 2d 6d 6f 64 65 29 |r-mode '|br-mode)|
|00000820| 29 20 28 73 6d 61 72 74 | 2d 62 72 2d 64 69 73 70 |) (smart|-br-disp|
|00000830| 61 74 63 68 29 20 73 6d | 61 72 74 2d 62 72 2d 61 |atch) sm|art-br-a|
|00000840| 73 73 69 73 74 2d 64 69 | 73 70 61 74 63 68 29 20 |ssist-di|spatch) |
|00000850| 28 28 61 6e 64 20 28 6d | 65 6d 71 20 6d 61 6a 6f |((and (m|emq majo|
|00000860| 72 2d 6d 6f 64 65 20 27 | 28 63 2d 6d 6f 64 65 20 |r-mode '|(c-mode |
|00000870| 63 2b 2b 2d 63 2d 6d 6f | 64 65 29 29 20 62 75 66 |c++-c-mo|de)) buf|
|00000880| 66 65 72 2d 66 69 6c 65 | 2d 6e 61 6d 65 20 28 73 |fer-file|-name (s|
|00000890| 65 74 71 20 68 6b 65 79 | 2d 76 61 6c 75 65 20 28 |etq hkey|-value (|
|000008a0| 73 6d 61 72 74 2d 63 2d | 61 74 2d 74 61 67 2d 70 |smart-c-|at-tag-p|
|000008b0| 29 29 29 20 28 73 6d 61 | 72 74 2d 63 29 20 73 6d |))) (sma|rt-c) sm|
|000008c0| 61 72 74 2d 63 20 6e 69 | 6c 20 27 6e 65 78 74 2d |art-c ni|l 'next-|
|000008d0| 74 61 67 29 20 28 28 61 | 6e 64 20 28 65 71 20 6d |tag) ((a|nd (eq m|
|000008e0| 61 6a 6f 72 2d 6d 6f 64 | 65 20 27 61 73 6d 2d 6d |ajor-mod|e 'asm-m|
|000008f0| 6f 64 65 29 20 62 75 66 | 66 65 72 2d 66 69 6c 65 |ode) buf|fer-file|
|00000900| 2d 6e 61 6d 65 20 28 73 | 65 74 71 20 68 6b 65 79 |-name (s|etq hkey|
|00000910| 2d 76 61 6c 75 65 20 28 | 73 6d 61 72 74 2d 61 73 |-value (|smart-as|
|00000920| 6d 2d 61 74 2d 74 61 67 | 2d 70 29 29 29 20 28 73 |m-at-tag|-p))) (s|
|00000930| 6d 61 72 74 2d 61 73 6d | 29 20 73 6d 61 72 74 2d |mart-asm|) smart-|
|00000940| 61 73 6d 20 6e 69 6c 20 | 27 6e 65 78 74 2d 74 61 |asm nil |'next-ta|
|00000950| 67 29 20 28 28 69 66 20 | 28 73 6d 61 72 74 2d 6c |g) ((if |(smart-l|
|00000960| 69 73 70 2d 6d 6f 64 65 | 2d 70 29 20 28 73 6d 61 |isp-mode|-p) (sma|
|00000970| 72 74 2d 6c 69 73 70 2d | 61 74 2d 74 61 67 2d 70 |rt-lisp-|at-tag-p|
|00000980| 29 29 20 28 73 6d 61 72 | 74 2d 6c 69 73 70 29 20 |)) (smar|t-lisp) |
|00000990| 73 6d 61 72 74 2d 6c 69 | 73 70 20 27 6e 65 78 74 |smart-li|sp 'next|
|000009a0| 2d 74 61 67 29 20 28 28 | 61 6e 64 20 28 65 71 20 |-tag) ((|and (eq |
|000009b0| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 27 63 2b 2b 2d |major-mo|de 'c++-|
|000009c0| 6d 6f 64 65 29 20 62 75 | 66 66 65 72 2d 66 69 6c |mode) bu|ffer-fil|
|000009d0| 65 2d 6e 61 6d 65 20 28 | 73 65 74 71 20 68 6b 65 |e-name (|setq hke|
|000009e0| 79 2d 76 61 6c 75 65 20 | 28 73 6d 61 72 74 2d 63 |y-value |(smart-c|
|000009f0| 2d 61 74 2d 74 61 67 2d | 70 29 29 29 20 28 69 66 |-at-tag-|p))) (if|
|00000a00| 20 28 66 62 6f 75 6e 64 | 70 20 27 63 2b 2b 2d 74 | (fbound|p 'c++-t|
|00000a10| 6f 2d 64 65 66 69 6e 69 | 74 69 6f 6e 29 20 28 73 |o-defini|tion) (s|
|00000a20| 6d 61 72 74 2d 63 2b 2b | 2d 6f 6f 62 72 29 20 28 |mart-c++|-oobr) (|
|00000a30| 73 6d 61 72 74 2d 63 2b | 2b 29 29 20 69 66 20 28 |smart-c+|+)) if (|
|00000a40| 66 62 6f 75 6e 64 70 20 | 27 63 2b 2b 2d 74 6f 2d |fboundp |'c++-to-|
|00000a50| 64 65 66 69 6e 69 74 69 | 6f 6e 29 20 28 73 6d 61 |definiti|on) (sma|
|00000a60| 72 74 2d 63 2b 2b 2d 6f | 6f 62 72 29 20 28 73 6d |rt-c++-o|obr) (sm|
|00000a70| 61 72 74 2d 63 2b 2b 20 | 6e 69 6c 20 27 6e 65 78 |art-c++ |nil 'nex|
|00000a80| 74 2d 74 61 67 29 29 20 | 28 28 61 6e 64 20 28 65 |t-tag)) |((and (e|
|00000a90| 71 20 6d 61 6a 6f 72 2d | 6d 6f 64 65 20 27 6f 62 |q major-|mode 'ob|
|00000aa0| 6a 63 2d 6d 6f 64 65 29 | 20 62 75 66 66 65 72 2d |jc-mode)| buffer-|
|00000ab0| 66 69 6c 65 2d 6e 61 6d | 65 20 28 73 65 74 71 20 |file-nam|e (setq |
|00000ac0| 68 6b 65 79 2d 76 61 6c | 75 65 20 28 73 6d 61 72 |hkey-val|ue (smar|
|00000ad0| 74 2d 6f 62 6a 63 2d 61 | 74 2d 74 61 67 2d 70 29 |t-objc-a|t-tag-p)|
|00000ae0| 29 29 20 28 69 66 20 28 | 66 62 6f 75 6e 64 70 20 |)) (if (|fboundp |
|00000af0| 27 6f 62 6a 63 2d 74 6f | 2d 64 65 66 69 6e 69 74 |'objc-to|-definit|
|00000b00| 69 6f 6e 29 20 28 73 6d | 61 72 74 2d 6f 62 6a 63 |ion) (sm|art-objc|
|00000b10| 2d 6f 6f 62 72 29 20 28 | 73 6d 61 72 74 2d 6f 62 |-oobr) (|smart-ob|
|00000b20| 6a 63 29 29 20 69 66 20 | 28 66 62 6f 75 6e 64 70 |jc)) if |(fboundp|
|00000b30| 20 27 6f 62 6a 63 2d 74 | 6f 2d 64 65 66 69 6e 69 | 'objc-t|o-defini|
|00000b40| 74 69 6f 6e 29 20 28 73 | 6d 61 72 74 2d 6f 62 6a |tion) (s|mart-obj|
|00000b50| 63 2d 6f 6f 62 72 29 20 | 28 73 6d 61 72 74 2d 6f |c-oobr) |(smart-o|
|00000b60| 62 6a 63 20 6e 69 6c 20 | 27 6e 65 78 74 2d 74 61 |bjc nil |'next-ta|
|00000b70| 67 29 29 20 28 28 61 6e | 64 20 28 65 71 20 6d 61 |g)) ((an|d (eq ma|
|00000b80| 6a 6f 72 2d 6d 6f 64 65 | 20 27 66 6f 72 74 72 61 |jor-mode| 'fortra|
|00000b90| 6e 2d 6d 6f 64 65 29 20 | 62 75 66 66 65 72 2d 66 |n-mode) |buffer-f|
|00000ba0| 69 6c 65 2d 6e 61 6d 65 | 20 28 73 65 74 71 20 68 |ile-name| (setq h|
|00000bb0| 6b 65 79 2d 76 61 6c 75 | 65 20 28 73 6d 61 72 74 |key-valu|e (smart|
|00000bc0| 2d 66 6f 72 74 72 61 6e | 2d 61 74 2d 74 61 67 2d |-fortran|-at-tag-|
|00000bd0| 70 29 29 29 20 28 73 6d | 61 72 74 2d 66 6f 72 74 |p))) (sm|art-fort|
|00000be0| 72 61 6e 29 20 73 6d 61 | 72 74 2d 66 6f 72 74 72 |ran) sma|rt-fortr|
|00000bf0| 61 6e 20 6e 69 6c 20 27 | 6e 65 78 74 2d 74 61 67 |an nil '|next-tag|
|00000c00| 29 20 28 28 65 71 20 6d | 61 6a 6f 72 2d 6d 6f 64 |) ((eq m|ajor-mod|
|00000c10| 65 20 27 6f 63 63 75 72 | 2d 6d 6f 64 65 29 20 28 |e 'occur|-mode) (|
|00000c20| 6f 63 63 75 72 2d 6d 6f | 64 65 2d 67 6f 74 6f 2d |occur-mo|de-goto-|
|00000c30| 6f 63 63 75 72 72 65 6e | 63 65 29 20 6f 63 63 75 |occurren|ce) occu|
|00000c40| 72 2d 6d 6f 64 65 2d 67 | 6f 74 6f 2d 6f 63 63 75 |r-mode-g|oto-occu|
|00000c50| 72 72 65 6e 63 65 29 20 | 28 28 65 71 20 6d 61 6a |rrence) |((eq maj|
|00000c60| 6f 72 2d 6d 6f 64 65 20 | 27 6d 6f 63 63 75 72 2d |or-mode |'moccur-|
|00000c70| 6d 6f 64 65 29 20 28 6d | 6f 63 63 75 72 2d 6d 6f |mode) (m|occur-mo|
|00000c80| 64 65 2d 67 6f 74 6f 2d | 6f 63 63 75 72 72 65 6e |de-goto-|occurren|
|00000c90| 63 65 29 20 6d 6f 63 63 | 75 72 2d 6d 6f 64 65 2d |ce) mocc|ur-mode-|
|00000ca0| 67 6f 74 6f 2d 6f 63 63 | 75 72 72 65 6e 63 65 29 |goto-occ|urrence)|
|00000cb0| 20 28 28 65 71 20 6d 61 | 6a 6f 72 2d 6d 6f 64 65 | ((eq ma|jor-mode|
|00000cc0| 20 27 63 61 6c 65 6e 64 | 61 72 2d 6d 6f 64 65 29 | 'calend|ar-mode)|
|00000cd0| 20 28 73 6d 61 72 74 2d | 63 61 6c 65 6e 64 61 72 | (smart-|calendar|
|00000ce0| 29 20 73 6d 61 72 74 2d | 63 61 6c 65 6e 64 61 72 |) smart-|calendar|
|00000cf0| 2d 61 73 73 69 73 74 29 | 20 28 28 65 71 20 6d 61 |-assist)| ((eq ma|
|00000d00| 6a 6f 72 2d 6d 6f 64 65 | 20 27 75 6e 69 78 2d 61 |jor-mode| 'unix-a|
|00000d10| 70 72 6f 70 6f 73 2d 6d | 6f 64 65 29 20 28 73 6d |propos-m|ode) (sm|
|00000d20| 61 72 74 2d 61 70 72 6f | 70 6f 73 29 20 73 6d 61 |art-apro|pos) sma|
|00000d30| 72 74 2d 61 70 72 6f 70 | 6f 73 2d 61 73 73 69 73 |rt-aprop|os-assis|
|00000d40| 74 29 20 28 28 61 6e 64 | 20 28 66 62 6f 75 6e 64 |t) ((and| (fbound|
|00000d50| 70 20 27 73 6d 61 72 74 | 2d 6d 65 6e 75 2d 63 68 |p 'smart|-menu-ch|
|00000d60| 6f 6f 73 65 2d 6d 65 6e | 75 29 20 28 73 65 74 71 |oose-men|u) (setq|
|00000d70| 20 68 6b 65 79 2d 76 61 | 6c 75 65 20 28 61 6e 64 | hkey-va|lue (and|
|00000d80| 20 68 6b 65 79 2d 61 6c | 77 61 79 73 2d 64 69 73 | hkey-al|ways-dis|
|00000d90| 70 6c 61 79 2d 6d 65 6e | 75 20 28 73 6d 61 72 74 |play-men|u (smart|
|00000da0| 2d 6d 65 6e 75 2d 63 68 | 6f 6f 73 65 2d 6d 65 6e |-menu-ch|oose-men|
|00000db0| 75 29 29 29 20 28 6e 6f | 74 20 28 61 6e 64 20 28 |u))) (no|t (and (|
|00000dc0| 67 65 74 2d 62 75 66 66 | 65 72 2d 77 69 6e 64 6f |get-buff|er-windo|
|00000dd0| 77 20 2a 73 6d 61 72 74 | 2d 6d 65 6e 75 2d 62 75 |w *smart|-menu-bu|
|00000de0| 66 66 65 72 2a 29 20 28 | 65 71 20 68 6b 65 79 2d |ffer*) (|eq hkey-|
|00000df0| 76 61 6c 75 65 20 2a 73 | 6d 61 72 74 2d 6d 65 6e |value *s|mart-men|
|00000e00| 75 2d 63 75 72 72 2a 29 | 29 29 29 20 28 73 6d 61 |u-curr*)|))) (sma|
|00000e10| 72 74 2d 6d 65 6e 75 20 | 68 6b 65 79 2d 76 61 6c |rt-menu |hkey-val|
|00000e20| 75 65 29 20 73 6d 61 72 | 74 2d 6d 65 6e 75 20 68 |ue) smar|t-menu h|
|00000e30| 6b 65 79 2d 76 61 6c 75 | 65 29 20 28 28 65 71 20 |key-valu|e) ((eq |
|00000e40| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 27 6f 75 74 6c |major-mo|de 'outl|
|00000e50| 69 6e 65 2d 6d 6f 64 65 | 29 20 28 73 6d 61 72 74 |ine-mode|) (smart|
|00000e60| 2d 6f 75 74 6c 69 6e 65 | 29 20 73 6d 61 72 74 2d |-outline|) smart-|
|00000e70| 6f 75 74 6c 69 6e 65 2d | 61 73 73 69 73 74 29 20 |outline-|assist) |
|00000e80| 28 28 65 71 20 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |((eq maj|or-mode |
|00000e90| 27 49 6e 66 6f 2d 6d 6f | 64 65 29 20 28 73 6d 61 |'Info-mo|de) (sma|
|00000ea0| 72 74 2d 69 6e 66 6f 29 | 20 73 6d 61 72 74 2d 69 |rt-info)| smart-i|
|00000eb0| 6e 66 6f 2d 61 73 73 69 | 73 74 29 20 28 28 69 66 |nfo-assi|st) ((if|
|00000ec0| 20 28 62 6f 75 6e 64 70 | 20 27 68 6d 61 69 6c 3a | (boundp| 'hmail:|
|00000ed0| 72 65 61 64 65 72 29 20 | 28 6f 72 20 28 65 71 20 |reader) |(or (eq |
|00000ee0| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 68 6d 61 69 6c |major-mo|de hmail|
|00000ef0| 3a 72 65 61 64 65 72 29 | 20 28 65 71 20 6d 61 6a |:reader)| (eq maj|
|00000f00| 6f 72 2d 6d 6f 64 65 20 | 68 6d 61 69 6c 3a 6c 69 |or-mode |hmail:li|
|00000f10| 73 74 65 72 29 29 29 20 | 28 73 6d 61 72 74 2d 68 |ster))) |(smart-h|
|00000f20| 6d 61 69 6c 29 20 73 6d | 61 72 74 2d 68 6d 61 69 |mail) sm|art-hmai|
|00000f30| 6c 2d 61 73 73 69 73 74 | 29 20 28 28 65 71 20 6d |l-assist|) ((eq m|
|00000f40| 61 6a 6f 72 2d 6d 6f 64 | 65 20 27 67 6e 75 73 2d |ajor-mod|e 'gnus-|
|00000f50| 67 72 6f 75 70 2d 6d 6f | 64 65 29 20 28 73 6d 61 |group-mo|de) (sma|
|00000f60| 72 74 2d 67 6e 75 73 2d | 67 72 6f 75 70 29 20 73 |rt-gnus-|group) s|
|00000f70| 6d 61 72 74 2d 67 6e 75 | 73 2d 67 72 6f 75 70 2d |mart-gnu|s-group-|
|00000f80| 61 73 73 69 73 74 29 20 | 28 28 65 71 20 6d 61 6a |assist) |((eq maj|
|00000f90| 6f 72 2d 6d 6f 64 65 20 | 27 67 6e 75 73 2d 73 75 |or-mode |'gnus-su|
|00000fa0| 6d 6d 61 72 79 2d 6d 6f | 64 65 29 20 28 73 6d 61 |mmary-mo|de) (sma|
|00000fb0| 72 74 2d 67 6e 75 73 2d | 73 75 6d 6d 61 72 79 29 |rt-gnus-|summary)|
|00000fc0| 20 73 6d 61 72 74 2d 67 | 6e 75 73 2d 73 75 6d 6d | smart-g|nus-summ|
|00000fd0| 61 72 79 2d 61 73 73 69 | 73 74 29 20 28 28 65 71 |ary-assi|st) ((eq|
|00000fe0| 20 6d 61 6a 6f 72 2d 6d | 6f 64 65 20 27 67 6e 75 | major-m|ode 'gnu|
|00000ff0| 73 2d 61 72 74 69 63 6c | 65 2d 6d 6f 64 65 29 20 |s-articl|e-mode) |
|00001000| 28 73 6d 61 72 74 2d 67 | 6e 75 73 2d 61 72 74 69 |(smart-g|nus-arti|
|00001010| 63 6c 65 29 20 73 6d 61 | 72 74 2d 67 6e 75 73 2d |cle) sma|rt-gnus-|
|00001020| 61 72 74 69 63 6c 65 2d | 61 73 73 69 73 74 29 20 |article-|assist) |
|00001030| 28 28 65 71 20 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |((eq maj|or-mode |
|00001040| 27 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 6d 6f 64 |'Buffer-|menu-mod|
|00001050| 65 29 20 28 73 6d 61 72 | 74 2d 62 75 66 66 65 72 |e) (smar|t-buffer|
|00001060| 2d 6d 65 6e 75 29 20 73 | 6d 61 72 74 2d 62 75 66 |-menu) s|mart-buf|
|00001070| 66 65 72 2d 6d 65 6e 75 | 2d 61 73 73 69 73 74 29 |fer-menu|-assist)|
|00001080| 20 28 28 65 71 20 6d 61 | 6a 6f 72 2d 6d 6f 64 65 | ((eq ma|jor-mode|
|00001090| 20 27 64 69 72 65 64 2d | 6d 6f 64 65 29 20 28 73 | 'dired-|mode) (s|
|000010a0| 6d 61 72 74 2d 64 69 72 | 65 64 29 20 73 6d 61 72 |mart-dir|ed) smar|
|000010b0| 74 2d 64 69 72 65 64 2d | 61 73 73 69 73 74 29 20 |t-dired-|assist) |
|000010c0| 28 28 65 71 20 6d 61 6a | 6f 72 2d 6d 6f 64 65 20 |((eq maj|or-mode |
|000010d0| 27 74 61 72 2d 6d 6f 64 | 65 29 20 28 73 6d 61 72 |'tar-mod|e) (smar|
|000010e0| 74 2d 74 61 72 29 20 73 | 6d 61 72 74 2d 74 61 72 |t-tar) s|mart-tar|
|000010f0| 2d 61 73 73 69 73 74 29 | 20 28 28 73 65 74 71 20 |-assist)| ((setq |
|00001100| 68 6b 65 79 2d 76 61 6c | 75 65 20 28 73 6d 61 72 |hkey-val|ue (smar|
|00001110| 74 2d 6d 61 6e 2d 65 6e | 74 72 79 2d 72 65 66 29 |t-man-en|try-ref)|
|00001120| 29 20 28 73 6d 61 72 74 | 2d 6d 61 6e 2d 64 69 73 |) (smart|-man-dis|
|00001130| 70 6c 61 79 20 68 6b 65 | 79 2d 76 61 6c 75 65 29 |play hke|y-value)|
|00001140| 20 73 6d 61 72 74 2d 6d | 61 6e 2d 64 69 73 70 6c | smart-m|an-displ|
|00001150| 61 79 20 68 6b 65 79 2d | 76 61 6c 75 65 29 20 28 |ay hkey-|value) (|
|00001160| 28 65 71 20 6d 61 6a 6f | 72 2d 6d 6f 64 65 20 27 |(eq majo|r-mode '|
|00001170| 77 33 2d 6d 6f 64 65 29 | 20 28 77 33 2d 66 6f 6c |w3-mode)| (w3-fol|
|00001180| 6c 6f 77 2d 6c 69 6e 6b | 29 20 77 33 2d 67 6f 74 |low-link|) w3-got|
|00001190| 6f 2d 6c 61 73 74 2d 62 | 75 66 66 65 72 29 20 28 |o-last-b|uffer) (|
|000011a0| 28 69 66 20 28 62 6f 75 | 6e 64 70 20 27 72 6f 6c |(if (bou|ndp 'rol|
|000011b0| 6f 2d 64 69 73 70 6c 61 | 79 2d 62 75 66 66 65 72 |o-displa|y-buffer|
|000011c0| 29 20 28 65 71 75 61 6c | 20 28 62 75 66 66 65 72 |) (equal| (buffer|
|000011d0| 2d 6e 61 6d 65 29 20 72 | 6f 6c 6f 2d 64 69 73 70 |-name) r|olo-disp|
|000011e0| 6c 61 79 2d 62 75 66 66 | 65 72 29 29 20 28 73 6d |lay-buff|er)) (sm|
|000011f0| 61 72 74 2d 77 72 6f 6c | 6f 29 20 73 6d 61 72 74 |art-wrol|o) smart|
|00001200| 2d 77 72 6f 6c 6f 2d 61 | 73 73 69 73 74 29 20 28 |-wrolo-a|ssist) (|
|00001210| 73 65 6c 65 63 74 69 76 | 65 2d 64 69 73 70 6c 61 |selectiv|e-displa|
|00001220| 79 20 28 73 6d 61 72 74 | 2d 6f 75 74 6c 69 6e 65 |y (smart|-outline|
|00001230| 29 20 73 6d 61 72 74 2d | 6f 75 74 6c 69 6e 65 2d |) smart-|outline-|
|00001240| 61 73 73 69 73 74 29 29 | 20 22 5c 0a 41 6c 69 73 |assist))| "\.Alis|
|00001250| 74 20 6f 66 20 70 72 65 | 64 69 63 61 74 65 73 20 |t of pre|dicates |
|00001260| 61 6e 64 20 66 6f 72 6d | 2d 63 6f 6e 73 65 73 20 |and form|-conses |
|00001270| 66 6f 72 20 41 63 74 69 | 6f 6e 20 61 6e 64 20 41 |for Acti|on and A|
|00001280| 73 73 69 73 74 20 4b 65 | 79 73 2e 0a 57 68 65 6e |ssist Ke|ys..When|
|00001290| 20 74 68 65 20 41 63 74 | 69 6f 6e 20 6f 72 20 41 | the Act|ion or A|
|000012a0| 73 73 69 73 74 20 4b 65 | 79 20 69 73 20 70 72 65 |ssist Ke|y is pre|
|000012b0| 73 73 65 64 2c 20 74 68 | 65 20 66 69 72 73 74 20 |ssed, th|e first |
|000012c0| 6f 72 20 73 65 63 6f 6e | 64 20 66 6f 72 6d 2c 0a |or secon|d form,.|
|000012d0| 72 65 73 70 65 63 74 69 | 76 65 6c 79 2c 20 61 73 |respecti|vely, as|
|000012e0| 73 6f 63 69 61 74 65 64 | 20 77 69 74 68 20 74 68 |sociated| with th|
|000012f0| 65 20 66 69 72 73 74 20 | 6e 6f 6e 2d 6e 69 6c 20 |e first |non-nil |
|00001300| 70 72 65 64 69 63 61 74 | 65 20 69 73 20 65 76 61 |predicat|e is eva|
|00001310| 6c 75 61 74 65 64 2e 22 | 29 0a 28 61 75 74 6f 6c |luated."|).(autol|
|00001320| 6f 61 64 20 27 76 61 72 | 3a 61 70 70 65 6e 64 20 |oad 'var|:append |
|00001330| 22 68 76 61 72 22 20 22 | 5c 0a 41 70 70 65 6e 64 |"hvar" "|\.Append|
|00001340| 20 74 6f 20 61 20 6c 69 | 73 74 20 76 61 72 69 61 | to a li|st varia|
|00001350| 62 6c 65 2e 22 20 6e 69 | 6c 29 0a 28 62 79 74 65 |ble." ni|l).(byte|
|00001360| 2d 63 6f 64 65 20 22 c0 | c1 21 88 c0 c2 21 88 0b |-code ".|.!...!..|
|00001370| ab 92 c4 c5 21 ac 83 0e | 06 15 c7 c5 c8 c9 23 88 |....!...|......#.|
|00001380| ca cb 21 88 c0 87 22 20 | 5b 72 65 71 75 69 72 65 |..!..." |[require|
|00001390| 20 68 61 72 67 73 20 68 | 6d 6f 75 73 65 2d 6b 65 | hargs h|mouse-ke|
|000013a0| 79 20 68 79 70 65 72 62 | 3a 77 69 6e 64 6f 77 2d |y hyperb|:window-|
|000013b0| 73 79 73 74 65 6d 20 62 | 6f 75 6e 64 70 20 68 6d |system b|oundp hm|
|000013c0| 6f 75 73 65 2d 61 6c 69 | 73 74 20 68 6b 65 79 2d |ouse-ali|st hkey-|
|000013d0| 61 6c 69 73 74 20 70 75 | 74 20 76 61 72 69 61 62 |alist pu|t variab|
|000013e0| 6c 65 2d 64 6f 63 75 6d | 65 6e 74 61 74 69 6f 6e |le-docum|entation|
|000013f0| 20 22 41 6c 69 73 74 20 | 6f 66 20 70 72 65 64 69 | "Alist |of predi|
|00001400| 63 61 74 65 73 20 61 6e | 64 20 66 6f 72 6d 2d 63 |cates an|d form-c|
|00001410| 6f 6e 73 65 73 20 66 6f | 72 20 63 6f 6e 74 65 78 |onses fo|r contex|
|00001420| 74 2d 73 65 6e 73 69 74 | 69 76 65 20 73 6d 61 72 |t-sensit|ive smar|
|00001430| 74 20 6b 65 79 20 6d 6f | 75 73 65 20 61 63 74 69 |t key mo|use acti|
|00001440| 6f 6e 73 2e 5c 6e 57 68 | 65 6e 20 74 68 65 20 61 |ons.\nWh|en the a|
|00001450| 63 74 69 6f 6e 2d 6b 65 | 79 20 6f 72 20 74 68 65 |ction-ke|y or the|
|00001460| 20 61 73 73 69 73 74 2d | 6b 65 79 20 69 73 20 70 | assist-|key is p|
|00001470| 72 65 73 73 65 64 2c 20 | 74 68 65 20 66 69 72 73 |ressed, |the firs|
|00001480| 74 20 6f 72 5c 6e 73 65 | 63 6f 6e 64 20 66 6f 72 |t or\nse|cond for|
|00001490| 6d 2c 20 72 65 73 70 65 | 63 74 69 76 65 6c 79 2c |m, respe|ctively,|
|000014a0| 20 61 73 73 6f 63 69 61 | 74 65 64 20 77 69 74 68 | associa|ted with|
|000014b0| 20 74 68 65 20 66 69 72 | 73 74 20 6e 6f 6e 2d 6e | the fir|st non-n|
|000014c0| 69 6c 20 70 72 65 64 69 | 63 61 74 65 20 69 73 5c |il predi|cate is\|
|000014d0| 6e 65 76 61 6c 75 61 74 | 65 64 2e 22 20 6c 6f 61 |nevaluat|ed." loa|
|000014e0| 64 20 22 68 75 69 2d 77 | 69 6e 64 6f 77 22 5d 20 |d "hui-w|indow"] |
|000014f0| 34 29 0a 28 66 73 65 74 | 20 27 66 69 72 73 74 2d |4).(fset| 'first-|
|00001500| 6c 69 6e 65 2d 70 20 23 | 5b 6e 69 6c 20 22 8a c0 |line-p #|[nil "..|
|00001510| 79 88 6f 29 87 22 20 5b | 30 5d 20 31 20 22 5c 0a |y.o)." [|0] 1 "\.|
|00001520| 52 65 74 75 72 6e 73 20 | 74 72 75 65 20 69 66 20 |Returns |true if |
|00001530| 70 6f 69 6e 74 20 69 73 | 20 6f 6e 20 74 68 65 20 |point is| on the |
|00001540| 66 69 72 73 74 20 6c 69 | 6e 65 20 6f 66 20 74 68 |first li|ne of th|
|00001550| 65 20 62 75 66 66 65 72 | 2e 22 5d 29 0a 28 66 73 |e buffer|."]).(fs|
|00001560| 65 74 20 27 6c 61 73 74 | 2d 6c 69 6e 65 2d 70 20 |et 'last|-line-p |
|00001570| 23 5b 6e 69 6c 20 22 8a | c0 7f 88 6d 29 87 22 20 |#[nil ".|...m)." |
|00001580| 5b 6e 69 6c 5d 20 31 20 | 22 5c 0a 52 65 74 75 72 |[nil] 1 |"\.Retur|
|00001590| 6e 73 20 74 72 75 65 20 | 69 66 20 70 6f 69 6e 74 |ns true |if point|
|000015a0| 20 69 73 20 6f 6e 20 74 | 68 65 20 6c 61 73 74 20 | is on t|he last |
|000015b0| 6c 69 6e 65 20 6f 66 20 | 74 68 65 20 62 75 66 66 |line of |the buff|
|000015c0| 65 72 2e 22 5d 29 0a 28 | 66 73 65 74 20 27 73 6d |er."]).(|fset 'sm|
|000015d0| 61 72 74 2d 63 6f 6d 70 | 6c 65 74 69 6f 6e 2d 68 |art-comp|letion-h|
|000015e0| 65 6c 70 20 23 5b 6e 69 | 6c 20 22 c0 c1 c2 20 5c |elp #[ni|l "... \|
|000015f0| 22 ad 82 c1 20 87 22 20 | 5b 77 68 65 72 65 2d 69 |"... ." |[where-i|
|00001600| 73 2d 69 6e 74 65 72 6e | 61 6c 20 6d 69 6e 69 62 |s-intern|al minib|
|00001610| 75 66 66 65 72 2d 63 6f | 6d 70 6c 65 74 69 6f 6e |uffer-co|mpletion|
|00001620| 2d 68 65 6c 70 20 63 75 | 72 72 65 6e 74 2d 6c 6f |-help cu|rrent-lo|
|00001630| 63 61 6c 2d 6d 61 70 5d | 20 33 20 22 5c 0a 4f 66 |cal-map]| 3 "\.Of|
|00001640| 66 65 72 20 63 6f 6d 70 | 6c 65 74 69 6f 6e 20 68 |fer comp|letion h|
|00001650| 65 6c 70 20 66 6f 72 20 | 63 75 72 72 65 6e 74 20 |elp for |current |
|00001660| 6d 69 6e 69 62 75 66 66 | 65 72 20 61 72 67 75 6d |minibuff|er argum|
|00001670| 65 6e 74 2c 20 69 66 20 | 61 6e 79 2e 22 5d 29 0a |ent, if |any."]).|
|00001680| 28 66 73 65 74 20 27 73 | 6d 61 72 74 2d 73 79 6d |(fset 's|mart-sym|
|00001690| 6c 69 6e 6b 2d 65 78 70 | 61 6e 64 20 23 5b 28 70 |link-exp|and #[(p|
|000016a0| 61 74 68 29 20 22 c0 c1 | 21 ac 82 5c 6e 87 c3 5c |ath) "..|!..\n..\|
|000016b0| 6e 47 c4 89 1d 1e 06 1e | 07 1e 08 0e 08 0e 07 57 |nG......|.......W|
|000016c0| ab 9e c9 ca 5c 6e 0e 08 | 23 89 15 ab 94 0e 06 5c |....\n..|#......\|
|000016d0| 6e 0e 08 c3 95 89 16 08 | 4f 50 15 c1 0d 21 16 06 |n.......|OP...!..|
|000016e0| aa 5b 0e 06 2c 87 22 20 | 5b 66 62 6f 75 6e 64 70 |.[..,." |[fboundp|
|000016f0| 20 73 79 6d 6c 69 6e 6b | 2d 72 65 66 65 72 65 6e | symlink|-referen|
|00001700| 74 20 70 61 74 68 20 30 | 20 6e 69 6c 20 70 61 72 |t path 0| nil par|
|00001710| 74 20 72 65 66 20 6c 65 | 6e 20 73 74 61 72 74 20 |t ref le|n start |
|00001720| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 22 2f 5b |string-m|atch "/[|
|00001730| 5e 2f 5d 2a 22 5d 20 35 | 20 22 5c 0a 52 65 74 75 |^/]*"] 5| "\.Retu|
|00001740| 72 6e 73 20 72 65 66 65 | 72 65 6e 74 20 66 6f 72 |rns refe|rent for|
|00001750| 20 70 6f 73 73 69 62 6c | 65 20 73 79 6d 62 6f 6c | possibl|e symbol|
|00001760| 69 63 20 6c 69 6e 6b 2c | 20 50 41 54 48 2e 22 5d |ic link,| PATH."]|
|00001770| 29 0a 28 66 73 65 74 20 | 27 73 6d 61 72 74 2d 62 |).(fset |'smart-b|
|00001780| 75 66 66 65 72 2d 6d 65 | 6e 75 20 23 5b 28 26 6f |uffer-me|nu #[(&o|
|00001790| 70 74 69 6f 6e 61 6c 20 | 69 6e 2d 62 72 6f 77 73 |ptional |in-brows|
|000017a0| 65 72 29 20 22 c0 20 ab | 83 c1 20 87 6e ab 83 c2 |er) ". .|.. .n...|
|000017b0| 20 87 8a 60 53 62 88 6e | 29 ab 83 c3 20 87 0c ab | ..`Sb.n|)... ...|
|000017c0| 83 c5 20 87 c6 20 87 22 | 20 5b 6c 61 73 74 2d 6c |.. .. ."| [last-l|
|000017d0| 69 6e 65 2d 70 20 42 75 | 66 66 65 72 2d 6d 65 6e |ine-p Bu|ffer-men|
|000017e0| 75 2d 65 78 65 63 75 74 | 65 20 42 75 66 66 65 72 |u-execut|e Buffer|
|000017f0| 2d 6d 65 6e 75 2d 6d 61 | 72 6b 20 42 75 66 66 65 |-menu-ma|rk Buffe|
|00001800| 72 2d 6d 65 6e 75 2d 73 | 61 76 65 20 69 6e 2d 62 |r-menu-s|ave in-b|
|00001810| 72 6f 77 73 65 72 20 62 | 72 2d 62 75 66 66 65 72 |rowser b|r-buffer|
|00001820| 2d 6d 65 6e 75 2d 73 65 | 6c 65 63 74 20 42 75 66 |-menu-se|lect Buf|
|00001830| 66 65 72 2d 6d 65 6e 75 | 2d 73 65 6c 65 63 74 5d |fer-menu|-select]|
|00001840| 20 31 20 22 5c 0a 55 73 | 65 73 20 61 20 73 69 6e | 1 "\.Us|es a sin|
|00001850| 67 6c 65 20 6b 65 79 20 | 6f 72 20 6d 6f 75 73 65 |gle key |or mouse|
|00001860| 20 6b 65 79 20 74 6f 20 | 6d 61 6e 69 70 75 6c 61 | key to |manipula|
|00001870| 74 65 20 62 75 66 66 65 | 72 2d 6d 65 6e 75 20 65 |te buffe|r-menu e|
|00001880| 6e 74 72 69 65 73 2e 0a | 0a 49 6e 76 6f 6b 65 64 |ntries..|.Invoked|
|00001890| 20 76 69 61 20 61 20 6b | 65 79 20 70 72 65 73 73 | via a k|ey press|
|000018a0| 20 77 68 65 6e 20 69 6e | 20 42 75 66 66 65 72 2d | when in| Buffer-|
|000018b0| 6d 65 6e 75 2d 6d 6f 64 | 65 2e 20 20 49 74 20 61 |menu-mod|e.  It a|
|000018c0| 73 73 75 6d 65 73 20 74 | 68 61 74 20 69 74 73 0a |ssumes t|hat its.|
|000018d0| 63 61 6c 6c 65 72 20 68 | 61 73 20 61 6c 72 65 61 |caller h|as alrea|
|000018e0| 64 79 20 63 68 65 63 6b | 65 64 20 74 68 61 74 20 |dy check|ed that |
|000018f0| 74 68 65 20 6b 65 79 20 | 77 61 73 20 70 72 65 73 |the key |was pres|
|00001900| 73 65 64 20 69 6e 20 61 | 6e 20 61 70 70 72 6f 70 |sed in a|n approp|
|00001910| 72 69 61 74 65 20 62 75 | 66 66 65 72 0a 61 6e 64 |riate bu|ffer.and|
|00001920| 20 68 61 73 20 6d 6f 76 | 65 64 20 74 68 65 20 63 | has mov|ed the c|
|00001930| 75 72 73 6f 72 20 74 68 | 65 72 65 2e 0a 0a 4f 70 |ursor th|ere...Op|
|00001940| 74 69 6f 6e 61 6c 20 6e | 6f 6e 2d 6e 69 6c 20 49 |tional n|on-nil I|
|00001950| 4e 2d 42 52 4f 57 53 45 | 52 20 69 6e 64 69 63 61 |N-BROWSE|R indica|
|00001960| 74 65 73 20 75 73 65 20 | 77 69 74 68 69 6e 20 74 |tes use |within t|
|00001970| 68 65 20 4f 4f 2d 42 72 | 6f 77 73 65 72 2e 0a 0a |he OO-Br|owser...|
|00001980| 49 66 20 6b 65 79 20 69 | 73 20 70 72 65 73 73 65 |If key i|s presse|
|00001990| 64 3a 0a 20 28 31 29 20 | 6f 6e 20 74 68 65 20 66 |d:. (1) |on the f|
|000019a0| 69 72 73 74 20 63 6f 6c | 75 6d 6e 20 6f 66 20 61 |irst col|umn of a|
|000019b0| 6e 20 65 6e 74 72 79 2c | 20 74 68 65 20 73 65 6c |n entry,| the sel|
|000019c0| 65 63 74 65 64 20 62 75 | 66 66 65 72 20 69 73 20 |ected bu|ffer is |
|000019d0| 6d 61 72 6b 65 64 20 66 | 6f 72 0a 20 20 20 20 20 |marked f|or.     |
|000019e0| 64 69 73 70 6c 61 79 3b | 20 0a 20 28 32 29 20 6f |display;| . (2) o|
|000019f0| 6e 20 74 68 65 20 73 65 | 63 6f 6e 64 20 63 6f 6c |n the se|cond col|
|00001a00| 75 6d 6e 20 6f 66 20 61 | 6e 20 65 6e 74 72 79 2c |umn of a|n entry,|
|00001a10| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 20 62 75 | the sel|ected bu|
|00001a20| 66 66 65 72 20 69 73 20 | 6d 61 72 6b 65 64 20 74 |ffer is |marked t|
|00001a30| 6f 20 62 65 0a 20 20 20 | 20 20 73 61 76 65 64 3b |o be.   |  saved;|
|00001a40| 0a 20 28 33 29 20 61 6e | 79 77 68 65 72 65 20 65 |. (3) an|ywhere e|
|00001a50| 6c 73 65 20 77 69 74 68 | 69 6e 20 61 6e 20 65 6e |lse with|in an en|
|00001a60| 74 72 79 20 6c 69 6e 65 | 2c 20 61 6c 6c 20 73 61 |try line|, all sa|
|00001a70| 76 65 73 20 61 6e 64 20 | 64 65 6c 65 74 65 73 20 |ves and |deletes |
|00001a80| 61 72 65 20 64 6f 6e 65 | 2c 20 61 6e 64 0a 20 20 |are done|, and.  |
|00001a90| 20 20 20 73 65 6c 65 63 | 74 65 64 20 62 75 66 66 |   selec|ted buff|
|00001aa0| 65 72 73 20 61 72 65 20 | 64 69 73 70 6c 61 79 65 |ers are |displaye|
|00001ab0| 64 2c 20 69 6e 63 6c 75 | 64 69 6e 67 20 74 68 65 |d, inclu|ding the|
|00001ac0| 20 6f 6e 65 20 6a 75 73 | 74 20 63 6c 69 63 6b 65 | one jus|t clicke|
|00001ad0| 64 20 6f 6e 20 28 69 66 | 0a 20 20 20 20 20 49 4e |d on (if|.     IN|
|00001ae0| 2d 42 52 4f 57 53 45 52 | 2c 20 6f 6e 6c 79 20 74 |-BROWSER|, only t|
|00001af0| 68 65 20 73 65 6c 65 63 | 74 65 64 20 62 75 66 66 |he selec|ted buff|
|00001b00| 65 72 20 69 73 20 64 69 | 73 70 6c 61 79 65 64 29 |er is di|splayed)|
|00001b10| 3b 0a 20 28 34 29 20 6f | 6e 20 6f 72 20 61 66 74 |;. (4) o|n or aft|
|00001b20| 65 72 20 74 68 65 20 6c | 61 73 74 20 6c 69 6e 65 |er the l|ast line|
|00001b30| 20 69 6e 20 74 68 65 20 | 62 75 66 66 65 72 2c 20 | in the |buffer, |
|00001b40| 61 6c 6c 20 73 61 76 65 | 73 20 61 6e 64 20 64 65 |all save|s and de|
|00001b50| 6c 65 74 65 73 20 61 72 | 65 20 64 6f 6e 65 2e 22 |letes ar|e done."|
|00001b60| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 73 6d | nil]).(|fset 'sm|
|00001b70| 61 72 74 2d 62 75 66 66 | 65 72 2d 6d 65 6e 75 2d |art-buff|er-menu-|
|00001b80| 61 73 73 69 73 74 20 23 | 5b 6e 69 6c 20 22 c0 20 |assist #|[nil ". |
|00001b90| ab 86 c1 20 88 c2 79 87 | 6e ab 83 c3 20 87 8a 60 |... ..y.|n... ..`|
|00001ba0| 53 62 88 6e 29 ab 83 c3 | 20 87 c4 20 87 22 20 5b |Sb.n)...| .. ." [|
|00001bb0| 6c 61 73 74 2d 6c 69 6e | 65 2d 70 20 6c 69 73 74 |last-lin|e-p list|
|00001bc0| 2d 62 75 66 66 65 72 73 | 20 33 20 42 75 66 66 65 |-buffers| 3 Buffe|
|00001bd0| 72 2d 6d 65 6e 75 2d 75 | 6e 6d 61 72 6b 20 42 75 |r-menu-u|nmark Bu|
|00001be0| 66 66 65 72 2d 6d 65 6e | 75 2d 64 65 6c 65 74 65 |ffer-men|u-delete|
|00001bf0| 5d 20 31 20 22 5c 0a 55 | 73 65 73 20 61 20 73 69 |] 1 "\.U|ses a si|
|00001c00| 6e 67 6c 65 20 61 73 73 | 69 73 74 2d 6b 65 79 20 |ngle ass|ist-key |
|00001c10| 6f 72 20 6d 6f 75 73 65 | 20 61 73 73 69 73 74 2d |or mouse| assist-|
|00001c20| 6b 65 79 20 74 6f 20 6d | 61 6e 69 70 75 6c 61 74 |key to m|anipulat|
|00001c30| 65 20 62 75 66 66 65 72 | 2d 6d 65 6e 75 20 65 6e |e buffer|-menu en|
|00001c40| 74 72 69 65 73 2e 0a 0a | 49 6e 76 6f 6b 65 64 20 |tries...|Invoked |
|00001c50| 76 69 61 20 61 6e 20 61 | 73 73 69 73 74 2d 6b 65 |via an a|ssist-ke|
|00001c60| 79 20 70 72 65 73 73 20 | 77 68 65 6e 20 69 6e 20 |y press |when in |
|00001c70| 42 75 66 66 65 72 2d 6d | 65 6e 75 2d 6d 6f 64 65 |Buffer-m|enu-mode|
|00001c80| 2e 20 20 49 74 20 61 73 | 73 75 6d 65 73 20 74 68 |.  It as|sumes th|
|00001c90| 61 74 20 69 74 73 0a 63 | 61 6c 6c 65 72 20 68 61 |at its.c|aller ha|
|00001ca0| 73 20 61 6c 72 65 61 64 | 79 20 63 68 65 63 6b 65 |s alread|y checke|
|00001cb0| 64 20 74 68 61 74 20 74 | 68 65 20 61 73 73 69 73 |d that t|he assis|
|00001cc0| 74 2d 6b 65 79 20 77 61 | 73 20 70 72 65 73 73 65 |t-key wa|s presse|
|00001cd0| 64 20 69 6e 20 61 6e 20 | 61 70 70 72 6f 70 72 69 |d in an |appropri|
|00001ce0| 61 74 65 0a 62 75 66 66 | 65 72 20 61 6e 64 20 68 |ate.buff|er and h|
|00001cf0| 61 73 20 6d 6f 76 65 64 | 20 74 68 65 20 63 75 72 |as moved| the cur|
|00001d00| 73 6f 72 20 74 68 65 72 | 65 2e 0a 0a 49 66 20 61 |sor ther|e...If a|
|00001d10| 73 73 69 73 74 2d 6b 65 | 79 20 69 73 20 70 72 65 |ssist-ke|y is pre|
|00001d20| 73 73 65 64 3a 0a 20 28 | 31 29 20 6f 6e 20 74 68 |ssed:. (|1) on th|
|00001d30| 65 20 66 69 72 73 74 20 | 6f 72 20 73 65 63 6f 6e |e first |or secon|
|00001d40| 64 20 63 6f 6c 75 6d 6e | 20 6f 66 20 61 6e 20 65 |d column| of an e|
|00001d50| 6e 74 72 79 2c 20 74 68 | 65 20 73 65 6c 65 63 74 |ntry, th|e select|
|00001d60| 65 64 20 62 75 66 66 65 | 72 20 69 73 20 75 6e 6d |ed buffe|r is unm|
|00001d70| 61 72 6b 65 64 0a 20 20 | 20 20 20 66 6f 72 20 64 |arked.  |   for d|
|00001d80| 69 73 70 6c 61 79 20 61 | 6e 64 20 66 6f 72 20 73 |isplay a|nd for s|
|00001d90| 61 76 69 6e 67 20 6f 72 | 20 64 65 6c 65 74 69 6f |aving or| deletio|
|00001da0| 6e 3b 20 0a 20 28 32 29 | 20 61 6e 79 77 68 65 72 |n; . (2)| anywher|
|00001db0| 65 20 65 6c 73 65 20 77 | 69 74 68 69 6e 20 61 6e |e else w|ithin an|
|00001dc0| 20 65 6e 74 72 79 20 6c | 69 6e 65 2c 20 74 68 65 | entry l|ine, the|
|00001dd0| 20 73 65 6c 65 63 74 65 | 64 20 62 75 66 66 65 72 | selecte|d buffer|
|00001de0| 20 69 73 20 6d 61 72 6b | 65 64 20 66 6f 72 0a 20 | is mark|ed for. |
|00001df0| 20 20 20 20 64 65 6c 65 | 74 69 6f 6e 3b 0a 20 28 |    dele|tion;. (|
|00001e00| 33 29 20 6f 6e 20 6f 72 | 20 61 66 74 65 72 20 74 |3) on or| after t|
|00001e10| 68 65 20 6c 61 73 74 20 | 6c 69 6e 65 20 69 6e 20 |he last |line in |
|00001e20| 74 68 65 20 62 75 66 66 | 65 72 2c 20 61 6c 6c 20 |the buff|er, all |
|00001e30| 64 69 73 70 6c 61 79 2c | 20 73 61 76 65 2c 20 61 |display,| save, a|
|00001e40| 6e 64 20 64 65 6c 65 74 | 65 0a 20 20 20 20 20 6d |nd delet|e.     m|
|00001e50| 61 72 6b 73 20 6f 6e 20 | 61 6c 6c 20 65 6e 74 72 |arks on |all entr|
|00001e60| 69 65 73 20 61 72 65 20 | 75 6e 64 6f 6e 65 2e 22 |ies are |undone."|
|00001e70| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 73 6d | nil]).(|fset 'sm|
|00001e80| 61 72 74 2d 63 61 6c 65 | 6e 64 61 72 20 23 5b 6e |art-cale|ndar #[n|
|00001e90| 69 6c 20 22 6d ab 87 c0 | 20 88 c1 c2 21 87 69 c3 |il "m...| ...!.i.|
|00001ea0| 57 ab 87 c0 20 88 c4 c2 | 21 87 c0 20 88 c5 c2 21 |W... ...|!.. ...!|
|00001eb0| 87 22 20 5b 63 61 6c 65 | 6e 64 61 72 2d 63 75 72 |." [cale|ndar-cur|
|00001ec0| 73 6f 72 2d 74 6f 2d 6e | 65 61 72 65 73 74 2d 64 |sor-to-n|earest-d|
|00001ed0| 61 74 65 20 73 63 72 6f | 6c 6c 2d 63 61 6c 65 6e |ate scro|ll-calen|
|00001ee0| 64 61 72 2d 6c 65 66 74 | 2d 74 68 72 65 65 2d 6d |dar-left|-three-m|
|00001ef0| 6f 6e 74 68 73 20 31 20 | 35 20 73 63 72 6f 6c 6c |onths 1 |5 scroll|
|00001f00| 2d 63 61 6c 65 6e 64 61 | 72 2d 72 69 67 68 74 2d |-calenda|r-right-|
|00001f10| 74 68 72 65 65 2d 6d 6f | 6e 74 68 73 20 76 69 65 |three-mo|nths vie|
|00001f20| 77 2d 64 69 61 72 79 2d | 65 6e 74 72 69 65 73 5d |w-diary-|entries]|
|00001f30| 20 32 20 22 5c 0a 55 73 | 65 73 20 61 20 73 69 6e | 2 "\.Us|es a sin|
|00001f40| 67 6c 65 20 6b 65 79 20 | 6f 72 20 6d 6f 75 73 65 |gle key |or mouse|
|00001f50| 20 6b 65 79 20 74 6f 20 | 6d 61 6e 69 70 75 6c 61 | key to |manipula|
|00001f60| 74 65 20 74 68 65 20 73 | 63 72 6f 6c 6c 69 6e 67 |te the s|crolling|
|00001f70| 20 63 61 6c 65 6e 64 61 | 72 2e 0a 0a 49 6e 76 6f | calenda|r...Invo|
|00001f80| 6b 65 64 20 76 69 61 20 | 61 20 6b 65 79 20 70 72 |ked via |a key pr|
|00001f90| 65 73 73 20 77 68 65 6e | 20 69 6e 20 63 61 6c 65 |ess when| in cale|
|00001fa0| 6e 64 61 72 2d 6d 6f 64 | 65 2e 20 20 49 74 20 61 |ndar-mod|e.  It a|
|00001fb0| 73 73 75 6d 65 73 20 74 | 68 61 74 20 69 74 73 0a |ssumes t|hat its.|
|00001fc0| 63 61 6c 6c 65 72 20 68 | 61 73 20 61 6c 72 65 61 |caller h|as alrea|
|00001fd0| 64 79 20 63 68 65 63 6b | 65 64 20 74 68 61 74 20 |dy check|ed that |
|00001fe0| 74 68 65 20 6b 65 79 20 | 77 61 73 20 70 72 65 73 |the key |was pres|
|00001ff0| 73 65 64 20 69 6e 20 61 | 6e 20 61 70 70 72 6f 70 |sed in a|n approp|
|00002000| 72 69 61 74 65 20 62 75 | 66 66 65 72 0a 61 6e 64 |riate bu|ffer.and|
|00002010| 20 68 61 73 20 6d 6f 76 | 65 64 20 74 68 65 20 63 | has mov|ed the c|
|00002020| 75 72 73 6f 72 20 74 68 | 65 72 65 2e 0a 0a 49 66 |ursor th|ere...If|
|00002030| 20 6b 65 79 20 69 73 20 | 70 72 65 73 73 65 64 3a | key is |pressed:|
|00002040| 0a 20 28 31 29 20 61 74 | 20 74 68 65 20 65 6e 64 |. (1) at| the end|
|00002050| 20 6f 66 20 74 68 65 20 | 62 75 66 66 65 72 2c 20 | of the |buffer, |
|00002060| 74 68 65 20 63 61 6c 65 | 6e 64 61 72 20 69 73 20 |the cale|ndar is |
|00002070| 73 63 72 6f 6c 6c 65 64 | 20 66 6f 72 77 61 72 64 |scrolled| forward|
|00002080| 20 33 20 6d 6f 6e 74 68 | 73 3b 0a 20 28 32 29 20 | 3 month|s;. (2) |
|00002090| 74 6f 20 74 68 65 20 6c | 65 66 74 20 6f 66 20 61 |to the l|eft of a|
|000020a0| 6e 79 20 64 61 74 65 73 | 20 6f 6e 20 61 20 63 61 |ny dates| on a ca|
|000020b0| 6c 65 6e 64 61 72 20 6c | 69 6e 65 2c 20 74 68 65 |lendar l|ine, the|
|000020c0| 20 63 61 6c 65 6e 64 61 | 72 20 69 73 20 73 63 72 | calenda|r is scr|
|000020d0| 6f 6c 6c 65 64 0a 20 20 | 20 20 20 62 61 63 6b 77 |olled.  |   backw|
|000020e0| 61 72 64 20 33 20 6d 6f | 6e 74 68 73 3b 0a 20 28 |ard 3 mo|nths;. (|
|000020f0| 33 29 20 6f 6e 20 61 20 | 64 61 74 65 2c 20 74 68 |3) on a |date, th|
|00002100| 65 20 64 69 61 72 79 20 | 65 6e 74 72 69 65 73 20 |e diary |entries |
|00002110| 66 6f 72 20 74 68 65 20 | 64 61 74 65 2c 20 69 66 |for the |date, if|
|00002120| 20 61 6e 79 2c 20 61 72 | 65 20 64 69 73 70 6c 61 | any, ar|e displa|
|00002130| 79 65 64 2e 22 20 6e 69 | 6c 5d 29 0a 28 66 73 65 |yed." ni|l]).(fse|
|00002140| 74 20 27 73 6d 61 72 74 | 2d 63 61 6c 65 6e 64 61 |t 'smart|-calenda|
|00002150| 72 2d 61 73 73 69 73 74 | 20 23 5b 6e 69 6c 20 22 |r-assist| #[nil "|
|00002160| 6d ab 87 c0 20 88 c1 c2 | 21 87 69 c3 57 ab 87 c0 |m... ...|!.i.W...|
|00002170| 20 88 c4 c2 21 87 c5 20 | 87 22 20 5b 63 61 6c 65 | ...!.. |." [cale|
|00002180| 6e 64 61 72 2d 63 75 72 | 73 6f 72 2d 74 6f 2d 6e |ndar-cur|sor-to-n|
|00002190| 65 61 72 65 73 74 2d 64 | 61 74 65 20 73 63 72 6f |earest-d|ate scro|
|000021a0| 6c 6c 2d 63 61 6c 65 6e | 64 61 72 2d 72 69 67 68 |ll-calen|dar-righ|
|000021b0| 74 2d 74 68 72 65 65 2d | 6d 6f 6e 74 68 73 20 31 |t-three-|months 1|
|000021c0| 20 35 20 73 63 72 6f 6c | 6c 2d 63 61 6c 65 6e 64 | 5 scrol|l-calend|
|000021d0| 61 72 2d 6c 65 66 74 2d | 74 68 72 65 65 2d 6d 6f |ar-left-|three-mo|
|000021e0| 6e 74 68 73 20 6d 61 72 | 6b 2d 64 69 61 72 79 2d |nths mar|k-diary-|
|000021f0| 65 6e 74 72 69 65 73 5d | 20 32 20 22 5c 0a 55 73 |entries]| 2 "\.Us|
|00002200| 65 73 20 61 20 73 69 6e | 67 6c 65 20 61 73 73 69 |es a sin|gle assi|
|00002210| 73 74 2d 6b 65 79 20 6f | 72 20 6d 6f 75 73 65 20 |st-key o|r mouse |
|00002220| 61 73 73 69 73 74 2d 6b | 65 79 20 74 6f 20 6d 61 |assist-k|ey to ma|
|00002230| 6e 69 70 75 6c 61 74 65 | 20 74 68 65 20 73 63 72 |nipulate| the scr|
|00002240| 6f 6c 6c 69 6e 67 20 63 | 61 6c 65 6e 64 61 72 2e |olling c|alendar.|
|00002250| 0a 0a 49 6e 76 6f 6b 65 | 64 20 76 69 61 20 61 6e |..Invoke|d via an|
|00002260| 20 61 73 73 69 73 74 2d | 6b 65 79 20 70 72 65 73 | assist-|key pres|
|00002270| 73 20 77 68 65 6e 20 69 | 6e 20 63 61 6c 65 6e 64 |s when i|n calend|
|00002280| 61 72 2d 6d 6f 64 65 2e | 20 20 49 74 20 61 73 73 |ar-mode.|  It ass|
|00002290| 75 6d 65 73 20 74 68 61 | 74 20 69 74 73 0a 63 61 |umes tha|t its.ca|
|000022a0| 6c 6c 65 72 20 68 61 73 | 20 61 6c 72 65 61 64 79 |ller has| already|
|000022b0| 20 63 68 65 63 6b 65 64 | 20 74 68 61 74 20 74 68 | checked| that th|
|000022c0| 65 20 61 73 73 69 73 74 | 2d 6b 65 79 20 77 61 73 |e assist|-key was|
|000022d0| 20 70 72 65 73 73 65 64 | 20 69 6e 20 61 6e 20 61 | pressed| in an a|
|000022e0| 70 70 72 6f 70 72 69 61 | 74 65 0a 62 75 66 66 65 |ppropria|te.buffe|
|000022f0| 72 20 61 6e 64 20 68 61 | 73 20 6d 6f 76 65 64 20 |r and ha|s moved |
|00002300| 74 68 65 20 63 75 72 73 | 6f 72 20 74 68 65 72 65 |the curs|or there|
|00002310| 2e 0a 0a 49 66 20 61 73 | 73 69 73 74 2d 6b 65 79 |...If as|sist-key|
|00002320| 20 69 73 20 70 72 65 73 | 73 65 64 3a 0a 20 28 31 | is pres|sed:. (1|
|00002330| 29 20 61 74 20 74 68 65 | 20 65 6e 64 20 6f 66 20 |) at the| end of |
|00002340| 74 68 65 20 62 75 66 66 | 65 72 2c 20 74 68 65 20 |the buff|er, the |
|00002350| 63 61 6c 65 6e 64 61 72 | 20 69 73 20 73 63 72 6f |calendar| is scro|
|00002360| 6c 6c 65 64 20 62 61 63 | 6b 77 61 72 64 20 33 20 |lled bac|kward 3 |
|00002370| 6d 6f 6e 74 68 73 3b 0a | 20 28 32 29 20 74 6f 20 |months;.| (2) to |
|00002380| 74 68 65 20 6c 65 66 74 | 20 6f 66 20 61 6e 79 20 |the left| of any |
|00002390| 64 61 74 65 73 20 6f 6e | 20 61 20 63 61 6c 65 6e |dates on| a calen|
|000023a0| 64 61 72 20 6c 69 6e 65 | 2c 20 74 68 65 20 63 61 |dar line|, the ca|
|000023b0| 6c 65 6e 64 61 72 20 69 | 73 20 73 63 72 6f 6c 6c |lendar i|s scroll|
|000023c0| 65 64 0a 20 20 20 20 20 | 66 6f 72 77 61 72 64 20 |ed.     |forward |
|000023d0| 33 20 6d 6f 6e 74 68 73 | 3b 0a 20 28 33 29 20 61 |3 months|;. (3) a|
|000023e0| 6e 79 77 68 65 72 65 20 | 65 6c 73 65 2c 20 61 6c |nywhere |else, al|
|000023f0| 6c 20 64 61 74 65 73 20 | 77 69 74 68 20 6d 61 72 |l dates |with mar|
|00002400| 6b 69 6e 67 20 64 69 61 | 72 79 20 65 6e 74 72 69 |king dia|ry entri|
|00002410| 65 73 20 61 72 65 20 6d | 61 72 6b 65 64 20 69 6e |es are m|arked in|
|00002420| 20 74 68 65 0a 20 20 20 | 20 20 63 61 6c 65 6e 64 | the.   |  calend|
|00002430| 61 72 20 77 69 6e 64 6f | 77 2e 22 20 6e 69 6c 5d |ar windo|w." nil]|
|00002440| 29 0a 28 66 73 65 74 20 | 27 73 6d 61 72 74 2d 64 |).(fset |'smart-d|
|00002450| 69 72 65 64 20 23 5b 6e | 69 6c 20 22 c0 20 ab ab |ired #[n|il ". ..|
|00002460| c1 1a 8a c3 62 88 c4 c5 | c1 c6 23 12 29 5c 6e ab |....b...|..#.)\n.|
|00002470| 97 c7 c8 21 ab 84 c8 20 | aa 90 c7 c9 21 ab 84 c9 |...!... |....!...|
|00002480| 20 aa 87 ca cb 21 aa 82 | cc 20 29 87 cd ce 20 21 | ....!..|. )... !|
|00002490| 87 22 20 5b 6c 61 73 74 | 2d 6c 69 6e 65 2d 70 20 |." [last|-line-p |
|000024a0| 6e 69 6c 20 66 6c 61 67 | 67 65 64 20 31 20 72 65 |nil flag|ged 1 re|
|000024b0| 2d 73 65 61 72 63 68 2d | 66 6f 72 77 61 72 64 20 |-search-|forward |
|000024c0| 22 5e 44 22 20 74 20 66 | 62 6f 75 6e 64 70 20 64 |"^D" t f|boundp d|
|000024d0| 69 72 65 64 2d 64 6f 2d | 64 65 6c 65 74 69 6f 6e |ired-do-|deletion|
|000024e0| 73 20 64 69 72 65 64 2d | 64 6f 2d 66 6c 61 67 67 |s dired-|do-flagg|
|000024f0| 65 64 2d 64 65 6c 65 74 | 65 20 65 72 72 6f 72 20 |ed-delet|e error |
|00002500| 22 28 73 6d 61 72 74 2d | 64 69 72 65 64 29 3a 20 |"(smart-|dired): |
|00002510| 4e 6f 20 44 69 72 65 64 | 20 65 78 70 75 6e 67 65 |No Dired| expunge|
|00002520| 20 66 75 6e 63 74 69 6f | 6e 2e 22 20 64 69 72 65 | functio|n." dire|
|00002530| 64 2d 71 75 69 74 20 68 | 70 61 74 68 3a 66 69 6e |d-quit h|path:fin|
|00002540| 64 2d 6f 74 68 65 72 2d | 77 69 6e 64 6f 77 20 64 |d-other-|window d|
|00002550| 69 72 65 64 2d 67 65 74 | 2d 66 69 6c 65 6e 61 6d |ired-get|-filenam|
|00002560| 65 5d 20 34 20 22 5c 0a | 55 73 65 73 20 61 20 73 |e] 4 "\.|Uses a s|
|00002570| 69 6e 67 6c 65 20 6b 65 | 79 20 6f 72 20 6d 6f 75 |ingle ke|y or mou|
|00002580| 73 65 20 6b 65 79 20 74 | 6f 20 6d 61 6e 69 70 75 |se key t|o manipu|
|00002590| 6c 61 74 65 20 64 69 72 | 65 63 74 6f 72 79 20 65 |late dir|ectory e|
|000025a0| 6e 74 72 69 65 73 2e 0a | 0a 49 6e 76 6f 6b 65 64 |ntries..|.Invoked|
|000025b0| 20 76 69 61 20 61 20 6b | 65 79 20 70 72 65 73 73 | via a k|ey press|
|000025c0| 20 77 68 65 6e 20 69 6e | 20 64 69 72 65 64 2d 6d | when in| dired-m|
|000025d0| 6f 64 65 2e 20 20 49 74 | 20 61 73 73 75 6d 65 73 |ode.  It| assumes|
|000025e0| 20 74 68 61 74 20 69 74 | 73 0a 63 61 6c 6c 65 72 | that it|s.caller|
|000025f0| 20 68 61 73 20 61 6c 72 | 65 61 64 79 20 63 68 65 | has alr|eady che|
|00002600| 63 6b 65 64 20 74 68 61 | 74 20 74 68 65 20 6b 65 |cked tha|t the ke|
|00002610| 79 20 77 61 73 20 70 72 | 65 73 73 65 64 20 69 6e |y was pr|essed in|
|00002620| 20 61 6e 20 61 70 70 72 | 6f 70 72 69 61 74 65 20 | an appr|opriate |
|00002630| 62 75 66 66 65 72 0a 61 | 6e 64 20 68 61 73 20 6d |buffer.a|nd has m|
|00002640| 6f 76 65 64 20 74 68 65 | 20 63 75 72 73 6f 72 20 |oved the| cursor |
|00002650| 74 68 65 72 65 2e 0a 0a | 49 66 20 6b 65 79 20 69 |there...|If key i|
|00002660| 73 20 70 72 65 73 73 65 | 64 3a 0a 20 28 31 29 20 |s presse|d:. (1) |
|00002670| 77 69 74 68 69 6e 20 61 | 6e 20 65 6e 74 72 79 20 |within a|n entry |
|00002680| 6c 69 6e 65 2c 20 74 68 | 65 20 73 65 6c 65 63 74 |line, th|e select|
|00002690| 65 64 20 66 69 6c 65 2f | 64 69 72 65 63 74 6f 72 |ed file/|director|
|000026a0| 79 20 69 73 20 64 69 73 | 70 6c 61 79 65 64 20 66 |y is dis|played f|
|000026b0| 6f 72 0a 20 20 20 20 20 | 65 64 69 74 69 6e 67 20 |or.     |editing |
|000026c0| 69 6e 20 74 68 65 20 6f | 74 68 65 72 20 77 69 6e |in the o|ther win|
|000026d0| 64 6f 77 3b 0a 20 28 32 | 29 20 6f 6e 20 6f 72 20 |dow;. (2|) on or |
|000026e0| 61 66 74 65 72 20 74 68 | 65 20 6c 61 73 74 20 6c |after th|e last l|
|000026f0| 69 6e 65 20 69 6e 20 74 | 68 65 20 62 75 66 66 65 |ine in t|he buffe|
|00002700| 72 2c 20 69 66 20 61 6e | 79 20 64 65 6c 65 74 65 |r, if an|y delete|
|00002710| 73 20 61 72 65 20 74 6f | 20 62 65 0a 20 20 20 20 |s are to| be.    |
|00002720| 20 70 65 72 66 6f 72 6d | 65 64 2c 20 74 68 65 79 | perform|ed, they|
|00002730| 20 61 72 65 20 65 78 65 | 63 75 74 65 64 20 61 66 | are exe|cuted af|
|00002740| 74 65 72 20 75 73 65 72 | 20 76 65 72 69 66 69 63 |ter user| verific|
|00002750| 61 74 69 6f 6e 2c 20 6f | 74 68 65 72 77 69 73 65 |ation, o|therwise|
|00002760| 2c 20 74 68 69 73 0a 20 | 20 20 20 20 64 69 72 65 |, this. |    dire|
|00002770| 64 20 69 6e 76 6f 63 61 | 74 69 6f 6e 20 69 73 20 |d invoca|tion is |
|00002780| 71 75 69 74 2e 22 20 6e | 69 6c 5d 29 0a 28 66 73 |quit." n|il]).(fs|
|00002790| 65 74 20 27 73 6d 61 72 | 74 2d 64 69 72 65 64 2d |et 'smar|t-dired-|
|000027a0| 61 73 73 69 73 74 20 23 | 5b 6e 69 6c 20 22 c0 20 |assist #|[nil ". |
|000027b0| ab 8b c1 c2 65 64 5c 22 | 5b 21 88 64 62 87 c3 c4 |....ed\"|[!.db...|
|000027c0| 21 ab 83 c5 20 87 c3 c6 | 21 ab 83 c7 20 87 c8 c9 |!... ...|!... ...|
|000027d0| 21 87 22 20 5b 6c 61 73 | 74 2d 6c 69 6e 65 2d 70 |!." [las|t-line-p|
|000027e0| 20 64 69 72 65 64 2d 75 | 6e 66 6c 61 67 20 63 6f | dired-u|nflag co|
|000027f0| 75 6e 74 2d 6c 69 6e 65 | 73 20 6c 6f 6f 6b 69 6e |unt-line|s lookin|
|00002800| 67 2d 61 74 20 22 7e 22 | 20 64 69 72 65 64 2d 66 |g-at "~"| dired-f|
|00002810| 6c 61 67 2d 62 61 63 6b | 75 70 2d 66 69 6c 65 73 |lag-back|up-files|
|00002820| 20 22 23 22 20 64 69 72 | 65 64 2d 66 6c 61 67 2d | "#" dir|ed-flag-|
|00002830| 61 75 74 6f 2d 73 61 76 | 65 2d 66 69 6c 65 73 20 |auto-sav|e-files |
|00002840| 64 69 72 65 64 2d 66 6c | 61 67 2d 66 69 6c 65 2d |dired-fl|ag-file-|
|00002850| 64 65 6c 65 74 65 64 20 | 31 5d 20 34 20 22 5c 0a |deleted |1] 4 "\.|
|00002860| 55 73 65 73 20 61 20 73 | 69 6e 67 6c 65 20 61 73 |Uses a s|ingle as|
|00002870| 73 69 73 74 2d 6b 65 79 | 20 6f 72 20 6d 6f 75 73 |sist-key| or mous|
|00002880| 65 20 61 73 73 69 73 74 | 2d 6b 65 79 20 74 6f 20 |e assist|-key to |
|00002890| 6d 61 6e 69 70 75 6c 61 | 74 65 20 64 69 72 65 63 |manipula|te direc|
|000028a0| 74 6f 72 79 20 65 6e 74 | 72 69 65 73 2e 0a 0a 49 |tory ent|ries...I|
|000028b0| 6e 76 6f 6b 65 64 20 76 | 69 61 20 61 6e 20 61 73 |nvoked v|ia an as|
|000028c0| 73 69 73 74 2d 6b 65 79 | 20 70 72 65 73 73 20 77 |sist-key| press w|
|000028d0| 68 65 6e 20 69 6e 20 64 | 69 72 65 64 2d 6d 6f 64 |hen in d|ired-mod|
|000028e0| 65 2e 20 20 49 74 20 61 | 73 73 75 6d 65 73 20 74 |e.  It a|ssumes t|
|000028f0| 68 61 74 20 69 74 73 0a | 63 61 6c 6c 65 72 20 68 |hat its.|caller h|
|00002900| 61 73 20 61 6c 72 65 61 | 64 79 20 63 68 65 63 6b |as alrea|dy check|
|00002910| 65 64 20 74 68 61 74 20 | 74 68 65 20 61 73 73 69 |ed that |the assi|
|00002920| 73 74 2d 6b 65 79 20 77 | 61 73 20 70 72 65 73 73 |st-key w|as press|
|00002930| 65 64 20 69 6e 20 61 6e | 20 61 70 70 72 6f 70 72 |ed in an| appropr|
|00002940| 69 61 74 65 0a 62 75 66 | 66 65 72 20 61 6e 64 20 |iate.buf|fer and |
|00002950| 68 61 73 20 6d 6f 76 65 | 64 20 74 68 65 20 63 75 |has move|d the cu|
|00002960| 72 73 6f 72 20 74 68 65 | 72 65 2e 0a 0a 49 66 20 |rsor the|re...If |
|00002970| 61 73 73 69 73 74 2d 6b | 65 79 20 69 73 20 70 72 |assist-k|ey is pr|
|00002980| 65 73 73 65 64 3a 0a 20 | 28 31 29 20 6f 6e 20 61 |essed:. |(1) on a|
|00002990| 20 27 7e 27 20 63 68 61 | 72 61 63 74 65 72 2c 20 | '~' cha|racter, |
|000029a0| 61 6c 6c 20 62 61 63 6b | 75 70 20 66 69 6c 65 73 |all back|up files|
|000029b0| 20 69 6e 20 74 68 65 20 | 64 69 72 65 63 74 6f 72 | in the |director|
|000029c0| 79 20 61 72 65 20 6d 61 | 72 6b 65 64 20 66 6f 72 |y are ma|rked for|
|000029d0| 0a 20 20 20 20 20 64 65 | 6c 65 74 69 6f 6e 3b 0a |.     de|letion;.|
|000029e0| 20 28 32 29 20 6f 6e 20 | 61 20 27 23 27 20 63 68 | (2) on |a '#' ch|
|000029f0| 61 72 61 63 74 65 72 2c | 20 61 6c 6c 20 61 75 74 |aracter,| all aut|
|00002a00| 6f 2d 73 61 76 65 20 66 | 69 6c 65 73 20 69 6e 20 |o-save f|iles in |
|00002a10| 74 68 65 20 64 69 72 65 | 63 74 6f 72 79 20 61 72 |the dire|ctory ar|
|00002a20| 65 20 6d 61 72 6b 65 64 | 20 66 6f 72 0a 20 20 20 |e marked| for.   |
|00002a30| 20 20 64 65 6c 65 74 69 | 6f 6e 3b 0a 20 28 33 29 |  deleti|on;. (3)|
|00002a40| 20 61 6e 79 77 68 65 72 | 65 20 65 6c 73 65 20 77 | anywher|e else w|
|00002a50| 69 74 68 69 6e 20 61 6e | 20 65 6e 74 72 79 20 6c |ithin an| entry l|
|00002a60| 69 6e 65 2c 20 74 68 65 | 20 63 75 72 72 65 6e 74 |ine, the| current|
|00002a70| 20 65 6e 74 72 79 20 69 | 73 20 6d 61 72 6b 65 64 | entry i|s marked|
|00002a80| 20 66 6f 72 0a 20 20 20 | 20 20 64 65 6c 65 74 69 | for.   |  deleti|
|00002a90| 6f 6e 3b 0a 20 28 34 29 | 20 6f 6e 20 6f 72 20 61 |on;. (4)| on or a|
|00002aa0| 66 74 65 72 20 74 68 65 | 20 6c 61 73 74 20 6c 69 |fter the| last li|
|00002ab0| 6e 65 20 69 6e 20 74 68 | 65 20 62 75 66 66 65 72 |ne in th|e buffer|
|00002ac0| 2c 20 61 6c 6c 20 64 65 | 6c 65 74 65 20 6d 61 72 |, all de|lete mar|
|00002ad0| 6b 73 20 6f 6e 20 61 6c | 6c 20 65 6e 74 72 69 65 |ks on al|l entrie|
|00002ae0| 73 0a 20 20 20 20 20 61 | 72 65 20 75 6e 64 6f 6e |s.     a|re undon|
|00002af0| 65 2e 22 20 6e 69 6c 5d | 29 0a 28 66 73 65 74 20 |e." nil]|).(fset |
|00002b00| 27 73 6d 61 72 74 2d 67 | 6e 75 73 2d 67 72 6f 75 |'smart-g|nus-grou|
|00002b10| 70 20 23 5b 6e 69 6c 20 | 22 c0 20 ab 83 c1 20 87 |p #[nil |". ... .|
|00002b20| c2 c3 78 88 6e ab 83 c4 | 20 87 c5 c3 21 87 22 20 |..x.n...| ...!." |
|00002b30| 5b 6c 61 73 74 2d 6c 69 | 6e 65 2d 70 20 67 6e 75 |[last-li|ne-p gnu|
|00002b40| 73 2d 67 72 6f 75 70 2d | 67 65 74 2d 6e 65 77 2d |s-group-|get-new-|
|00002b50| 6e 65 77 73 20 22 20 55 | 22 20 6e 69 6c 20 67 6e |news " U|" nil gn|
|00002b60| 75 73 2d 67 72 6f 75 70 | 2d 75 6e 73 75 62 73 63 |us-group|-unsubsc|
|00002b70| 72 69 62 65 2d 63 75 72 | 72 65 6e 74 2d 67 72 6f |ribe-cur|rent-gro|
|00002b80| 75 70 20 67 6e 75 73 2d | 67 72 6f 75 70 2d 72 65 |up gnus-|group-re|
|00002b90| 61 64 2d 67 72 6f 75 70 | 5d 20 32 20 22 5c 0a 55 |ad-group|] 2 "\.U|
|00002ba0| 73 65 73 20 61 20 6b 65 | 79 20 6f 72 20 6d 6f 75 |ses a ke|y or mou|
|00002bb0| 73 65 20 6b 65 79 20 74 | 6f 20 6d 6f 76 65 20 74 |se key t|o move t|
|00002bc0| 68 72 6f 75 67 68 20 47 | 6e 75 73 20 4e 65 77 73 |hrough G|nus News|
|00002bd0| 67 72 6f 75 70 20 6c 69 | 73 74 69 6e 67 73 2e 0a |group li|stings..|
|00002be0| 49 6e 76 6f 6b 65 64 20 | 76 69 61 20 61 20 6b 65 |Invoked |via a ke|
|00002bf0| 79 20 70 72 65 73 73 20 | 77 68 65 6e 20 69 6e 20 |y press |when in |
|00002c00| 67 6e 75 73 2d 67 72 6f | 75 70 2d 6d 6f 64 65 2e |gnus-gro|up-mode.|
|00002c10| 20 20 49 74 20 61 73 73 | 75 6d 65 73 20 74 68 61 |  It ass|umes tha|
|00002c20| 74 20 69 74 73 20 63 61 | 6c 6c 65 72 0a 68 61 73 |t its ca|ller.has|
|00002c30| 20 61 6c 72 65 61 64 79 | 20 63 68 65 63 6b 65 64 | already| checked|
|00002c40| 20 74 68 61 74 20 74 68 | 65 20 6b 65 79 20 77 61 | that th|e key wa|
|00002c50| 73 20 70 72 65 73 73 65 | 64 20 69 6e 20 61 6e 20 |s presse|d in an |
|00002c60| 61 70 70 72 6f 70 72 69 | 61 74 65 20 62 75 66 66 |appropri|ate buff|
|00002c70| 65 72 20 61 6e 64 20 68 | 61 73 0a 6d 6f 76 65 64 |er and h|as.moved|
|00002c80| 20 74 68 65 20 63 75 72 | 73 6f 72 20 74 6f 20 74 | the cur|sor to t|
|00002c90| 68 65 20 73 65 6c 65 63 | 74 65 64 20 62 75 66 66 |he selec|ted buff|
|00002ca0| 65 72 2e 0a 0a 49 66 20 | 6b 65 79 20 69 73 20 70 |er...If |key is p|
|00002cb0| 72 65 73 73 65 64 20 77 | 69 74 68 69 6e 3a 0a 20 |ressed w|ithin:. |
|00002cc0| 28 31 29 20 61 20 47 4e | 55 53 2d 47 52 4f 55 50 |(1) a GN|US-GROUP|
|00002cd0| 20 6c 69 6e 65 2c 20 74 | 68 61 74 20 6e 65 77 73 | line, t|hat news|
|00002ce0| 67 72 6f 75 70 20 69 73 | 20 72 65 61 64 3b 0a 20 |group is| read;. |
|00002cf0| 28 32 29 20 74 6f 20 74 | 68 65 20 6c 65 66 74 20 |(2) to t|he left |
|00002d00| 6f 66 20 61 6e 79 20 47 | 4e 55 53 2d 47 52 4f 55 |of any G|NUS-GROU|
|00002d10| 50 20 6c 69 6e 65 2c 20 | 6f 6e 20 61 6e 79 20 6f |P line, |on any o|
|00002d20| 66 20 74 68 65 20 77 68 | 69 74 65 73 70 61 63 65 |f the wh|itespace|
|00002d30| 2c 20 74 68 65 20 63 75 | 72 72 65 6e 74 0a 20 20 |, the cu|rrent.  |
|00002d40| 20 20 20 67 72 6f 75 70 | 20 69 73 20 75 6e 73 75 |   group| is unsu|
|00002d50| 62 73 63 72 69 62 65 64 | 20 6f 72 20 72 65 73 75 |bscribed| or resu|
|00002d60| 62 73 63 72 69 62 65 64 | 3b 0a 20 28 33 29 20 61 |bscribed|;. (3) a|
|00002d70| 74 20 74 68 65 20 65 6e | 64 20 6f 66 20 74 68 65 |t the en|d of the|
|00002d80| 20 47 4e 55 53 2d 47 52 | 4f 55 50 20 62 75 66 66 | GNUS-GR|OUP buff|
|00002d90| 65 72 2c 20 61 66 74 65 | 72 20 61 6c 6c 20 6c 69 |er, afte|r all li|
|00002da0| 6e 65 73 2c 20 63 68 65 | 63 6b 73 20 66 6f 72 20 |nes, che|cks for |
|00002db0| 6e 65 77 0a 20 20 20 20 | 20 6e 65 77 73 2e 22 20 |new.    | news." |
|00002dc0| 6e 69 6c 5d 29 0a 28 66 | 73 65 74 20 27 73 6d 61 |nil]).(f|set 'sma|
|00002dd0| 72 74 2d 67 6e 75 73 2d | 67 72 6f 75 70 2d 61 73 |rt-gnus-|group-as|
|00002de0| 73 69 73 74 20 23 5b 6e | 69 6c 20 22 c0 20 ab 83 |sist #[n|il ". ..|
|00002df0| c1 20 87 c2 c3 78 88 6e | ab 84 c4 c5 21 87 c6 c3 |. ...x.n|....!...|
|00002e00| 21 87 22 20 5b 6c 61 73 | 74 2d 6c 69 6e 65 2d 70 |!." [las|t-line-p|
|00002e10| 20 67 6e 75 73 2d 67 72 | 6f 75 70 2d 65 78 69 74 | gnus-gr|oup-exit|
|00002e20| 20 22 20 55 22 20 6e 69 | 6c 20 63 61 6c 6c 2d 69 | " U" ni|l call-i|
|00002e30| 6e 74 65 72 61 63 74 69 | 76 65 6c 79 20 67 6e 75 |nteracti|vely gnu|
|00002e40| 73 2d 67 72 6f 75 70 2d | 75 6e 73 75 62 73 63 72 |s-group-|unsubscr|
|00002e50| 69 62 65 2d 67 72 6f 75 | 70 20 67 6e 75 73 2d 67 |ibe-grou|p gnus-g|
|00002e60| 72 6f 75 70 2d 72 65 61 | 64 2d 67 72 6f 75 70 5d |roup-rea|d-group]|
|00002e70| 20 32 20 22 5c 0a 55 73 | 65 73 20 61 6e 20 61 73 | 2 "\.Us|es an as|
|00002e80| 73 69 73 74 2d 6b 65 79 | 20 6f 72 20 61 73 73 69 |sist-key| or assi|
|00002e90| 73 74 2d 6d 6f 75 73 65 | 20 6b 65 79 20 74 6f 20 |st-mouse| key to |
|00002ea0| 6d 6f 76 65 20 74 68 72 | 6f 75 67 68 20 47 6e 75 |move thr|ough Gnu|
|00002eb0| 73 20 4e 65 77 73 67 72 | 6f 75 70 20 6c 69 73 74 |s Newsgr|oup list|
|00002ec0| 69 6e 67 73 2e 0a 49 6e | 76 6f 6b 65 64 20 76 69 |ings..In|voked vi|
|00002ed0| 61 20 61 6e 20 61 73 73 | 69 73 74 2d 6b 65 79 20 |a an ass|ist-key |
|00002ee0| 70 72 65 73 73 20 77 68 | 65 6e 20 69 6e 20 67 6e |press wh|en in gn|
|00002ef0| 75 73 2d 67 72 6f 75 70 | 2d 6d 6f 64 65 2e 20 20 |us-group|-mode.  |
|00002f00| 49 74 20 61 73 73 75 6d | 65 73 20 74 68 61 74 20 |It assum|es that |
|00002f10| 69 74 73 0a 63 61 6c 6c | 65 72 20 68 61 73 20 61 |its.call|er has a|
|00002f20| 6c 72 65 61 64 79 20 63 | 68 65 63 6b 65 64 20 74 |lready c|hecked t|
|00002f30| 68 61 74 20 74 68 65 20 | 6b 65 79 20 77 61 73 20 |hat the |key was |
|00002f40| 70 72 65 73 73 65 64 20 | 69 6e 20 61 6e 20 61 70 |pressed |in an ap|
|00002f50| 70 72 6f 70 72 69 61 74 | 65 20 62 75 66 66 65 72 |propriat|e buffer|
|00002f60| 0a 61 6e 64 20 68 61 73 | 20 6d 6f 76 65 64 20 74 |.and has| moved t|
|00002f70| 68 65 20 63 75 72 73 6f | 72 20 74 6f 20 74 68 65 |he curso|r to the|
|00002f80| 20 73 65 6c 65 63 74 65 | 64 20 62 75 66 66 65 72 | selecte|d buffer|
|00002f90| 2e 0a 0a 49 66 20 6b 65 | 79 20 69 73 20 70 72 65 |...If ke|y is pre|
|00002fa0| 73 73 65 64 20 77 69 74 | 68 69 6e 3a 0a 20 28 31 |ssed wit|hin:. (1|
|00002fb0| 29 20 61 20 47 4e 55 53 | 2d 47 52 4f 55 50 20 6c |) a GNUS|-GROUP l|
|00002fc0| 69 6e 65 2c 20 74 68 61 | 74 20 6e 65 77 73 67 72 |ine, tha|t newsgr|
|00002fd0| 6f 75 70 20 69 73 20 72 | 65 61 64 3b 0a 20 28 32 |oup is r|ead;. (2|
|00002fe0| 29 20 74 6f 20 74 68 65 | 20 6c 65 66 74 20 6f 66 |) to the| left of|
|00002ff0| 20 61 6e 79 20 47 4e 55 | 53 2d 47 52 4f 55 50 20 | any GNU|S-GROUP |
|00003000| 6c 69 6e 65 2c 20 6f 6e | 20 61 6e 79 20 6f 66 20 |line, on| any of |
|00003010| 74 68 65 20 77 68 69 74 | 65 73 70 61 63 65 2c 20 |the whit|espace, |
|00003020| 74 68 65 20 75 73 65 72 | 20 69 73 0a 20 20 20 20 |the user| is.    |
|00003030| 20 70 72 6f 6d 70 74 65 | 64 20 66 6f 72 20 61 20 | prompte|d for a |
|00003040| 67 72 6f 75 70 20 6e 61 | 6d 65 20 74 6f 20 73 75 |group na|me to su|
|00003050| 62 73 63 72 69 62 65 20 | 6f 72 20 75 6e 73 75 62 |bscribe |or unsub|
|00003060| 73 63 72 69 62 65 20 74 | 6f 3b 0a 20 28 33 29 20 |scribe t|o;. (3) |
|00003070| 61 74 20 74 68 65 20 65 | 6e 64 20 6f 66 20 74 68 |at the e|nd of th|
|00003080| 65 20 47 4e 55 53 2d 47 | 52 4f 55 50 20 62 75 66 |e GNUS-G|ROUP buf|
|00003090| 66 65 72 2c 20 61 66 74 | 65 72 20 61 6c 6c 20 6c |fer, aft|er all l|
|000030a0| 69 6e 65 73 2c 20 71 75 | 69 74 73 20 66 72 6f 6d |ines, qu|its from|
|000030b0| 20 74 68 65 0a 20 20 20 | 20 20 6e 65 77 73 72 65 | the.   |  newsre|
|000030c0| 61 64 65 72 2e 22 20 6e | 69 6c 5d 29 0a 28 66 73 |ader." n|il]).(fs|
|000030d0| 65 74 20 27 73 6d 61 72 | 74 2d 67 6e 75 73 2d 73 |et 'smar|t-gnus-s|
|000030e0| 75 6d 6d 61 72 79 20 23 | 5b 6e 69 6c 20 22 c0 20 |ummary #|[nil ". |
|000030f0| ab a0 09 ab 93 65 62 88 | c2 c3 c4 09 5c 22 c5 c6 |.....eb.|....\"..|
|00003100| 23 88 c7 16 08 c9 c7 21 | 87 65 62 88 ca 16 08 c9 |#......!|.eb.....|
|00003110| ca 21 87 8a cb c5 78 88 | 6e 29 ab 84 cc cd 21 87 |.!....x.|n)....!.|
|00003120| c7 16 08 c9 c7 21 87 22 | 20 5b 6c 61 73 74 2d 6c |.....!."| [last-l|
|00003130| 69 6e 65 2d 70 20 67 6e | 75 73 2d 63 75 72 72 65 |ine-p gn|us-curre|
|00003140| 6e 74 2d 61 72 74 69 63 | 6c 65 20 72 65 2d 73 65 |nt-artic|le re-se|
|00003150| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 66 6f 72 |arch-for|ward for|
|00003160| 6d 61 74 20 22 5e 2e 5b | 20 5d 2b 25 64 3a 22 20 |mat "^.[| ]+%d:" |
|00003170| 6e 69 6c 20 74 20 67 6e | 75 73 2d 73 75 6d 6d 61 |nil t gn|us-summa|
|00003180| 72 79 2d 6e 65 78 74 2d | 70 61 67 65 20 74 68 69 |ry-next-|page thi|
|00003190| 73 2d 63 6f 6d 6d 61 6e | 64 20 63 61 6c 6c 2d 69 |s-comman|d call-i|
|000031a0| 6e 74 65 72 61 63 74 69 | 76 65 6c 79 20 67 6e 75 |nteracti|vely gnu|
|000031b0| 73 2d 73 75 6d 6d 61 72 | 79 2d 66 69 72 73 74 2d |s-summar|y-first-|
|000031c0| 75 6e 72 65 61 64 2d 61 | 72 74 69 63 6c 65 20 22 |unread-a|rticle "|
|000031d0| 20 44 22 20 67 6e 75 73 | 2d 73 75 6d 6d 61 72 79 | D" gnus|-summary|
|000031e0| 2d 6d 61 72 6b 2d 61 73 | 2d 75 6e 72 65 61 64 2d |-mark-as|-unread-|
|000031f0| 66 6f 72 77 61 72 64 20 | 31 5d 20 34 20 22 5c 0a |forward |1] 4 "\.|
|00003200| 55 73 65 73 20 61 20 6b | 65 79 20 6f 72 20 6d 6f |Uses a k|ey or mo|
|00003210| 75 73 65 20 6b 65 79 20 | 74 6f 20 6d 6f 76 65 20 |use key |to move |
|00003220| 74 68 72 6f 75 67 68 20 | 47 6e 75 73 20 4e 65 77 |through |Gnus New|
|00003230| 73 20 61 72 74 69 63 6c | 65 20 6c 69 73 74 69 6e |s articl|e listin|
|00003240| 67 73 2e 0a 49 6e 76 6f | 6b 65 64 20 76 69 61 20 |gs..Invo|ked via |
|00003250| 61 20 6b 65 79 20 70 72 | 65 73 73 20 77 68 65 6e |a key pr|ess when|
|00003260| 20 69 6e 20 67 6e 75 73 | 2d 73 75 6d 6d 61 72 79 | in gnus|-summary|
|00003270| 2d 6d 6f 64 65 2e 20 20 | 49 74 20 61 73 73 75 6d |-mode.  |It assum|
|00003280| 65 73 20 74 68 61 74 20 | 69 74 73 20 63 61 6c 6c |es that |its call|
|00003290| 65 72 0a 68 61 73 20 61 | 6c 72 65 61 64 79 20 63 |er.has a|lready c|
|000032a0| 68 65 63 6b 65 64 20 74 | 68 61 74 20 74 68 65 20 |hecked t|hat the |
|000032b0| 6b 65 79 20 77 61 73 20 | 70 72 65 73 73 65 64 20 |key was |pressed |
|000032c0| 69 6e 20 61 6e 20 61 70 | 70 72 6f 70 72 69 61 74 |in an ap|propriat|
|000032d0| 65 20 62 75 66 66 65 72 | 20 61 6e 64 20 68 61 73 |e buffer| and has|
|000032e0| 0a 6d 6f 76 65 64 20 74 | 68 65 20 63 75 72 73 6f |.moved t|he curso|
|000032f0| 72 20 74 6f 20 74 68 65 | 20 73 65 6c 65 63 74 65 |r to the| selecte|
|00003300| 64 20 62 75 66 66 65 72 | 2e 0a 0a 49 66 20 6b 65 |d buffer|...If ke|
|00003310| 79 20 69 73 20 70 72 65 | 73 73 65 64 20 77 69 74 |y is pre|ssed wit|
|00003320| 68 69 6e 3a 0a 20 28 31 | 29 20 74 6f 20 74 68 65 |hin:. (1|) to the|
|00003330| 20 6c 65 66 74 20 6f 66 | 20 61 6e 20 61 72 74 69 | left of| an arti|
|00003340| 63 6c 65 20 6e 75 6d 62 | 65 72 2c 20 74 68 61 74 |cle numb|er, that|
|00003350| 20 61 72 74 69 63 6c 65 | 20 69 73 20 6d 61 72 6b | article| is mark|
|00003360| 65 64 20 61 73 20 75 6e | 72 65 61 64 3b 0a 20 28 |ed as un|read;. (|
|00003370| 32 29 20 61 20 47 4e 55 | 53 2d 53 55 4d 4d 41 52 |2) a GNU|S-SUMMAR|
|00003380| 59 20 6c 69 6e 65 2c 20 | 74 68 61 74 20 61 72 74 |Y line, |that art|
|00003390| 69 63 6c 65 20 69 73 20 | 72 65 61 64 2c 20 6d 61 |icle is |read, ma|
|000033a0| 72 6b 65 64 20 64 65 6c | 65 74 65 64 2c 20 61 6e |rked del|eted, an|
|000033b0| 64 20 73 63 72 6f 6c 6c | 65 64 0a 20 20 20 20 20 |d scroll|ed.     |
|000033c0| 66 6f 72 77 61 72 64 3b | 0a 20 28 33 29 20 61 74 |forward;|. (3) at|
|000033d0| 20 74 68 65 20 65 6e 64 | 20 6f 66 20 74 68 65 20 | the end| of the |
|000033e0| 47 4e 55 53 2d 53 55 4d | 4d 41 52 59 20 62 75 66 |GNUS-SUM|MARY buf|
|000033f0| 66 65 72 2c 20 74 68 65 | 20 6e 65 78 74 20 75 6e |fer, the| next un|
|00003400| 64 65 6c 65 74 65 64 20 | 61 72 74 69 63 6c 65 0a |deleted |article.|
|00003410| 20 20 20 20 20 69 73 20 | 72 65 61 64 20 6f 72 20 |     is |read or |
|00003420| 74 68 65 20 6e 65 78 74 | 20 67 72 6f 75 70 20 69 |the next| group i|
|00003430| 73 20 65 6e 74 65 72 65 | 64 2e 22 20 6e 69 6c 5d |s entere|d." nil]|
|00003440| 29 0a 28 66 73 65 74 20 | 27 73 6d 61 72 74 2d 67 |).(fset |'smart-g|
|00003450| 6e 75 73 2d 73 75 6d 6d | 61 72 79 2d 61 73 73 69 |nus-summ|ary-assi|
|00003460| 73 74 20 23 5b 6e 69 6c | 20 22 c0 20 ab 86 c1 12 |st #[nil| ". ....|
|00003470| c3 c4 21 87 8a c5 c6 78 | 88 6e 29 ab 84 c7 c8 21 |..!....x|.n)....!|
|00003480| 87 c1 12 c3 c1 21 87 22 | 20 5b 6c 61 73 74 2d 6c |.....!."| [last-l|
|00003490| 69 6e 65 2d 70 20 67 6e | 75 73 2d 73 75 6d 6d 61 |ine-p gn|us-summa|
|000034a0| 72 79 2d 70 72 65 76 2d | 70 61 67 65 20 74 68 69 |ry-prev-|page thi|
|000034b0| 73 2d 63 6f 6d 6d 61 6e | 64 20 63 61 6c 6c 2d 69 |s-comman|d call-i|
|000034c0| 6e 74 65 72 61 63 74 69 | 76 65 6c 79 20 67 6e 75 |nteracti|vely gnu|
|000034d0| 73 2d 73 75 6d 6d 61 72 | 79 2d 65 78 69 74 20 22 |s-summar|y-exit "|
|000034e0| 20 44 22 20 6e 69 6c 20 | 67 6e 75 73 2d 73 75 6d | D" nil |gnus-sum|
|000034f0| 6d 61 72 79 2d 6d 61 72 | 6b 2d 61 73 2d 75 6e 72 |mary-mar|k-as-unr|
|00003500| 65 61 64 2d 62 61 63 6b | 77 61 72 64 20 31 5d 20 |ead-back|ward 1] |
|00003510| 32 20 22 5c 0a 55 73 65 | 73 20 61 6e 20 61 73 73 |2 "\.Use|s an ass|
|00003520| 69 73 74 2d 6b 65 79 20 | 6f 72 20 61 73 73 69 73 |ist-key |or assis|
|00003530| 74 2d 6d 6f 75 73 65 20 | 6b 65 79 20 74 6f 20 6d |t-mouse |key to m|
|00003540| 6f 76 65 20 74 68 72 6f | 75 67 68 20 47 6e 75 73 |ove thro|ugh Gnus|
|00003550| 20 4e 65 77 73 20 61 72 | 74 69 63 6c 65 73 2e 0a | News ar|ticles..|
|00003560| 49 6e 76 6f 6b 65 64 20 | 76 69 61 20 61 6e 20 61 |Invoked |via an a|
|00003570| 73 73 69 73 74 2d 6b 65 | 79 20 70 72 65 73 73 20 |ssist-ke|y press |
|00003580| 77 68 65 6e 20 69 6e 20 | 67 6e 75 73 2d 73 75 6d |when in |gnus-sum|
|00003590| 6d 61 72 79 2d 6d 6f 64 | 65 2e 20 20 49 74 20 61 |mary-mod|e.  It a|
|000035a0| 73 73 75 6d 65 73 20 74 | 68 61 74 20 69 74 73 0a |ssumes t|hat its.|
|000035b0| 63 61 6c 6c 65 72 20 68 | 61 73 20 61 6c 72 65 61 |caller h|as alrea|
|000035c0| 64 79 20 63 68 65 63 6b | 65 64 20 74 68 61 74 20 |dy check|ed that |
|000035d0| 74 68 65 20 6b 65 79 20 | 77 61 73 20 70 72 65 73 |the key |was pres|
|000035e0| 73 65 64 20 69 6e 20 61 | 6e 20 61 70 70 72 6f 70 |sed in a|n approp|
|000035f0| 72 69 61 74 65 20 62 75 | 66 66 65 72 0a 61 6e 64 |riate bu|ffer.and|
|00003600| 20 68 61 73 20 6d 6f 76 | 65 64 20 74 68 65 20 63 | has mov|ed the c|
|00003610| 75 72 73 6f 72 20 74 6f | 20 74 68 65 20 73 65 6c |ursor to| the sel|
|00003620| 65 63 74 65 64 20 62 75 | 66 66 65 72 2e 0a 0a 49 |ected bu|ffer...I|
|00003630| 66 20 6b 65 79 20 69 73 | 20 70 72 65 73 73 65 64 |f key is| pressed|
|00003640| 20 77 69 74 68 69 6e 3a | 0a 20 28 31 29 20 74 6f | within:|. (1) to|
|00003650| 20 74 68 65 20 6c 65 66 | 74 20 6f 66 20 61 6e 20 | the lef|t of an |
|00003660| 61 72 74 69 63 6c 65 20 | 6e 75 6d 62 65 72 2c 20 |article |number, |
|00003670| 74 68 61 74 20 61 72 74 | 69 63 6c 65 20 69 73 20 |that art|icle is |
|00003680| 6d 61 72 6b 65 64 20 61 | 73 20 75 6e 72 65 61 64 |marked a|s unread|
|00003690| 3b 0a 20 28 32 29 20 61 | 20 47 4e 55 53 2d 53 55 |;. (2) a| GNUS-SU|
|000036a0| 4d 4d 41 52 59 20 6c 69 | 6e 65 2c 20 74 68 61 74 |MMARY li|ne, that|
|000036b0| 20 61 72 74 69 63 6c 65 | 20 69 73 20 72 65 61 64 | article| is read|
|000036c0| 20 61 6e 64 20 73 63 72 | 6f 6c 6c 65 64 20 62 61 | and scr|olled ba|
|000036d0| 63 6b 77 61 72 64 3b 0a | 20 28 33 29 20 61 74 20 |ckward;.| (3) at |
|000036e0| 74 68 65 20 65 6e 64 20 | 6f 66 20 74 68 65 20 47 |the end |of the G|
|000036f0| 4e 55 53 2d 53 55 4d 4d | 41 52 59 20 62 75 66 66 |NUS-SUMM|ARY buff|
|00003700| 65 72 2c 20 74 68 65 20 | 73 75 6d 6d 61 72 79 20 |er, the |summary |
|00003710| 69 73 20 65 78 69 74 65 | 64 2c 20 74 68 65 20 75 |is exite|d, the u|
|00003720| 73 65 72 0a 20 20 20 20 | 20 69 73 20 72 65 74 75 |ser.    | is retu|
|00003730| 72 6e 65 64 20 74 6f 20 | 67 72 6f 75 70 20 6d 6f |rned to |group mo|
|00003740| 64 65 2e 22 20 6e 69 6c | 5d 29 0a 28 66 73 65 74 |de." nil|]).(fset|
|00003750| 20 27 73 6d 61 72 74 2d | 67 6e 75 73 2d 61 72 74 | 'smart-|gnus-art|
|00003760| 69 63 6c 65 20 23 5b 6e | 69 6c 20 22 c0 20 ac 87 |icle #[n|il ". ..|
|00003770| 6c ac 94 c1 20 ab 90 c2 | 8e 0b 71 88 c4 15 c4 20 |l... ...|..q.... |
|00003780| 88 c6 0e 07 21 29 87 6c | ac 84 c8 20 ae 82 c9 20 |....!).l|... ... |
|00003790| 87 22 20 5b 6c 61 73 74 | 2d 6c 69 6e 65 2d 70 20 |." [last|-line-p |
|000037a0| 66 69 72 73 74 2d 6c 69 | 6e 65 2d 70 20 28 28 62 |first-li|ne-p ((b|
|000037b0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 09 21 89 1a ab |yte-code| "..!...|
|000037c0| 84 c3 5c 6e 21 88 29 c0 | 87 22 20 5b 67 65 74 2d |..\n!.).|." [get-|
|000037d0| 62 75 66 66 65 72 2d 77 | 69 6e 64 6f 77 20 67 6e |buffer-w|indow gn|
|000037e0| 75 73 2d 61 72 74 69 63 | 6c 65 2d 62 75 66 66 65 |us-artic|le-buffe|
|000037f0| 72 20 61 72 74 69 63 20 | 73 65 6c 65 63 74 2d 77 |r artic |select-w|
|00003800| 69 6e 64 6f 77 5d 20 33 | 29 29 20 67 6e 75 73 2d |indow] 3|)) gnus-|
|00003810| 73 75 6d 6d 61 72 79 2d | 62 75 66 66 65 72 20 67 |summary-|buffer g|
|00003820| 6e 75 73 2d 73 75 6d 6d | 61 72 79 2d 6e 65 78 74 |nus-summ|ary-next|
|00003830| 2d 75 6e 72 65 61 64 2d | 61 72 74 69 63 6c 65 20 |-unread-|article |
|00003840| 74 68 69 73 2d 63 6f 6d | 6d 61 6e 64 20 67 6e 75 |this-com|mand gnu|
|00003850| 73 2d 73 75 6d 6d 61 72 | 79 2d 67 6f 74 6f 2d 73 |s-summar|y-goto-s|
|00003860| 75 62 6a 65 63 74 20 67 | 6e 75 73 2d 63 75 72 72 |ubject g|nus-curr|
|00003870| 65 6e 74 2d 61 72 74 69 | 63 6c 65 20 49 6e 66 6f |ent-arti|cle Info|
|00003880| 2d 68 61 6e 64 6c 65 2d | 69 6e 2d 6e 6f 74 65 20 |-handle-|in-note |
|00003890| 73 63 72 6f 6c 6c 2d 75 | 70 2d 65 6f 6c 5d 20 32 |scroll-u|p-eol] 2|
|000038a0| 20 22 5c 0a 55 73 65 73 | 20 61 20 6b 65 79 20 6f | "\.Uses| a key o|
|000038b0| 72 20 6d 6f 75 73 65 20 | 6b 65 79 20 74 6f 20 6d |r mouse |key to m|
|000038c0| 6f 76 65 20 74 68 72 6f | 75 67 68 20 47 6e 75 73 |ove thro|ugh Gnus|
|000038d0| 20 6e 65 74 6e 65 77 73 | 20 61 72 74 69 63 6c 65 | netnews| article|
|000038e0| 73 2e 0a 0a 49 6e 76 6f | 6b 65 64 20 76 69 61 20 |s...Invo|ked via |
|000038f0| 61 20 6b 65 79 20 70 72 | 65 73 73 20 77 68 65 6e |a key pr|ess when|
|00003900| 20 69 6e 20 67 6e 75 73 | 2d 61 72 74 69 63 6c 65 | in gnus|-article|
|00003910| 2d 6d 6f 64 65 2e 0a 49 | 74 20 61 73 73 75 6d 65 |-mode..I|t assume|
|00003920| 73 20 74 68 61 74 20 69 | 74 73 20 63 61 6c 6c 65 |s that i|ts calle|
|00003930| 72 20 68 61 73 20 61 6c | 72 65 61 64 79 20 63 68 |r has al|ready ch|
|00003940| 65 63 6b 65 64 20 74 68 | 61 74 20 74 68 65 20 6b |ecked th|at the k|
|00003950| 65 79 20 77 61 73 20 70 | 72 65 73 73 65 64 20 69 |ey was p|ressed i|
|00003960| 6e 20 61 6e 0a 61 70 70 | 72 6f 70 72 69 61 74 65 |n an.app|ropriate|
|00003970| 20 62 75 66 66 65 72 20 | 61 6e 64 20 68 61 73 20 | buffer |and has |
|00003980| 6d 6f 76 65 64 20 74 68 | 65 20 63 75 72 73 6f 72 |moved th|e cursor|
|00003990| 20 74 6f 20 74 68 65 20 | 73 65 6c 65 63 74 65 64 | to the |selected|
|000039a0| 20 62 75 66 66 65 72 2e | 0a 0a 49 66 20 6b 65 79 | buffer.|..If key|
|000039b0| 20 69 73 20 70 72 65 73 | 73 65 64 20 77 69 74 68 | is pres|sed with|
|000039c0| 69 6e 3a 0a 20 28 31 29 | 20 74 68 65 20 66 69 72 |in:. (1)| the fir|
|000039d0| 73 74 20 6c 69 6e 65 20 | 6f 72 20 65 6e 64 20 6f |st line |or end o|
|000039e0| 66 20 61 6e 20 61 72 74 | 69 63 6c 65 2c 20 74 68 |f an art|icle, th|
|000039f0| 65 20 6e 65 78 74 20 75 | 6e 72 65 61 64 20 6d 65 |e next u|nread me|
|00003a00| 73 73 61 67 65 20 69 73 | 20 64 69 73 70 6c 61 79 |ssage is| display|
|00003a10| 65 64 3b 0a 20 28 32 29 | 20 74 68 65 20 66 69 72 |ed;. (2)| the fir|
|00003a20| 73 74 20 6c 69 6e 65 20 | 6f 66 20 61 6e 20 49 6e |st line |of an In|
|00003a30| 66 6f 20 63 72 6f 73 73 | 20 72 65 66 65 72 65 6e |fo cross| referen|
|00003a40| 63 65 2c 20 74 68 65 20 | 72 65 66 65 72 65 6e 63 |ce, the |referenc|
|00003a50| 65 20 69 73 20 66 6f 6c | 6c 6f 77 65 64 3b 0a 20 |e is fol|lowed;. |
|00003a60| 28 33 29 20 61 6e 79 77 | 68 65 72 65 20 65 6c 73 |(3) anyw|here els|
|00003a70| 65 2c 20 74 68 65 20 77 | 69 6e 64 6f 77 20 69 73 |e, the w|indow is|
|00003a80| 20 73 63 72 6f 6c 6c 65 | 64 20 75 70 20 61 20 77 | scrolle|d up a w|
|00003a90| 69 6e 64 6f 77 66 75 6c | 2e 22 20 6e 69 6c 5d 29 |indowful|." nil])|
|00003aa0| 0a 28 66 73 65 74 20 27 | 73 6d 61 72 74 2d 67 6e |.(fset '|smart-gn|
|00003ab0| 75 73 2d 61 72 74 69 63 | 6c 65 2d 61 73 73 69 73 |us-artic|le-assis|
|00003ac0| 74 20 23 5b 6e 69 6c 20 | 22 c0 20 ac 87 6c ac 95 |t #[nil |". ..l..|
|00003ad0| c1 20 ab 91 c2 8e 0b 71 | 88 c4 15 c4 c6 21 88 c7 |. .....q|.....!..|
|00003ae0| 0e 08 21 29 87 6c ac 84 | c9 20 ae 82 ca 20 87 22 |..!).l..|. ... ."|
|00003af0| 20 5b 6c 61 73 74 2d 6c | 69 6e 65 2d 70 20 66 69 | [last-l|ine-p fi|
|00003b00| 72 73 74 2d 6c 69 6e 65 | 2d 70 20 28 28 62 79 74 |rst-line|-p ((byt|
|00003b10| 65 2d 63 6f 64 65 20 22 | c0 09 21 89 1a ab 84 c3 |e-code "|..!.....|
|00003b20| 5c 6e 21 88 29 c0 87 22 | 20 5b 67 65 74 2d 62 75 |\n!.).."| [get-bu|
|00003b30| 66 66 65 72 2d 77 69 6e | 64 6f 77 20 67 6e 75 73 |ffer-win|dow gnus|
|00003b40| 2d 73 75 6d 6d 61 72 79 | 2d 62 75 66 66 65 72 20 |-summary|-buffer |
|00003b50| 61 72 74 69 63 20 73 65 | 6c 65 63 74 2d 77 69 6e |artic se|lect-win|
|00003b60| 64 6f 77 5d 20 33 29 29 | 20 67 6e 75 73 2d 73 75 |dow] 3))| gnus-su|
|00003b70| 6d 6d 61 72 79 2d 62 75 | 66 66 65 72 20 67 6e 75 |mmary-bu|ffer gnu|
|00003b80| 73 2d 73 75 6d 6d 61 72 | 79 2d 70 72 65 76 2d 61 |s-summar|y-prev-a|
|00003b90| 72 74 69 63 6c 65 20 74 | 68 69 73 2d 63 6f 6d 6d |rticle t|his-comm|
|00003ba0| 61 6e 64 20 6e 69 6c 20 | 67 6e 75 73 2d 73 75 6d |and nil |gnus-sum|
|00003bb0| 6d 61 72 79 2d 67 6f 74 | 6f 2d 73 75 62 6a 65 63 |mary-got|o-subjec|
|00003bc0| 74 20 67 6e 75 73 2d 63 | 75 72 72 65 6e 74 2d 61 |t gnus-c|urrent-a|
|00003bd0| 72 74 69 63 6c 65 20 49 | 6e 66 6f 2d 68 61 6e 64 |rticle I|nfo-hand|
|00003be0| 6c 65 2d 69 6e 2d 6e 6f | 74 65 20 73 63 72 6f 6c |le-in-no|te scrol|
|00003bf0| 6c 2d 64 6f 77 6e 2d 65 | 6f 6c 5d 20 32 20 22 5c |l-down-e|ol] 2 "\|
|00003c00| 0a 55 73 65 73 20 61 6e | 20 61 73 73 69 73 74 2d |.Uses an| assist-|
|00003c10| 6b 65 79 20 6f 72 20 6d | 6f 75 73 65 20 61 73 73 |key or m|ouse ass|
|00003c20| 69 73 74 2d 6b 65 79 20 | 74 6f 20 6d 6f 76 65 20 |ist-key |to move |
|00003c30| 74 68 72 6f 75 67 68 20 | 47 6e 75 73 20 6e 65 74 |through |Gnus net|
|00003c40| 6e 65 77 73 20 61 72 74 | 69 63 6c 65 73 2e 0a 0a |news art|icles...|
|00003c50| 49 6e 76 6f 6b 65 64 20 | 76 69 61 20 61 6e 20 61 |Invoked |via an a|
|00003c60| 73 73 69 73 74 2d 6b 65 | 79 20 70 72 65 73 73 20 |ssist-ke|y press |
|00003c70| 77 68 65 6e 20 69 6e 20 | 67 6e 75 73 2d 61 72 74 |when in |gnus-art|
|00003c80| 69 63 6c 65 2d 6d 6f 64 | 65 2e 0a 49 74 20 61 73 |icle-mod|e..It as|
|00003c90| 73 75 6d 65 73 20 74 68 | 61 74 20 69 74 73 20 63 |sumes th|at its c|
|00003ca0| 61 6c 6c 65 72 20 68 61 | 73 20 61 6c 72 65 61 64 |aller ha|s alread|
|00003cb0| 79 20 63 68 65 63 6b 65 | 64 20 74 68 61 74 20 74 |y checke|d that t|
|00003cc0| 68 65 20 61 73 73 69 73 | 74 2d 6b 65 79 20 77 61 |he assis|t-key wa|
|00003cd0| 73 20 70 72 65 73 73 65 | 64 20 69 6e 0a 61 6e 20 |s presse|d in.an |
|00003ce0| 61 70 70 72 6f 70 72 69 | 61 74 65 20 62 75 66 66 |appropri|ate buff|
|00003cf0| 65 72 20 61 6e 64 20 68 | 61 73 20 6d 6f 76 65 64 |er and h|as moved|
|00003d00| 20 74 68 65 20 63 75 72 | 73 6f 72 20 74 6f 20 74 | the cur|sor to t|
|00003d10| 68 65 20 73 65 6c 65 63 | 74 65 64 20 62 75 66 66 |he selec|ted buff|
|00003d20| 65 72 2e 0a 0a 49 66 20 | 61 73 73 69 73 74 2d 6b |er...If |assist-k|
|00003d30| 65 79 20 69 73 20 70 72 | 65 73 73 65 64 20 77 69 |ey is pr|essed wi|
|00003d40| 74 68 69 6e 3a 0a 20 28 | 31 29 20 74 68 65 20 66 |thin:. (|1) the f|
|00003d50| 69 72 73 74 20 6c 69 6e | 65 20 6f 72 20 65 6e 64 |irst lin|e or end|
|00003d60| 20 6f 66 20 61 6e 20 61 | 72 74 69 63 6c 65 2c 20 | of an a|rticle, |
|00003d70| 74 68 65 20 70 72 65 76 | 69 6f 75 73 20 6d 65 73 |the prev|ious mes|
|00003d80| 73 61 67 65 20 69 73 20 | 64 69 73 70 6c 61 79 65 |sage is |displaye|
|00003d90| 64 3b 0a 20 28 32 29 20 | 74 68 65 20 66 69 72 73 |d;. (2) |the firs|
|00003da0| 74 20 6c 69 6e 65 20 6f | 66 20 61 6e 20 49 6e 66 |t line o|f an Inf|
|00003db0| 6f 20 63 72 6f 73 73 20 | 72 65 66 65 72 65 6e 63 |o cross |referenc|
|00003dc0| 65 2c 20 74 68 65 20 72 | 65 66 65 72 65 6e 63 65 |e, the r|eference|
|00003dd0| 20 69 73 20 66 6f 6c 6c | 6f 77 65 64 3b 0a 20 28 | is foll|owed;. (|
|00003de0| 33 29 20 61 6e 79 77 68 | 65 72 65 20 65 6c 73 65 |3) anywh|ere else|
|00003df0| 2c 20 74 68 65 20 77 69 | 6e 64 6f 77 20 69 73 20 |, the wi|ndow is |
|00003e00| 73 63 72 6f 6c 6c 65 64 | 20 64 6f 77 6e 20 61 20 |scrolled| down a |
|00003e10| 77 69 6e 64 6f 77 66 75 | 6c 2e 22 20 6e 69 6c 5d |windowfu|l." nil]|
|00003e20| 29 0a 28 66 73 65 74 20 | 27 73 6d 61 72 74 2d 68 |).(fset |'smart-h|
|00003e30| 6d 61 69 6c 20 23 5b 6e | 69 6c 20 22 08 09 3d ab |mail #[n|il "..=.|
|00003e40| 98 c2 20 ac 87 6c ac 87 | c3 20 ab 83 c4 20 87 6c |.. ..l..|. ... .l|
|00003e50| ac 84 c5 20 ae 8c c6 20 | 87 c2 20 ab 83 c7 20 87 |... ... |.. ... .|
|00003e60| c8 20 87 22 20 5b 6d 61 | 6a 6f 72 2d 6d 6f 64 65 |. ." [ma|jor-mode|
|00003e70| 20 68 6d 61 69 6c 3a 72 | 65 61 64 65 72 20 6c 61 | hmail:r|eader la|
|00003e80| 73 74 2d 6c 69 6e 65 2d | 70 20 66 69 72 73 74 2d |st-line-|p first-|
|00003e90| 6c 69 6e 65 2d 70 20 72 | 6d 61 69 6c 3a 6d 73 67 |line-p r|mail:msg|
|00003ea0| 2d 6e 65 78 74 20 49 6e | 66 6f 2d 68 61 6e 64 6c |-next In|fo-handl|
|00003eb0| 65 2d 69 6e 2d 6e 6f 74 | 65 20 73 63 72 6f 6c 6c |e-in-not|e scroll|
|00003ec0| 2d 75 70 2d 65 6f 6c 20 | 6c 6d 61 69 6c 3a 65 78 |-up-eol |lmail:ex|
|00003ed0| 70 75 6e 67 65 20 6c 6d | 61 69 6c 3a 67 6f 74 6f |punge lm|ail:goto|
|00003ee0| 5d 20 32 20 22 5c 0a 55 | 73 65 73 20 61 20 6b 65 |] 2 "\.U|ses a ke|
|00003ef0| 79 20 6f 72 20 6d 6f 75 | 73 65 20 6b 65 79 20 74 |y or mou|se key t|
|00003f00| 6f 20 6d 6f 76 65 20 74 | 68 72 6f 75 67 68 20 65 |o move t|hrough e|
|00003f10| 2d 6d 61 69 6c 20 6d 65 | 73 73 61 67 65 73 20 61 |-mail me|ssages a|
|00003f20| 6e 64 20 73 75 6d 6d 61 | 72 69 65 73 2e 0a 0a 49 |nd summa|ries...I|
|00003f30| 6e 76 6f 6b 65 64 20 76 | 69 61 20 61 20 6b 65 79 |nvoked v|ia a key|
|00003f40| 20 70 72 65 73 73 20 77 | 68 65 6e 20 69 6e 20 68 | press w|hen in h|
|00003f50| 6d 61 69 6c 3a 72 65 61 | 64 65 72 20 6f 72 20 68 |mail:rea|der or h|
|00003f60| 6d 61 69 6c 3a 6c 69 73 | 74 65 72 20 6d 6f 64 65 |mail:lis|ter mode|
|00003f70| 2e 0a 49 74 20 61 73 73 | 75 6d 65 73 20 74 68 61 |..It ass|umes tha|
|00003f80| 74 20 69 74 73 20 63 61 | 6c 6c 65 72 20 68 61 73 |t its ca|ller has|
|00003f90| 20 61 6c 72 65 61 64 79 | 20 63 68 65 63 6b 65 64 | already| checked|
|00003fa0| 20 74 68 61 74 20 74 68 | 65 20 6b 65 79 20 77 61 | that th|e key wa|
|00003fb0| 73 20 70 72 65 73 73 65 | 64 20 69 6e 20 61 6e 0a |s presse|d in an.|
|00003fc0| 61 70 70 72 6f 70 72 69 | 61 74 65 20 62 75 66 66 |appropri|ate buff|
|00003fd0| 65 72 20 61 6e 64 20 68 | 61 73 20 6d 6f 76 65 64 |er and h|as moved|
|00003fe0| 20 74 68 65 20 63 75 72 | 73 6f 72 20 74 6f 20 74 | the cur|sor to t|
|00003ff0| 68 65 20 73 65 6c 65 63 | 74 65 64 20 62 75 66 66 |he selec|ted buff|
|00004000| 65 72 2e 0a 0a 49 66 20 | 6b 65 79 20 69 73 20 70 |er...If |key is p|
|00004010| 72 65 73 73 65 64 20 77 | 69 74 68 69 6e 3a 0a 20 |ressed w|ithin:. |
|00004020| 28 31 29 20 61 20 6d 73 | 67 20 62 75 66 66 65 72 |(1) a ms|g buffer|
|00004030| 2c 20 77 69 74 68 69 6e | 20 74 68 65 20 66 69 72 |, within| the fir|
|00004040| 73 74 20 6c 69 6e 65 20 | 6f 72 20 61 74 20 74 68 |st line |or at th|
|00004050| 65 20 65 6e 64 20 6f 66 | 20 61 20 6d 65 73 73 61 |e end of| a messa|
|00004060| 67 65 2c 0a 20 20 20 20 | 20 74 68 65 20 6e 65 78 |ge,.    | the nex|
|00004070| 74 20 75 6e 64 65 6c 65 | 74 65 64 20 6d 65 73 73 |t undele|ted mess|
|00004080| 61 67 65 20 69 73 20 64 | 69 73 70 6c 61 79 65 64 |age is d|isplayed|
|00004090| 3b 0a 20 28 32 29 20 61 | 20 6d 73 67 20 62 75 66 |;. (2) a| msg buf|
|000040a0| 66 65 72 20 77 69 74 68 | 69 6e 20 74 68 65 20 66 |fer with|in the f|
|000040b0| 69 72 73 74 20 6c 69 6e | 65 20 6f 66 20 61 6e 20 |irst lin|e of an |
|000040c0| 49 6e 66 6f 20 63 72 6f | 73 73 20 72 65 66 65 72 |Info cro|ss refer|
|000040d0| 65 6e 63 65 2c 20 74 68 | 65 0a 20 20 20 20 20 72 |ence, th|e.     r|
|000040e0| 65 66 65 72 65 6e 63 65 | 20 69 73 20 66 6f 6c 6c |eference| is foll|
|000040f0| 6f 77 65 64 3b 0a 20 28 | 33 29 20 61 6e 79 77 68 |owed;. (|3) anywh|
|00004100| 65 72 65 20 65 6c 73 65 | 20 69 6e 20 61 20 6d 73 |ere else| in a ms|
|00004110| 67 20 62 75 66 66 65 72 | 2c 20 74 68 65 20 77 69 |g buffer|, the wi|
|00004120| 6e 64 6f 77 20 69 73 20 | 73 63 72 6f 6c 6c 65 64 |ndow is |scrolled|
|00004130| 20 75 70 20 61 20 77 69 | 6e 64 6f 77 66 75 6c 3b | up a wi|ndowful;|
|00004140| 20 0a 20 28 34 29 20 61 | 20 6d 73 67 20 73 75 6d | . (4) a| msg sum|
|00004150| 6d 61 72 79 20 62 75 66 | 66 65 72 20 6f 6e 20 61 |mary buf|fer on a|
|00004160| 20 68 65 61 64 65 72 20 | 65 6e 74 72 79 2c 20 74 | header |entry, t|
|00004170| 68 65 20 6d 65 73 73 61 | 67 65 20 63 6f 72 72 65 |he messa|ge corre|
|00004180| 73 70 6f 6e 64 69 6e 67 | 20 74 6f 0a 20 20 20 20 |sponding| to.    |
|00004190| 20 74 68 65 20 68 65 61 | 64 65 72 20 69 73 20 64 | the hea|der is d|
|000041a0| 69 73 70 6c 61 79 65 64 | 20 69 6e 20 74 68 65 20 |isplayed| in the |
|000041b0| 6d 73 67 20 77 69 6e 64 | 6f 77 3b 0a 20 28 35 29 |msg wind|ow;. (5)|
|000041c0| 20 61 20 6d 73 67 20 73 | 75 6d 6d 61 72 79 20 62 | a msg s|ummary b|
|000041d0| 75 66 66 65 72 2c 20 6f | 6e 20 6f 72 20 61 66 74 |uffer, o|n or aft|
|000041e0| 65 72 20 74 68 65 20 6c | 61 73 74 20 6c 69 6e 65 |er the l|ast line|
|000041f0| 2c 20 74 68 65 20 6d 65 | 73 73 61 67 65 73 20 6d |, the me|ssages m|
|00004200| 61 72 6b 65 64 0a 20 20 | 20 20 20 66 6f 72 20 64 |arked.  |   for d|
|00004210| 65 6c 65 74 69 6f 6e 20 | 61 72 65 20 65 78 70 75 |eletion |are expu|
|00004220| 6e 67 65 64 2e 22 20 6e | 69 6c 5d 29 0a 28 66 73 |nged." n|il]).(fs|
|00004230| 65 74 20 27 73 6d 61 72 | 74 2d 68 6d 61 69 6c 2d |et 'smar|t-hmail-|
|00004240| 61 73 73 69 73 74 20 23 | 5b 6e 69 6c 20 22 08 09 |assist #|[nil "..|
|00004250| 3d ab 98 c2 20 ac 87 6c | ac 87 c3 20 ab 83 c4 20 |=... ..l|... ... |
|00004260| 87 6c ac 84 c5 20 ae 8c | c6 20 87 c2 20 ab 83 c7 |.l... ..|. .. ...|
|00004270| 20 87 c8 20 87 22 20 5b | 6d 61 6a 6f 72 2d 6d 6f | .. ." [|major-mo|
|00004280| 64 65 20 68 6d 61 69 6c | 3a 72 65 61 64 65 72 20 |de hmail|:reader |
|00004290| 6c 61 73 74 2d 6c 69 6e | 65 2d 70 20 66 69 72 73 |last-lin|e-p firs|
|000042a0| 74 2d 6c 69 6e 65 2d 70 | 20 72 6d 61 69 6c 3a 6d |t-line-p| rmail:m|
|000042b0| 73 67 2d 70 72 65 76 20 | 49 6e 66 6f 2d 68 61 6e |sg-prev |Info-han|
|000042c0| 64 6c 65 2d 69 6e 2d 6e | 6f 74 65 20 73 63 72 6f |dle-in-n|ote scro|
|000042d0| 6c 6c 2d 64 6f 77 6e 2d | 65 6f 6c 20 6c 6d 61 69 |ll-down-|eol lmai|
|000042e0| 6c 3a 75 6e 64 65 6c 65 | 74 65 2d 61 6c 6c 20 6c |l:undele|te-all l|
|000042f0| 6d 61 69 6c 3a 64 65 6c | 65 74 65 5d 20 32 20 22 |mail:del|ete] 2 "|
|00004300| 5c 0a 55 73 65 73 20 61 | 6e 20 61 73 73 69 73 74 |\.Uses a|n assist|
|00004310| 20 6b 65 79 20 6f 72 20 | 6d 6f 75 73 65 20 6b 65 | key or |mouse ke|
|00004320| 79 20 74 6f 20 6d 6f 76 | 65 20 74 68 72 6f 75 67 |y to mov|e throug|
|00004330| 68 20 65 2d 6d 61 69 6c | 20 6d 65 73 73 61 67 65 |h e-mail| message|
|00004340| 73 20 61 6e 64 20 73 75 | 6d 6d 61 72 69 65 73 2e |s and su|mmaries.|
|00004350| 0a 0a 49 6e 76 6f 6b 65 | 64 20 76 69 61 20 61 6e |..Invoke|d via an|
|00004360| 20 61 73 73 69 73 74 20 | 6b 65 79 20 70 72 65 73 | assist |key pres|
|00004370| 73 20 77 68 65 6e 20 69 | 6e 20 68 6d 61 69 6c 3a |s when i|n hmail:|
|00004380| 72 65 61 64 65 72 20 6f | 72 20 68 6d 61 69 6c 3a |reader o|r hmail:|
|00004390| 6c 69 73 74 65 72 20 6d | 6f 64 65 2e 0a 49 74 20 |lister m|ode..It |
|000043a0| 61 73 73 75 6d 65 73 20 | 74 68 61 74 20 69 74 73 |assumes |that its|
|000043b0| 20 63 61 6c 6c 65 72 20 | 68 61 73 20 61 6c 72 65 | caller |has alre|
|000043c0| 61 64 79 20 63 68 65 63 | 6b 65 64 20 74 68 61 74 |ady chec|ked that|
|000043d0| 20 74 68 65 20 61 73 73 | 69 73 74 2d 6b 65 79 20 | the ass|ist-key |
|000043e0| 77 61 73 20 70 72 65 73 | 73 65 64 20 69 6e 0a 61 |was pres|sed in.a|
|000043f0| 6e 20 61 70 70 72 6f 70 | 72 69 61 74 65 20 62 75 |n approp|riate bu|
|00004400| 66 66 65 72 20 61 6e 64 | 20 68 61 73 20 6d 6f 76 |ffer and| has mov|
|00004410| 65 64 20 74 68 65 20 63 | 75 72 73 6f 72 20 74 6f |ed the c|ursor to|
|00004420| 20 74 68 65 20 73 65 6c | 65 63 74 65 64 20 62 75 | the sel|ected bu|
|00004430| 66 66 65 72 2e 0a 0a 49 | 66 20 61 73 73 69 73 74 |ffer...I|f assist|
|00004440| 2d 6b 65 79 20 69 73 20 | 70 72 65 73 73 65 64 20 |-key is |pressed |
|00004450| 77 69 74 68 69 6e 3a 0a | 20 28 31 29 20 61 20 6d |within:.| (1) a m|
|00004460| 73 67 20 62 75 66 66 65 | 72 2c 20 77 69 74 68 69 |sg buffe|r, withi|
|00004470| 6e 20 74 68 65 20 66 69 | 72 73 74 20 6c 69 6e 65 |n the fi|rst line|
|00004480| 20 6f 72 20 61 74 20 74 | 68 65 20 65 6e 64 20 6f | or at t|he end o|
|00004490| 66 20 61 20 6d 65 73 73 | 61 67 65 2c 0a 20 20 20 |f a mess|age,.   |
|000044a0| 20 20 74 68 65 20 70 72 | 65 76 69 6f 75 73 20 75 |  the pr|evious u|
|000044b0| 6e 64 65 6c 65 74 65 64 | 20 6d 65 73 73 61 67 65 |ndeleted| message|
|000044c0| 20 69 73 20 64 69 73 70 | 6c 61 79 65 64 3b 0a 20 | is disp|layed;. |
|000044d0| 28 32 29 20 61 20 6d 73 | 67 20 62 75 66 66 65 72 |(2) a ms|g buffer|
|000044e0| 20 77 69 74 68 69 6e 20 | 74 68 65 20 66 69 72 73 | within |the firs|
|000044f0| 74 20 6c 69 6e 65 20 6f | 66 20 61 6e 20 49 6e 66 |t line o|f an Inf|
|00004500| 6f 20 63 72 6f 73 73 20 | 72 65 66 65 72 65 6e 63 |o cross |referenc|
|00004510| 65 2c 20 74 68 65 0a 20 | 20 20 20 20 72 65 66 65 |e, the. |    refe|
|00004520| 72 65 6e 63 65 20 69 73 | 20 66 6f 6c 6c 6f 77 65 |rence is| followe|
|00004530| 64 3b 0a 20 28 33 29 20 | 61 6e 79 77 68 65 72 65 |d;. (3) |anywhere|
|00004540| 20 65 6c 73 65 20 69 6e | 20 61 20 6d 73 67 20 62 | else in| a msg b|
|00004550| 75 66 66 65 72 2c 20 74 | 68 65 20 77 69 6e 64 6f |uffer, t|he windo|
|00004560| 77 20 69 73 20 73 63 72 | 6f 6c 6c 65 64 20 64 6f |w is scr|olled do|
|00004570| 77 6e 20 61 20 77 69 6e | 64 6f 77 66 75 6c 3b 20 |wn a win|dowful; |
|00004580| 0a 20 28 34 29 20 61 20 | 6d 73 67 20 73 75 6d 6d |. (4) a |msg summ|
|00004590| 61 72 79 20 62 75 66 66 | 65 72 20 6f 6e 20 61 20 |ary buff|er on a |
|000045a0| 68 65 61 64 65 72 20 65 | 6e 74 72 79 2c 20 74 68 |header e|ntry, th|
|000045b0| 65 20 6d 65 73 73 61 67 | 65 20 63 6f 72 72 65 73 |e messag|e corres|
|000045c0| 70 6f 6e 64 69 6e 67 20 | 74 6f 0a 20 20 20 20 20 |ponding |to.     |
|000045d0| 74 68 65 20 68 65 61 64 | 65 72 20 69 73 20 6d 61 |the head|er is ma|
|000045e0| 72 6b 65 64 20 61 73 20 | 64 65 6c 65 74 65 64 3b |rked as |deleted;|
|000045f0| 0a 20 28 35 29 20 61 20 | 6d 73 67 20 73 75 6d 6d |. (5) a |msg summ|
|00004600| 61 72 79 20 62 75 66 66 | 65 72 2c 20 6f 6e 20 6f |ary buff|er, on o|
|00004610| 72 20 61 66 74 65 72 20 | 74 68 65 20 6c 61 73 74 |r after |the last|
|00004620| 20 6c 69 6e 65 2c 20 61 | 6c 6c 20 6d 65 73 73 61 | line, a|ll messa|
|00004630| 67 65 73 20 61 72 65 0a | 20 20 20 20 20 6d 61 72 |ges are.|     mar|
|00004640| 6b 65 64 20 75 6e 64 65 | 6c 65 74 65 64 2e 22 20 |ked unde|leted." |
|00004650| 6e 69 6c 5d 29 0a 28 66 | 73 65 74 20 27 73 6d 61 |nil]).(f|set 'sma|
|00004660| 72 74 2d 61 70 72 6f 70 | 6f 73 20 23 5b 6e 69 6c |rt-aprop|os #[nil|
|00004670| 20 22 c0 20 ab 83 c1 20 | 87 c2 20 87 22 20 5b 6c | ". ... |.. ." [l|
|00004680| 61 73 74 2d 6c 69 6e 65 | 2d 70 20 73 63 72 6f 6c |ast-line|-p scrol|
|00004690| 6c 2d 6f 74 68 65 72 2d | 77 69 6e 64 6f 77 20 75 |l-other-|window u|
|000046a0| 6e 69 78 2d 61 70 72 6f | 70 6f 73 2d 67 65 74 2d |nix-apro|pos-get-|
|000046b0| 6d 61 6e 5d 20 31 20 22 | 5c 0a 4d 6f 76 65 73 20 |man] 1 "|\.Moves |
|000046c0| 74 68 72 6f 75 67 68 20 | 55 4e 49 58 20 6d 61 6e |through |UNIX man|
|000046d0| 20 61 70 72 6f 70 6f 73 | 20 6c 69 73 74 69 6e 67 | apropos| listing|
|000046e0| 73 20 62 79 20 75 73 69 | 6e 67 20 6f 6e 65 20 6b |s by usi|ng one k|
|000046f0| 65 79 20 6f 72 20 6d 6f | 75 73 65 20 6b 65 79 2e |ey or mo|use key.|
|00004700| 0a 0a 49 6e 76 6f 6b 65 | 64 20 76 69 61 20 61 20 |..Invoke|d via a |
|00004710| 6b 65 79 20 70 72 65 73 | 73 20 77 68 65 6e 20 69 |key pres|s when i|
|00004720| 6e 20 75 6e 69 78 2d 61 | 70 72 6f 70 6f 73 2d 6d |n unix-a|propos-m|
|00004730| 6f 64 65 2e 20 20 49 74 | 20 61 73 73 75 6d 65 73 |ode.  It| assumes|
|00004740| 20 74 68 61 74 0a 69 74 | 73 20 63 61 6c 6c 65 72 | that.it|s caller|
|00004750| 20 68 61 73 20 61 6c 72 | 65 61 64 79 20 63 68 65 | has alr|eady che|
|00004760| 63 6b 65 64 20 74 68 61 | 74 20 74 68 65 20 6b 65 |cked tha|t the ke|
|00004770| 79 20 77 61 73 20 70 72 | 65 73 73 65 64 20 69 6e |y was pr|essed in|
|00004780| 20 61 6e 20 61 70 70 72 | 6f 70 72 69 61 74 65 0a | an appr|opriate.|
|00004790| 62 75 66 66 65 72 20 61 | 6e 64 20 68 61 73 20 6d |buffer a|nd has m|
|000047a0| 6f 76 65 64 20 74 68 65 | 20 63 75 72 73 6f 72 20 |oved the| cursor |
|000047b0| 74 6f 20 74 68 65 20 73 | 65 6c 65 63 74 65 64 20 |to the s|elected |
|000047c0| 62 75 66 66 65 72 2e 0a | 0a 49 66 20 6b 65 79 20 |buffer..|.If key |
|000047d0| 69 73 20 70 72 65 73 73 | 65 64 3a 0a 20 28 31 29 |is press|ed:. (1)|
|000047e0| 20 6f 6e 20 61 20 55 4e | 49 58 20 6d 61 6e 20 61 | on a UN|IX man a|
|000047f0| 70 72 6f 70 6f 73 20 65 | 6e 74 72 79 2c 20 74 68 |propos e|ntry, th|
|00004800| 65 20 6d 61 6e 20 70 61 | 67 65 20 66 6f 72 20 74 |e man pa|ge for t|
|00004810| 68 61 74 20 65 6e 74 72 | 79 20 69 73 20 64 69 73 |hat entr|y is dis|
|00004820| 70 6c 61 79 65 64 20 69 | 6e 0a 20 20 20 20 20 61 |played i|n.     a|
|00004830| 6e 6f 74 68 65 72 20 77 | 69 6e 64 6f 77 3b 0a 20 |nother w|indow;. |
|00004840| 28 32 29 20 6f 6e 20 6f | 72 20 61 66 74 65 72 20 |(2) on o|r after |
|00004850| 74 68 65 20 6c 61 73 74 | 20 6c 69 6e 65 2c 20 74 |the last| line, t|
|00004860| 68 65 20 62 75 66 66 65 | 72 20 69 6e 20 74 68 65 |he buffe|r in the|
|00004870| 20 6f 74 68 65 72 20 77 | 69 6e 64 6f 77 20 69 73 | other w|indow is|
|00004880| 20 73 63 72 6f 6c 6c 65 | 64 20 75 70 0a 20 20 20 | scrolle|d up.   |
|00004890| 20 20 61 20 77 69 6e 64 | 6f 77 66 75 6c 2e 22 20 |  a wind|owful." |
|000048a0| 6e 69 6c 5d 29 0a 28 66 | 73 65 74 20 27 73 6d 61 |nil]).(f|set 'sma|
|000048b0| 72 74 2d 61 70 72 6f 70 | 6f 73 2d 61 73 73 69 73 |rt-aprop|os-assis|
|000048c0| 74 20 23 5b 6e 69 6c 20 | 22 c0 20 ab 87 c1 c2 c3 |t #[nil |". .....|
|000048d0| 20 5a 21 87 c4 20 87 22 | 20 5b 6c 61 73 74 2d 6c | Z!.. ."| [last-l|
|000048e0| 69 6e 65 2d 70 20 73 63 | 72 6f 6c 6c 2d 6f 74 68 |ine-p sc|roll-oth|
|000048f0| 65 72 2d 77 69 6e 64 6f | 77 20 33 20 77 69 6e 64 |er-windo|w 3 wind|
|00004900| 6f 77 2d 68 65 69 67 68 | 74 20 75 6e 69 78 2d 61 |ow-heigh|t unix-a|
|00004910| 70 72 6f 70 6f 73 2d 67 | 65 74 2d 6d 61 6e 5d 20 |propos-g|et-man] |
|00004920| 33 20 22 5c 0a 4d 6f 76 | 65 73 20 74 68 72 6f 75 |3 "\.Mov|es throu|
|00004930| 67 68 20 55 4e 49 58 20 | 6d 61 6e 20 61 70 72 6f |gh UNIX |man apro|
|00004940| 70 6f 73 20 6c 69 73 74 | 69 6e 67 73 20 62 79 20 |pos list|ings by |
|00004950| 75 73 69 6e 67 20 6f 6e | 65 20 61 73 73 69 73 74 |using on|e assist|
|00004960| 2d 6b 65 79 20 6f 72 20 | 6d 6f 75 73 65 20 61 73 |-key or |mouse as|
|00004970| 73 69 73 74 2d 6b 65 79 | 2e 0a 0a 49 6e 76 6f 6b |sist-key|...Invok|
|00004980| 65 64 20 76 69 61 20 61 | 6e 20 61 73 73 69 73 74 |ed via a|n assist|
|00004990| 2d 6b 65 79 20 70 72 65 | 73 73 20 77 68 65 6e 20 |-key pre|ss when |
|000049a0| 69 6e 20 75 6e 69 78 2d | 61 70 72 6f 70 6f 73 2d |in unix-|apropos-|
|000049b0| 6d 6f 64 65 2e 20 20 49 | 74 20 61 73 73 75 6d 65 |mode.  I|t assume|
|000049c0| 73 20 74 68 61 74 0a 69 | 74 73 20 63 61 6c 6c 65 |s that.i|ts calle|
|000049d0| 72 20 68 61 73 20 61 6c | 72 65 61 64 79 20 63 68 |r has al|ready ch|
|000049e0| 65 63 6b 65 64 20 74 68 | 61 74 20 74 68 65 20 61 |ecked th|at the a|
|000049f0| 73 73 69 73 74 2d 6b 65 | 79 20 77 61 73 20 70 72 |ssist-ke|y was pr|
|00004a00| 65 73 73 65 64 20 69 6e | 20 61 6e 20 61 70 70 72 |essed in| an appr|
|00004a10| 6f 70 72 69 61 74 65 0a | 62 75 66 66 65 72 20 61 |opriate.|buffer a|
|00004a20| 6e 64 20 68 61 73 20 6d | 6f 76 65 64 20 74 68 65 |nd has m|oved the|
|00004a30| 20 63 75 72 73 6f 72 20 | 74 6f 20 74 68 65 20 73 | cursor |to the s|
|00004a40| 65 6c 65 63 74 65 64 20 | 62 75 66 66 65 72 2e 0a |elected |buffer..|
|00004a50| 0a 49 66 20 61 73 73 69 | 73 74 2d 6b 65 79 20 69 |.If assi|st-key i|
|00004a60| 73 20 70 72 65 73 73 65 | 64 3a 0a 20 28 31 29 20 |s presse|d:. (1) |
|00004a70| 6f 6e 20 61 20 55 4e 49 | 58 20 6d 61 6e 20 61 70 |on a UNI|X man ap|
|00004a80| 72 6f 70 6f 73 20 65 6e | 74 72 79 2c 20 74 68 65 |ropos en|try, the|
|00004a90| 20 6d 61 6e 20 70 61 67 | 65 20 66 6f 72 20 74 68 | man pag|e for th|
|00004aa0| 61 74 20 65 6e 74 72 79 | 20 69 73 20 64 69 73 70 |at entry| is disp|
|00004ab0| 6c 61 79 65 64 20 69 6e | 0a 20 20 20 20 20 61 6e |layed in|.     an|
|00004ac0| 6f 74 68 65 72 20 77 69 | 6e 64 6f 77 3b 0a 20 28 |other wi|ndow;. (|
|00004ad0| 32 29 20 6f 6e 20 6f 72 | 20 61 66 74 65 72 20 74 |2) on or| after t|
|00004ae0| 68 65 20 6c 61 73 74 20 | 6c 69 6e 65 2c 20 74 68 |he last |line, th|
|00004af0| 65 20 62 75 66 66 65 72 | 20 69 6e 20 74 68 65 20 |e buffer| in the |
|00004b00| 6f 74 68 65 72 20 77 69 | 6e 64 6f 77 20 69 73 20 |other wi|ndow is |
|00004b10| 73 63 72 6f 6c 6c 65 64 | 20 64 6f 77 6e 0a 20 20 |scrolled| down.  |
|00004b20| 20 20 20 61 20 77 69 6e | 64 6f 77 66 75 6c 2e 22 |   a win|dowful."|
|00004b30| 20 6e 69 6c 5d 29 0a 28 | 66 73 65 74 20 27 73 6d | nil]).(|fset 'sm|
|00004b40| 61 72 74 2d 6d 61 6e 2d | 64 69 73 70 6c 61 79 20 |art-man-|display |
|00004b50| 23 5b 28 6c 69 73 70 2d | 66 6f 72 6d 29 20 22 c0 |#[(lisp-|form) ".|
|00004b60| 09 21 87 22 20 5b 65 76 | 61 6c 20 6c 69 73 70 2d |.!." [ev|al lisp-|
|00004b70| 66 6f 72 6d 5d 20 32 20 | 22 5c 0a 45 76 61 6c 75 |form] 2 |"\.Evalu|
|00004b80| 61 74 65 73 20 4c 49 53 | 50 2d 46 4f 52 4d 20 72 |ates LIS|P-FORM r|
|00004b90| 65 74 75 72 6e 65 64 20 | 66 72 6f 6d 20 27 73 6d |eturned |from 'sm|
|00004ba0| 61 72 74 2d 6d 61 6e 2d | 65 6e 74 72 79 2d 72 65 |art-man-|entry-re|
|00004bb0| 66 27 20 74 6f 20 64 69 | 73 70 6c 61 79 20 61 20 |f' to di|splay a |
|00004bc0| 6d 61 6e 20 70 61 67 65 | 2e 22 5d 29 0a 28 66 73 |man page|."]).(fs|
|00004bd0| 65 74 20 27 73 6d 61 72 | 74 2d 6d 61 6e 2d 65 6e |et 'smar|t-man-en|
|00004be0| 74 72 79 2d 72 65 66 20 | 23 5b 6e 69 6c 20 22 c0 |try-ref |#[nil ".|
|00004bf0| 19 c2 c3 c4 70 21 5c 22 | ab 90 c5 c6 21 ab 9e 0e |....p!\"|....!...|
|00004c00| 06 ab 9a c7 0e 06 21 11 | aa 93 0e 08 ab 8b c2 c9 |......!.|........|
|00004c10| c7 0e 08 21 89 11 5c 22 | ac 84 ca 11 aa c4 cb 20 |...!..\"|....... |
|00004c20| ae 82 cc 20 89 11 ac ba | 8a 60 ca 1e 0d 1e 0e cf |... ....|.`......|
|00004c30| d0 ca d1 23 ab ab d2 d3 | 21 ab a6 0e 0e 62 88 d4 |...#....|!....b..|
|00004c40| ca 78 88 60 1e 15 d6 ca | 77 88 0e 15 60 7b 89 11 |.x.`....|w...`{..|
|00004c50| ab 8e c2 d7 09 5c 22 ab | 88 09 d8 d9 95 4f da 50 |.....\".|.....O.P|
|00004c60| 11 29 2b 09 c0 9a ab 83 | ca aa 8a 09 3b ab 85 db |.)+.....|....;...|
|00004c70| 09 44 aa 81 09 29 87 22 | 20 5b 22 22 20 72 65 66 |.D...)."| ["" ref|
|00004c80| 20 73 74 72 69 6e 67 2d | 6d 61 74 63 68 20 22 4d | string-|match "M|
|00004c90| 61 6e 75 61 6c 20 45 6e | 74 72 79 5c 5c 7c 5c 5c |anual En|try\\|\\|
|00004ca0| 2a 6d 61 6e 20 22 20 62 | 75 66 66 65 72 2d 6e 61 |*man " b|uffer-na|
|00004cb0| 6d 65 20 62 6f 75 6e 64 | 70 20 6d 61 6e 2d 70 61 |me bound|p man-pa|
|00004cc0| 74 68 20 73 6d 61 72 74 | 2d 73 79 6d 6c 69 6e 6b |th smart|-symlink|
|00004cd0| 2d 65 78 70 61 6e 64 20 | 62 75 66 66 65 72 2d 66 |-expand |buffer-f|
|00004ce0| 69 6c 65 2d 6e 61 6d 65 | 20 22 2f 6d 61 6e 2f 22 |ile-name| "/man/"|
|00004cf0| 20 6e 69 6c 20 73 6d 61 | 72 74 2d 6d 61 6e 2d 66 | nil sma|rt-man-f|
|00004d00| 69 6c 65 2d 72 65 66 20 | 73 6d 61 72 74 2d 6d 61 |ile-ref |smart-ma|
|00004d10| 6e 2d 63 2d 72 6f 75 74 | 69 6e 65 2d 72 65 66 20 |n-c-rout|ine-ref |
|00004d20| 63 61 73 65 2d 66 6f 6c | 64 2d 73 65 61 72 63 68 |case-fol|d-search|
|00004d30| 20 6f 70 6f 69 6e 74 20 | 72 65 2d 73 65 61 72 63 | opoint |re-searc|
|00004d40| 68 2d 62 61 63 6b 77 61 | 72 64 20 22 5e 5b 2e 41 |h-backwa|rd "^[.A|
|00004d50| 2d 5a 5d 22 20 74 20 6c | 6f 6f 6b 69 6e 67 2d 61 |-Z]" t l|ooking-a|
|00004d60| 74 20 22 5c 5c 28 5c 5c | 2e 53 48 5b 20 09 5d 2b |t "\\(\\|.SH[ .]+|
|00004d70| 5c 5c 29 3f 5c 5c 28 53 | 45 45 20 41 4c 53 4f 5c |\\)?\\(S|EE ALSO\|
|00004d80| 5c 7c 4e 41 4d 45 5c 5c | 7c 50 41 43 4b 41 47 45 |\|NAME\\||PACKAGE|
|00004d90| 53 20 55 53 45 44 5c 5c | 29 22 20 22 2d 5f 61 2d |S USED\\|)" "-_a-|
|00004da0| 7a 41 2d 5a 30 2d 39 3f | 2e 28 22 20 73 74 61 72 |zA-Z0-9?|.(" star|
|00004db0| 74 20 22 2d 5f 61 2d 7a | 41 2d 5a 30 2d 39 3f 2e |t "-_a-z|A-Z0-9?.|
|00004dc0| 28 29 22 20 22 28 5c 5c | 28 2e 5c 5c 29 5c 5c 28 |()" "(\\|(.\\)\\(|
|00004dd0| 2e 2b 5c 5c 29 29 22 20 | 30 20 31 20 22 29 22 20 |.+\\))" |0 1 ")" |
|00004de0| 6d 61 6e 75 61 6c 2d 65 | 6e 74 72 79 5d 20 35 20 |manual-e|ntry] 5 |
|00004df0| 22 5c 0a 52 65 74 75 72 | 6e 73 20 66 6f 72 6d 20 |"\.Retur|ns form |
|00004e00| 77 68 69 63 68 20 64 69 | 73 70 6c 61 79 73 20 72 |which di|splays r|
|00004e10| 65 66 65 72 65 6e 63 65 | 64 20 6d 61 6e 75 61 6c |eference|d manual|
|00004e20| 20 65 6e 74 72 79 20 74 | 68 61 74 20 70 6f 69 6e | entry t|hat poin|
|00004e30| 74 20 69 73 20 6f 6e 20 | 6f 72 20 6e 69 6c 2e 0a |t is on |or nil..|
|00004e40| 48 61 6e 64 6c 65 73 20 | 72 65 66 65 72 65 6e 63 |Handles |referenc|
|00004e50| 65 73 20 69 6e 20 73 65 | 63 74 69 6f 6e 73 3a 20 |es in se|ctions: |
|00004e60| 4e 41 4d 45 2c 20 53 45 | 45 20 41 4c 53 4f 2c 20 |NAME, SE|E ALSO, |
|00004e70| 6f 72 20 50 41 43 4b 41 | 47 45 53 20 55 53 45 44 |or PACKA|GES USED|
|00004e80| 2e 20 20 41 6c 73 6f 20 | 63 61 6e 0a 64 69 73 70 |.  Also |can.disp|
|00004e90| 6c 61 79 20 43 20 72 6f | 75 74 69 6e 65 20 64 65 |lay C ro|utine de|
|00004ea0| 66 69 6e 69 74 69 6f 6e | 73 20 73 65 6c 65 63 74 |finition|s select|
|00004eb0| 65 64 20 69 6e 20 61 20 | 6d 61 6e 20 70 61 67 65 |ed in a |man page|
|00004ec0| 2c 20 73 65 65 0a 27 73 | 6d 61 72 74 2d 6d 61 6e |, see.'s|mart-man|
|00004ed0| 2d 63 2d 72 6f 75 74 69 | 6e 65 2d 72 65 66 27 2e |-c-routi|ne-ref'.|
|00004ee0| 0a 0a 4d 61 6e 20 70 61 | 67 65 20 62 75 66 66 65 |..Man pa|ge buffe|
|00004ef0| 72 20 6d 75 73 74 20 65 | 69 74 68 65 72 20 68 61 |r must e|ither ha|
|00004f00| 76 65 20 61 6e 20 61 74 | 74 61 63 68 65 64 20 66 |ve an at|tached f|
|00004f10| 69 6c 65 20 6f 72 20 65 | 6c 73 65 20 61 20 60 6d |ile or e|lse a `m|
|00004f20| 61 6e 2d 70 61 74 68 27 | 0a 6c 6f 63 61 6c 20 76 |an-path'|.local v|
|00004f30| 61 72 69 61 62 6c 65 20 | 63 6f 6e 74 61 69 6e 69 |ariable |containi|
|00004f40| 6e 67 20 69 74 73 20 70 | 61 74 68 6e 61 6d 65 2e |ng its p|athname.|
|00004f50| 22 20 6e 69 6c 5d 29 0a | 28 66 73 65 74 20 27 73 |" nil]).|(fset 's|
|00004f60| 6d 61 72 74 2d 6d 61 6e | 2d 63 2d 72 6f 75 74 69 |mart-man|-c-routi|
|00004f70| 6e 65 2d 72 65 66 20 23 | 5b 6e 69 6c 20 22 c0 60 |ne-ref #|[nil ".`|
|00004f80| c0 19 1a 1b 8a c4 c5 c0 | c6 23 ab 9c c7 c8 21 ab |........|.#....!.|
|00004f90| 97 5c 6e 62 88 c9 c0 78 | 88 c7 ca 21 ac 85 c7 cb |.\nb...x|...!....|
|00004fa0| 21 ab 86 cc 94 cc 95 7b | 13 29 0b ad b1 cd ce cf |!......{|.)......|
|00004fb0| 21 ab 88 0e 0f ab 84 0e | 0f aa 82 0e 10 21 1e 11 |!.......|.....!..|
|00004fc0| d2 0e 11 21 ad 97 d3 0e | 11 21 ad 91 d4 d1 0e 11 |...!....|.!......|
|00004fd0| 44 43 d5 20 ab 83 d6 aa | 81 d7 0b 44 45 29 2b 87 |DC. ....|...DE)+.|
|00004fe0| 22 20 5b 6e 69 6c 20 63 | 61 73 65 2d 66 6f 6c 64 |" [nil c|ase-fold|
|00004ff0| 2d 73 65 61 72 63 68 20 | 6f 70 6f 69 6e 74 20 72 |-search |opoint r|
|00005000| 65 66 20 72 65 2d 73 65 | 61 72 63 68 2d 62 61 63 |ef re-se|arch-bac|
|00005010| 6b 77 61 72 64 20 22 5e | 5b 2e 41 2d 5a 5d 22 20 |kward "^|[.A-Z]" |
|00005020| 74 20 6c 6f 6f 6b 69 6e | 67 2d 61 74 20 22 5e 5c |t lookin|g-at "^\|
|00005030| 5c 28 46 55 4e 43 54 49 | 4f 4e 53 5c 5c 7c 52 4f |\(FUNCTI|ONS\\|RO|
|00005040| 55 54 49 4e 45 53 5c 5c | 7c 4d 41 43 52 4f 53 5c |UTINES\\||MACROS\|
|00005050| 5c 29 5b 20 09 5c 6e 5d | 22 20 22 5f 7e 3c 3e 3a |\)[ .\n]|" "_~<>:|
|00005060| 61 2d 7a 41 2d 5a 30 2d | 39 28 22 20 22 5c 5c 28 |a-zA-Z0-|9(" "\\(|
|00005070| 5b 5f 7e 3c 3e 3a 61 2d | 7a 41 2d 5a 30 2d 39 5d |[_~<>:a-|zA-Z0-9]|
|00005080| 2b 5c 5c 29 5b 20 09 5c | 6e 5d 2a 28 22 20 22 5c |+\\)[ .\|n]*(" "\|
|00005090| 5c 28 5b 5f 7e 3c 3a 41 | 2d 5a 5d 5b 5f 3c 3e 3a |\([_~<:A|-Z][_<>:|
|000050a0| 41 2d 5a 30 2d 39 5d 2b | 5c 5c 29 22 20 31 20 73 |A-Z0-9]+|\\)" 1 s|
|000050b0| 6d 61 72 74 2d 74 61 67 | 73 2d 66 69 6c 65 20 62 |mart-tag|s-file b|
|000050c0| 6f 75 6e 64 70 20 6d 61 | 6e 2d 70 61 74 68 20 64 |oundp ma|n-path d|
|000050d0| 65 66 61 75 6c 74 2d 64 | 69 72 65 63 74 6f 72 79 |efault-d|irectory|
|000050e0| 20 74 61 67 73 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 | tags-fi|le-name |
|000050f0| 66 69 6c 65 2d 65 78 69 | 73 74 73 2d 70 20 66 69 |file-exi|sts-p fi|
|00005100| 6c 65 2d 72 65 61 64 61 | 62 6c 65 2d 70 20 6c 65 |le-reada|ble-p le|
|00005110| 74 20 62 72 2d 69 6e 2d | 62 72 6f 77 73 65 72 20 |t br-in-|browser |
|00005120| 66 69 6e 64 2d 74 61 67 | 20 66 69 6e 64 2d 74 61 |find-tag| find-ta|
|00005130| 67 2d 6f 74 68 65 72 2d | 77 69 6e 64 6f 77 5d 20 |g-other-|window] |
|00005140| 34 20 22 5c 0a 52 65 74 | 75 72 6e 73 20 66 6f 72 |4 "\.Ret|urns for|
|00005150| 6d 20 74 6f 20 6a 75 6d | 70 20 74 6f 20 64 65 66 |m to jum|p to def|
|00005160| 20 6f 66 20 43 20 66 75 | 6e 63 74 69 6f 6e 20 77 | of C fu|nction w|
|00005170| 68 6f 73 65 20 6e 61 6d | 65 20 69 73 20 61 74 20 |hose nam|e is at |
|00005180| 70 6f 69 6e 74 2c 20 69 | 66 20 61 6e 79 2e 0a 56 |point, i|f any..V|
|00005190| 61 6c 69 64 20 73 65 63 | 74 69 6f 6e 73 20 77 69 |alid sec|tions wi|
|000051a0| 74 68 69 6e 20 74 68 65 | 20 6d 61 6e 20 70 61 67 |thin the| man pag|
|000051b0| 65 20 61 72 65 3a 20 52 | 4f 55 54 49 4e 45 53 2c |e are: R|OUTINES,|
|000051c0| 20 4d 41 43 52 4f 53 20 | 6f 72 20 46 55 4e 43 54 | MACROS |or FUNCT|
|000051d0| 49 4f 4e 53 2e 0a 55 73 | 65 73 20 28 73 6d 61 72 |IONS..Us|es (smar|
|000051e0| 74 2d 74 61 67 73 2d 66 | 69 6c 65 29 20 66 75 6e |t-tags-f|ile) fun|
|000051f0| 63 74 69 6f 6e 20 74 6f | 20 64 65 74 65 72 6d 69 |ction to| determi|
|00005200| 6e 65 20 65 74 61 67 73 | 20 66 69 6c 65 20 66 72 |ne etags| file fr|
|00005210| 6f 6d 20 77 68 69 63 68 | 20 74 6f 0a 6c 6f 63 61 |om which| to.loca|
|00005220| 74 65 20 74 68 65 20 64 | 65 66 69 6e 69 74 69 6f |te the d|efinitio|
|00005230| 6e 2e 0a 0a 52 65 74 75 | 72 6e 73 20 65 74 61 67 |n...Retu|rns etag|
|00005240| 73 20 66 69 6c 65 20 6e | 61 6d 65 20 69 66 20 70 |s file n|ame if p|
|00005250| 6f 69 6e 74 20 69 73 20 | 6f 6e 20 61 6e 20 69 64 |oint is |on an id|
|00005260| 65 6e 74 69 66 69 65 72 | 20 69 6e 20 74 68 65 20 |entifier| in the |
|00005270| 61 70 70 72 6f 70 72 69 | 61 74 65 0a 73 65 63 74 |appropri|ate.sect|
|00005280| 69 6f 6e 20 61 6e 64 20 | 74 68 65 20 6a 75 6d 70 |ion and |the jump|
|00005290| 20 69 73 20 64 6f 6e 65 | 2c 20 6f 74 68 65 72 77 | is done|, otherw|
|000052a0| 69 73 65 2c 20 72 65 74 | 75 72 6e 73 20 6e 69 6c |ise, ret|urns nil|
|000052b0| 2e 22 5d 29 0a 28 66 73 | 65 74 20 27 73 6d 61 72 |."]).(fs|et 'smar|
|000052c0| 74 2d 6d 61 6e 2d 66 69 | 6c 65 2d 72 65 66 20 23 |t-man-fi|le-ref #|
|000052d0| 5b 6e 69 6c 20 22 c0 60 | c0 19 1a 1b 8a c4 c5 c0 |[nil ".`|........|
|000052e0| c6 23 ab 97 c7 c8 21 ab | 92 5c 6e 62 88 c9 c0 78 |.#....!.|.\nb...x|
|000052f0| 88 c7 ca 21 ab 86 cb 94 | cb 95 7b 13 29 0b ad 8a |...!....|..{.)...|
|00005300| cc 20 ab 83 cd aa 81 ce | 0b 44 2b 87 22 20 5b 6e |. ......|.D+." [n|
|00005310| 69 6c 20 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |il case-|fold-sea|
|00005320| 72 63 68 20 6f 70 6f 69 | 6e 74 20 72 65 66 20 72 |rch opoi|nt ref r|
|00005330| 65 2d 73 65 61 72 63 68 | 2d 62 61 63 6b 77 61 72 |e-search|-backwar|
|00005340| 64 20 22 5e 5b 2e 41 2d | 5a 5d 22 20 74 20 6c 6f |d "^[.A-|Z]" t lo|
|00005350| 6f 6b 69 6e 67 2d 61 74 | 20 22 5e 46 49 4c 45 53 |oking-at| "^FILES|
|00005360| 5b 20 09 5c 6e 5d 22 20 | 22 5e 20 09 22 20 22 2f |[ .\n]" |"^ ." "/|
|00005370| 5b 5e 20 09 5c 6e 5d 2b | 22 20 30 20 62 72 2d 69 |[^ .\n]+|" 0 br-i|
|00005380| 6e 2d 62 72 6f 77 73 65 | 72 20 66 69 6e 64 2d 66 |n-browse|r find-f|
|00005390| 69 6c 65 20 66 69 6e 64 | 2d 66 69 6c 65 2d 6f 74 |ile find|-file-ot|
|000053a0| 68 65 72 2d 77 69 6e 64 | 6f 77 5d 20 34 20 22 5c |her-wind|ow] 4 "\|
|000053b0| 0a 52 65 74 75 72 6e 73 | 20 66 6f 72 6d 20 74 6f |.Returns| form to|
|000053c0| 20 65 76 61 6c 20 74 6f | 20 64 69 73 70 6c 61 79 | eval to| display|
|000053d0| 20 66 69 6c 65 20 77 68 | 6f 73 65 20 6e 61 6d 65 | file wh|ose name|
|000053e0| 20 70 6f 69 6e 74 20 69 | 73 20 6f 6e 2c 20 77 69 | point i|s on, wi|
|000053f0| 74 68 69 6e 20 61 20 46 | 49 4c 45 53 20 6d 61 6e |thin a F|ILES man|
|00005400| 20 70 61 67 65 20 73 65 | 63 74 69 6f 6e 2e 0a 49 | page se|ction..I|
|00005410| 66 20 6e 6f 74 20 6f 6e | 20 61 20 66 69 6c 65 20 |f not on| a file |
|00005420| 6e 61 6d 65 2c 20 72 65 | 74 75 72 6e 73 20 6e 69 |name, re|turns ni|
|00005430| 6c 2e 22 5d 29 0a 28 64 | 65 66 76 61 72 20 73 6d |l."]).(d|efvar sm|
|00005440| 61 72 74 2d 6f 75 74 6c | 69 6e 65 2d 63 75 74 20 |art-outl|ine-cut |
|00005450| 6e 69 6c 20 22 5c 0a 4e | 6f 6e 2d 6e 69 6c 20 6d |nil "\.N|on-nil m|
|00005460| 65 61 6e 73 20 6f 75 74 | 6c 69 6e 65 20 72 65 67 |eans out|line reg|
|00005470| 69 6f 6e 20 77 61 73 20 | 63 75 74 20 61 6e 64 20 |ion was |cut and |
|00005480| 69 73 20 72 65 61 64 79 | 20 74 6f 20 62 65 20 70 |is ready| to be p|
|00005490| 61 73 74 65 64 20 61 74 | 20 70 6f 69 6e 74 2e 22 |asted at| point."|
|000054a0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 19 |).(byte-|code "..|
|000054b0| c2 c3 21 ab 86 c4 09 21 | 88 aa 85 c5 c6 09 5c 22 |..!....!|......\"|
|000054c0| 88 29 c2 87 22 20 5b 28 | 28 6c 61 6d 62 64 61 20 |.).." [(|(lambda |
|000054d0| 6e 69 6c 20 28 6d 61 6b | 65 2d 6c 6f 63 61 6c 2d |nil (mak|e-local-|
|000054e0| 76 61 72 69 61 62 6c 65 | 20 27 73 6d 61 72 74 2d |variable| 'smart-|
|000054f0| 6f 75 74 6c 69 6e 65 2d | 63 75 74 29 20 28 73 65 |outline-|cut) (se|
|00005500| 74 71 20 73 6d 61 72 74 | 2d 6f 75 74 6c 69 6e 65 |tq smart|-outline|
|00005510| 2d 63 75 74 20 6e 69 6c | 29 29 29 20 70 72 6f 63 |-cut nil|))) proc|
|00005520| 20 62 6f 75 6e 64 70 20 | 6f 75 74 6c 69 6e 65 2d | boundp |outline-|
|00005530| 6d 6f 64 65 2d 6d 61 70 | 20 65 76 61 6c 20 76 61 |mode-map| eval va|
|00005540| 72 3a 61 70 70 65 6e 64 | 20 6f 75 74 6c 69 6e 65 |r:append| outline|
|00005550| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 5d 20 33 29 0a 28 |-mode-ho|ok] 3).(|
|00005560| 66 73 65 74 20 27 73 6d | 61 72 74 2d 6f 75 74 6c |fset 'sm|art-outl|
|00005570| 69 6e 65 20 23 5b 6e 69 | 6c 20 22 08 ab 85 c1 10 |ine #[ni|l ".....|
|00005580| c2 20 87 6d ab 83 c3 20 | 87 6e ab 9a c4 0d 21 ab |. .m... |.n....!.|
|00005590| 95 c6 10 c7 60 c8 20 ae | 8b c9 0d c1 c6 23 88 ca |....`. .|.....#..|
|000055a0| c6 cb 20 5c 22 5c 22 87 | 6c ac 8b 8a cc 79 88 cb |.. \"\".|l....y..|
|000055b0| 20 29 cc 55 ab 83 cd 20 | 87 ce 20 ab 83 cf 20 87 | ).U... |.. ... .|
|000055c0| d0 20 87 22 20 5b 73 6d | 61 72 74 2d 6f 75 74 6c |. ." [sm|art-outl|
|000055d0| 69 6e 65 2d 63 75 74 20 | 6e 69 6c 20 79 61 6e 6b |ine-cut |nil yank|
|000055e0| 20 73 68 6f 77 2d 61 6c | 6c 20 6c 6f 6f 6b 69 6e | show-al|l lookin|
|000055f0| 67 2d 61 74 20 6f 75 74 | 6c 69 6e 65 2d 72 65 67 |g-at out|line-reg|
|00005600| 65 78 70 20 74 20 6b 69 | 6c 6c 2d 72 65 67 69 6f |exp t ki|ll-regio|
|00005610| 6e 20 6f 75 74 6c 69 6e | 65 2d 67 65 74 2d 6e 65 |n outlin|e-get-ne|
|00005620| 78 74 2d 73 69 62 6c 69 | 6e 67 20 72 65 2d 73 65 |xt-sibli|ng re-se|
|00005630| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 73 6d 61 |arch-for|ward sma|
|00005640| 72 74 2d 6f 75 74 6c 69 | 6e 65 2d 74 6f 2d 65 6e |rt-outli|ne-to-en|
|00005650| 74 72 79 2d 65 6e 64 20 | 6f 75 74 6c 69 6e 65 2d |try-end |outline-|
|00005660| 6c 65 76 65 6c 20 30 20 | 73 63 72 6f 6c 6c 2d 75 |level 0 |scroll-u|
|00005670| 70 2d 65 6f 6c 20 73 6d | 61 72 74 2d 6f 75 74 6c |p-eol sm|art-outl|
|00005680| 69 6e 65 2d 73 75 62 74 | 72 65 65 2d 68 69 64 64 |ine-subt|ree-hidd|
|00005690| 65 6e 2d 70 20 73 68 6f | 77 2d 73 75 62 74 72 65 |en-p sho|w-subtre|
|000056a0| 65 20 68 69 64 65 2d 73 | 75 62 74 72 65 65 5d 20 |e hide-s|ubtree] |
|000056b0| 36 20 22 5c 0a 43 6f 6c | 6c 61 70 73 65 73 2c 20 |6 "\.Col|lapses, |
|000056c0| 65 78 70 61 6e 64 73 2c | 20 61 6e 64 20 6d 6f 76 |expands,| and mov|
|000056d0| 65 73 20 6f 75 74 6c 69 | 6e 65 20 65 6e 74 72 69 |es outli|ne entri|
|000056e0| 65 73 2e 0a 49 6e 76 6f | 6b 65 64 20 76 69 61 20 |es..Invo|ked via |
|000056f0| 61 20 6b 65 79 20 70 72 | 65 73 73 20 77 68 65 6e |a key pr|ess when|
|00005700| 20 69 6e 20 6f 75 74 6c | 69 6e 65 2d 6d 6f 64 65 | in outl|ine-mode|
|00005710| 2e 20 20 49 74 20 61 73 | 73 75 6d 65 73 20 74 68 |.  It as|sumes th|
|00005720| 61 74 0a 69 74 73 20 63 | 61 6c 6c 65 72 20 68 61 |at.its c|aller ha|
|00005730| 73 20 61 6c 72 65 61 64 | 79 20 63 68 65 63 6b 65 |s alread|y checke|
|00005740| 64 20 74 68 61 74 20 74 | 68 65 20 6b 65 79 20 77 |d that t|he key w|
|00005750| 61 73 20 70 72 65 73 73 | 65 64 20 69 6e 20 61 6e |as press|ed in an|
|00005760| 20 61 70 70 72 6f 70 72 | 69 61 74 65 0a 62 75 66 | appropr|iate.buf|
|00005770| 66 65 72 20 61 6e 64 20 | 68 61 73 20 6d 6f 76 65 |fer and |has move|
|00005780| 64 20 74 68 65 20 63 75 | 72 73 6f 72 20 74 6f 20 |d the cu|rsor to |
|00005790| 74 68 65 20 73 65 6c 65 | 63 74 65 64 20 62 75 66 |the sele|cted buf|
|000057a0| 66 65 72 2e 0a 0a 49 66 | 20 6b 65 79 20 69 73 20 |fer...If| key is |
|000057b0| 70 72 65 73 73 65 64 3a | 0a 20 28 31 29 20 61 66 |pressed:|. (1) af|
|000057c0| 74 65 72 20 61 6e 20 6f | 75 74 6c 69 6e 65 20 68 |ter an o|utline h|
|000057d0| 65 61 64 69 6e 67 20 68 | 61 73 20 62 65 65 6e 20 |eading h|as been |
|000057e0| 63 75 74 20 76 69 61 20 | 74 68 65 20 41 63 74 69 |cut via |the Acti|
|000057f0| 6f 6e 20 4b 65 79 2c 20 | 74 68 65 6e 20 70 61 73 |on Key, |then pas|
|00005800| 74 65 20 74 68 65 0a 20 | 20 20 20 20 63 75 74 20 |te the. |    cut |
|00005810| 68 65 61 64 69 6e 67 20 | 61 74 20 70 6f 69 6e 74 |heading |at point|
|00005820| 3b 0a 20 28 32 29 20 61 | 74 20 74 68 65 20 65 6e |;. (2) a|t the en|
|00005830| 64 20 6f 66 20 62 75 66 | 66 65 72 2c 20 73 68 6f |d of buf|fer, sho|
|00005840| 77 20 61 6c 6c 20 62 75 | 66 66 65 72 20 74 65 78 |w all bu|ffer tex|
|00005850| 74 20 0a 20 28 33 29 20 | 61 74 20 74 68 65 20 62 |t . (3) |at the b|
|00005860| 65 67 69 6e 6e 69 6e 67 | 20 6f 66 20 61 20 68 65 |eginning| of a he|
|00005870| 61 64 69 6e 67 20 6c 69 | 6e 65 2c 20 63 75 74 20 |ading li|ne, cut |
|00005880| 74 68 65 20 68 65 61 64 | 69 6e 67 73 20 73 75 62 |the head|ings sub|
|00005890| 74 72 65 65 20 66 72 6f | 6d 20 74 68 65 0a 20 20 |tree fro|m the.  |
|000058a0| 20 20 20 62 75 66 66 65 | 72 3b 0a 20 28 34 29 20 |   buffe|r;. (4) |
|000058b0| 6f 6e 20 61 20 68 65 61 | 64 65 72 20 6c 69 6e 65 |on a hea|der line|
|000058c0| 20 62 75 74 20 6e 6f 74 | 20 61 74 20 74 68 65 20 | but not| at the |
|000058d0| 62 65 67 69 6e 6e 69 6e | 67 20 6f 72 20 65 6e 64 |beginnin|g or end|
|000058e0| 2c 20 69 66 20 68 65 61 | 64 69 6e 67 73 20 73 75 |, if hea|dings su|
|000058f0| 62 74 72 65 65 20 69 73 | 0a 20 20 20 20 20 68 69 |btree is|.     hi|
|00005900| 64 64 65 6e 20 74 68 65 | 6e 20 73 68 6f 77 20 69 |dden the|n show i|
|00005910| 74 2c 20 6f 74 68 65 72 | 77 69 73 65 20 68 69 64 |t, other|wise hid|
|00005920| 65 20 69 74 3b 0a 20 28 | 35 29 20 61 6e 79 77 68 |e it;. (|5) anywh|
|00005930| 65 72 65 20 65 6c 73 65 | 2c 20 73 63 72 6f 6c 6c |ere else|, scroll|
|00005940| 20 75 70 20 61 20 77 69 | 6e 64 6f 77 66 75 6c 2e | up a wi|ndowful.|
|00005950| 22 20 6e 69 6c 5d 29 0a | 28 66 73 65 74 20 27 73 |" nil]).|(fset 's|
|00005960| 6d 61 72 74 2d 6f 75 74 | 6c 69 6e 65 2d 61 73 73 |mart-out|line-ass|
|00005970| 69 73 74 20 23 5b 6e 69 | 6c 20 22 08 ab 83 c1 20 |ist #[ni|l ".... |
|00005980| 87 6d ab 83 c2 20 87 6e | ab 96 c3 0c 21 ab 91 c5 |.m... .n|....!...|
|00005990| 10 c6 60 c7 0c c8 c5 23 | 88 c9 c8 ca 20 5c 22 5c |..`....#|.... \"\|
|000059a0| 22 87 6c ac 8b 8a cb 79 | 88 ca 20 29 cb 55 ab 83 |".l....y|.. ).U..|
|000059b0| cc 20 87 cd 20 ab 83 ce | 20 87 cf 20 87 22 20 5b |. .. ...| .. ." [|
|000059c0| 73 6d 61 72 74 2d 6f 75 | 74 6c 69 6e 65 2d 63 75 |smart-ou|tline-cu|
|000059d0| 74 20 79 61 6e 6b 20 68 | 69 64 65 2d 62 6f 64 79 |t yank h|ide-body|
|000059e0| 20 6c 6f 6f 6b 69 6e 67 | 2d 61 74 20 6f 75 74 6c | looking|-at outl|
|000059f0| 69 6e 65 2d 72 65 67 65 | 78 70 20 74 20 6b 69 6c |ine-rege|xp t kil|
|00005a00| 6c 2d 72 65 67 69 6f 6e | 20 72 65 2d 73 65 61 72 |l-region| re-sear|
|00005a10| 63 68 2d 66 6f 72 77 61 | 72 64 20 6e 69 6c 20 73 |ch-forwa|rd nil s|
|00005a20| 6d 61 72 74 2d 6f 75 74 | 6c 69 6e 65 2d 74 6f 2d |mart-out|line-to-|
|00005a30| 65 6e 74 72 79 2d 65 6e | 64 20 6f 75 74 6c 69 6e |entry-en|d outlin|
|00005a40| 65 2d 6c 65 76 65 6c 20 | 30 20 73 63 72 6f 6c 6c |e-level |0 scroll|
|00005a50| 2d 64 6f 77 6e 2d 65 6f | 6c 20 73 6d 61 72 74 2d |-down-eo|l smart-|
|00005a60| 6f 75 74 6c 69 6e 65 2d | 73 75 62 74 72 65 65 2d |outline-|subtree-|
|00005a70| 68 69 64 64 65 6e 2d 70 | 20 73 68 6f 77 2d 65 6e |hidden-p| show-en|
|00005a80| 74 72 79 20 68 69 64 65 | 2d 65 6e 74 72 79 5d 20 |try hide|-entry] |
|00005a90| 36 20 22 5c 0a 43 6f 6c | 6c 61 70 73 65 73 2c 20 |6 "\.Col|lapses, |
|00005aa0| 65 78 70 61 6e 64 73 2c | 20 61 6e 64 20 6d 6f 76 |expands,| and mov|
|00005ab0| 65 73 20 6f 75 74 6c 69 | 6e 65 20 65 6e 74 72 69 |es outli|ne entri|
|00005ac0| 65 73 2e 0a 49 6e 76 6f | 6b 65 64 20 76 69 61 20 |es..Invo|ked via |
|00005ad0| 61 6e 20 61 73 73 69 73 | 74 2d 6b 65 79 20 70 72 |an assis|t-key pr|
|00005ae0| 65 73 73 20 77 68 65 6e | 20 69 6e 20 6f 75 74 6c |ess when| in outl|
|00005af0| 69 6e 65 2d 6d 6f 64 65 | 2e 20 20 49 74 20 61 73 |ine-mode|.  It as|
|00005b00| 73 75 6d 65 73 20 74 68 | 61 74 0a 69 74 73 20 63 |sumes th|at.its c|
|00005b10| 61 6c 6c 65 72 20 68 61 | 73 20 61 6c 72 65 61 64 |aller ha|s alread|
|00005b20| 79 20 63 68 65 63 6b 65 | 64 20 74 68 61 74 20 74 |y checke|d that t|
|00005b30| 68 65 20 61 73 73 69 73 | 74 2d 6b 65 79 20 77 61 |he assis|t-key wa|
|00005b40| 73 20 70 72 65 73 73 65 | 64 20 69 6e 20 61 6e 20 |s presse|d in an |
|00005b50| 61 70 70 72 6f 70 72 69 | 61 74 65 0a 62 75 66 66 |appropri|ate.buff|
|00005b60| 65 72 20 61 6e 64 20 68 | 61 73 20 6d 6f 76 65 64 |er and h|as moved|
|00005b70| 20 74 68 65 20 63 75 72 | 73 6f 72 20 74 6f 20 74 | the cur|sor to t|
|00005b80| 68 65 20 73 65 6c 65 63 | 74 65 64 20 62 75 66 66 |he selec|ted buff|
|00005b90| 65 72 2e 0a 0a 49 66 20 | 61 73 73 69 73 74 2d 6b |er...If |assist-k|
|00005ba0| 65 79 20 69 73 20 70 72 | 65 73 73 65 64 3a 0a 20 |ey is pr|essed:. |
|00005bb0| 28 31 29 20 61 66 74 65 | 72 20 61 6e 20 6f 75 74 |(1) afte|r an out|
|00005bc0| 6c 69 6e 65 20 68 65 61 | 64 69 6e 67 20 68 61 73 |line hea|ding has|
|00005bd0| 20 62 65 65 6e 20 63 75 | 74 20 76 69 61 20 74 68 | been cu|t via th|
|00005be0| 65 20 61 63 74 69 6f 6e | 2d 6b 65 79 2c 20 61 6c |e action|-key, al|
|00005bf0| 6c 6f 77 20 6d 75 6c 74 | 69 70 6c 65 0a 20 20 20 |low mult|iple.   |
|00005c00| 20 20 70 61 73 74 65 73 | 20 74 68 72 6f 75 67 68 |  pastes| through|
|00005c10| 6f 75 74 20 74 68 65 20 | 62 75 66 66 65 72 20 28 |out the |buffer (|
|00005c20| 6c 61 73 74 20 70 61 73 | 74 65 20 73 68 6f 75 6c |last pas|te shoul|
|00005c30| 64 20 62 65 20 64 6f 6e | 65 20 77 69 74 68 20 74 |d be don|e with t|
|00005c40| 68 65 20 41 63 74 69 6f | 6e 20 4b 65 79 2c 0a 20 |he Actio|n Key,. |
|00005c50| 20 20 20 20 6e 6f 74 20 | 74 68 65 20 41 73 73 69 |    not |the Assi|
|00005c60| 73 74 20 4b 65 79 29 3b | 0a 20 28 32 29 20 61 74 |st Key);|. (2) at|
|00005c70| 20 74 68 65 20 65 6e 64 | 20 6f 66 20 62 75 66 66 | the end| of buff|
|00005c80| 65 72 2c 20 68 69 64 65 | 20 61 6c 6c 20 62 6f 64 |er, hide| all bod|
|00005c90| 69 65 73 20 69 6e 20 62 | 75 66 66 65 72 3b 0a 20 |ies in b|uffer;. |
|00005ca0| 28 33 29 20 61 74 20 74 | 68 65 20 62 65 67 69 6e |(3) at t|he begin|
|00005cb0| 6e 69 6e 67 20 6f 66 20 | 61 20 68 65 61 64 69 6e |ning of |a headin|
|00005cc0| 67 20 6c 69 6e 65 2c 20 | 63 75 74 20 74 68 65 20 |g line, |cut the |
|00005cd0| 63 75 72 72 65 6e 74 20 | 68 65 61 64 69 6e 67 20 |current |heading |
|00005ce0| 28 73 61 6e 73 0a 20 20 | 20 20 20 73 75 62 74 72 |(sans.  |   subtr|
|00005cf0| 65 65 29 20 66 72 6f 6d | 20 74 68 65 20 62 75 66 |ee) from| the buf|
|00005d00| 66 65 72 3b 0a 20 28 34 | 29 20 6f 6e 20 61 20 68 |fer;. (4|) on a h|
|00005d10| 65 61 64 65 72 20 6c 69 | 6e 65 20 62 75 74 20 6e |eader li|ne but n|
|00005d20| 6f 74 20 61 74 20 74 68 | 65 20 62 65 67 69 6e 6e |ot at th|e beginn|
|00005d30| 69 6e 67 20 6f 72 20 65 | 6e 64 2c 20 69 66 20 68 |ing or e|nd, if h|
|00005d40| 65 61 64 69 6e 67 20 62 | 6f 64 79 20 69 73 0a 20 |eading b|ody is. |
|00005d50| 20 20 20 20 68 69 64 64 | 65 6e 20 74 68 65 6e 20 |    hidd|en then |
|00005d60| 73 68 6f 77 20 69 74 2c | 20 6f 74 68 65 72 77 69 |show it,| otherwi|
|00005d70| 73 65 20 68 69 64 65 20 | 69 74 3b 0a 20 28 35 29 |se hide |it;. (5)|
|00005d80| 20 61 6e 79 77 68 65 72 | 65 20 65 6c 73 65 2c 20 | anywher|e else, |
|00005d90| 73 63 72 6f 6c 6c 20 64 | 6f 77 6e 20 61 20 77 69 |scroll d|own a wi|
|00005da0| 6e 64 6f 77 66 75 6c 2e | 22 20 6e 69 6c 5d 29 0a |ndowful.|" nil]).|
|00005db0| 28 66 73 65 74 20 27 73 | 6d 61 72 74 2d 6f 75 74 |(fset 's|mart-out|
|00005dc0| 6c 69 6e 65 2d 74 6f 2d | 65 6e 74 72 79 2d 65 6e |line-to-|entry-en|
|00005dd0| 64 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 69 |d #[(&op|tional i|
|00005de0| 6e 63 6c 75 64 65 2d 73 | 75 62 2d 65 6e 74 72 69 |nclude-s|ub-entri|
|00005df0| 65 73 20 63 75 72 72 2d | 65 6e 74 72 79 2d 6c 65 |es curr-|entry-le|
|00005e00| 76 65 6c 29 20 22 c0 19 | c2 0b c0 c4 23 89 11 ab |vel) "..|....#...|
|00005e10| 8f 0d ab 8c 8a c6 79 88 | c7 20 0e 08 56 29 ac 68 |......y.|. ..V).h|
|00005e20| 09 ab 86 c6 79 88 60 aa | 82 64 62 29 87 22 20 5b |....y.`.|.db)." [|
|00005e30| 6e 69 6c 20 6e 65 78 74 | 2d 65 6e 74 72 79 2d 65 |nil next|-entry-e|
|00005e40| 78 69 73 74 73 20 72 65 | 2d 73 65 61 72 63 68 2d |xists re|-search-|
|00005e50| 66 6f 72 77 61 72 64 20 | 6f 75 74 6c 69 6e 65 2d |forward |outline-|
|00005e60| 72 65 67 65 78 70 20 74 | 20 69 6e 63 6c 75 64 65 |regexp t| include|
|00005e70| 2d 73 75 62 2d 65 6e 74 | 72 69 65 73 20 30 20 6f |-sub-ent|ries 0 o|
|00005e80| 75 74 6c 69 6e 65 2d 6c | 65 76 65 6c 20 63 75 72 |utline-l|evel cur|
|00005e90| 72 2d 65 6e 74 72 79 2d | 6c 65 76 65 6c 5d 20 34 |r-entry-|level] 4|
|00005ea0| 20 22 5c 0a 47 6f 65 73 | 20 74 6f 20 65 6e 64 20 | "\.Goes| to end |
|00005eb0| 6f 66 20 77 68 6f 6c 65 | 20 65 6e 74 72 79 20 69 |of whole| entry i|
|00005ec0| 66 20 6f 70 74 69 6f 6e | 61 6c 20 49 4e 43 4c 55 |f option|al INCLU|
|00005ed0| 44 45 2d 53 55 42 2d 45 | 4e 54 52 49 45 53 20 69 |DE-SUB-E|NTRIES i|
|00005ee0| 73 20 6e 6f 6e 2d 6e 69 | 6c 2e 0a 43 55 52 52 2d |s non-ni|l..CURR-|
|00005ef0| 45 4e 54 52 59 2d 4c 45 | 56 45 4c 20 69 73 20 61 |ENTRY-LE|VEL is a|
|00005f00| 6e 20 69 6e 74 65 67 65 | 72 20 72 65 70 72 65 73 |n intege|r repres|
|00005f10| 65 6e 74 69 6e 67 20 74 | 68 65 20 6c 65 6e 67 74 |enting t|he lengt|
|00005f20| 68 20 6f 66 20 74 68 65 | 20 63 75 72 72 65 6e 74 |h of the| current|
|00005f30| 20 6c 65 76 65 6c 0a 73 | 74 72 69 6e 67 20 77 68 | level.s|tring wh|
|00005f40| 69 63 68 20 6d 61 74 63 | 68 65 64 20 74 6f 20 27 |ich matc|hed to '|
|00005f50| 6f 75 74 6c 69 6e 65 2d | 72 65 67 65 78 70 27 2e |outline-|regexp'.|
|00005f60| 20 20 49 66 20 49 4e 43 | 4c 55 44 45 2d 53 55 42 |  If INC|LUDE-SUB|
|00005f70| 2d 45 4e 54 52 49 45 53 | 20 69 73 20 6e 69 6c 2c |-ENTRIES| is nil,|
|00005f80| 0a 43 55 52 52 2d 45 4e | 54 52 59 2d 4c 45 56 45 |.CURR-EN|TRY-LEVE|
|00005f90| 4c 20 69 73 20 6e 6f 74 | 20 6e 65 65 64 65 64 2e |L is not| needed.|
|00005fa0| 22 5d 29 0a 28 66 73 65 | 74 20 27 73 6d 61 72 74 |"]).(fse|t 'smart|
|00005fb0| 2d 6f 75 74 6c 69 6e 65 | 2d 73 75 62 74 72 65 65 |-outline|-subtree|
|00005fc0| 2d 68 69 64 64 65 6e 2d | 70 20 23 5b 6e 69 6c 20 |-hidden-|p #[nil |
|00005fd0| 22 8a c0 c1 c2 c3 23 ad | 83 68 c4 55 29 87 22 20 |".....#.|.h.U)." |
|00005fe0| 5b 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |[re-sear|ch-forwa|
|00005ff0| 72 64 20 22 5b 5c 6e 0d | 5d 22 20 6e 69 6c 20 74 |rd "[\n.|]" nil t|
|00006000| 20 31 33 5d 20 34 20 22 | 5c 0a 52 65 74 75 72 6e | 13] 4 "|\.Return|
|00006010| 73 20 74 20 69 66 20 61 | 74 20 6c 65 61 73 74 20 |s t if a|t least |
|00006020| 69 6e 69 74 69 61 6c 20 | 73 75 62 74 72 65 65 20 |initial |subtree |
|00006030| 6f 66 20 68 65 61 64 69 | 6e 67 20 69 73 20 68 69 |of headi|ng is hi|
|00006040| 64 64 65 6e 2c 20 65 6c | 73 65 20 6e 69 6c 2e 22 |dden, el|se nil."|
|00006050| 5d 29 0a 28 66 73 65 74 | 20 27 73 6d 61 72 74 2d |]).(fset| 'smart-|
|00006060| 74 61 72 20 23 5b 6e 69 | 6c 20 22 c0 20 ab 99 c1 |tar #[ni|l ". ...|
|00006070| 1a 8a c3 62 88 c4 c5 c1 | c6 23 12 29 5c 6e ab 84 |...b....|.#.)\n..|
|00006080| c7 20 aa 83 c8 c1 21 29 | 87 c9 20 87 22 20 5b 6c |. ....!)|.. ." [l|
|00006090| 61 73 74 2d 6c 69 6e 65 | 2d 70 20 6e 69 6c 20 66 |ast-line|-p nil f|
|000060a0| 6c 61 67 67 65 64 20 31 | 20 72 65 2d 73 65 61 72 |lagged 1| re-sear|
|000060b0| 63 68 2d 66 6f 72 77 61 | 72 64 20 22 5e 44 22 20 |ch-forwa|rd "^D" |
|000060c0| 74 20 74 61 72 2d 65 78 | 70 75 6e 67 65 20 6b 69 |t tar-ex|punge ki|
|000060d0| 6c 6c 2d 62 75 66 66 65 | 72 20 74 61 72 2d 65 78 |ll-buffe|r tar-ex|
|000060e0| 74 72 61 63 74 2d 6f 74 | 68 65 72 2d 77 69 6e 64 |tract-ot|her-wind|
|000060f0| 6f 77 5d 20 34 20 22 5c | 0a 55 73 65 73 20 61 20 |ow] 4 "\|.Uses a |
|00006100| 73 69 6e 67 6c 65 20 6b | 65 79 20 6f 72 20 6d 6f |single k|ey or mo|
|00006110| 75 73 65 20 6b 65 79 20 | 74 6f 20 6d 61 6e 69 70 |use key |to manip|
|00006120| 75 6c 61 74 65 20 74 61 | 72 20 66 69 6c 65 20 65 |ulate ta|r file e|
|00006130| 6e 74 72 69 65 73 2e 0a | 0a 49 6e 76 6f 6b 65 64 |ntries..|.Invoked|
|00006140| 20 76 69 61 20 61 20 6b | 65 79 20 70 72 65 73 73 | via a k|ey press|
|00006150| 20 77 68 65 6e 20 69 6e | 20 74 61 72 2d 6d 6f 64 | when in| tar-mod|
|00006160| 65 2e 20 20 49 74 20 61 | 73 73 75 6d 65 73 20 74 |e.  It a|ssumes t|
|00006170| 68 61 74 20 69 74 73 0a | 63 61 6c 6c 65 72 20 68 |hat its.|caller h|
|00006180| 61 73 20 61 6c 72 65 61 | 64 79 20 63 68 65 63 6b |as alrea|dy check|
|00006190| 65 64 20 74 68 61 74 20 | 74 68 65 20 6b 65 79 20 |ed that |the key |
|000061a0| 77 61 73 20 70 72 65 73 | 73 65 64 20 69 6e 20 61 |was pres|sed in a|
|000061b0| 6e 20 61 70 70 72 6f 70 | 72 69 61 74 65 20 62 75 |n approp|riate bu|
|000061c0| 66 66 65 72 0a 61 6e 64 | 20 68 61 73 20 6d 6f 76 |ffer.and| has mov|
|000061d0| 65 64 20 74 68 65 20 63 | 75 72 73 6f 72 20 74 68 |ed the c|ursor th|
|000061e0| 65 72 65 2e 0a 0a 49 66 | 20 6b 65 79 20 69 73 20 |ere...If| key is |
|000061f0| 70 72 65 73 73 65 64 3a | 0a 20 28 31 29 20 77 69 |pressed:|. (1) wi|
|00006200| 74 68 69 6e 20 61 6e 20 | 65 6e 74 72 79 20 6c 69 |thin an |entry li|
|00006210| 6e 65 2c 20 74 68 65 20 | 73 65 6c 65 63 74 65 64 |ne, the |selected|
|00006220| 20 66 69 6c 65 2f 64 69 | 72 65 63 74 6f 72 79 20 | file/di|rectory |
|00006230| 69 73 20 64 69 73 70 6c | 61 79 65 64 20 66 6f 72 |is displ|ayed for|
|00006240| 0a 20 20 20 20 20 65 64 | 69 74 69 6e 67 20 69 6e |.     ed|iting in|
|00006250| 20 74 68 65 20 6f 74 68 | 65 72 20 77 69 6e 64 6f | the oth|er windo|
|00006260| 77 3b 0a 20 28 32 29 20 | 6f 6e 20 6f 72 20 61 66 |w;. (2) |on or af|
|00006270| 74 65 72 20 74 68 65 20 | 6c 61 73 74 20 6c 69 6e |ter the |last lin|
|00006280| 65 20 69 6e 20 74 68 65 | 20 62 75 66 66 65 72 2c |e in the| buffer,|
|00006290| 20 69 66 20 61 6e 79 20 | 64 65 6c 65 74 65 73 20 | if any |deletes |
|000062a0| 61 72 65 20 74 6f 20 62 | 65 0a 20 20 20 20 20 70 |are to b|e.     p|
|000062b0| 65 72 66 6f 72 6d 65 64 | 2c 20 74 68 65 79 20 61 |erformed|, they a|
|000062c0| 72 65 20 65 78 65 63 75 | 74 65 64 20 61 66 74 65 |re execu|ted afte|
|000062d0| 72 20 75 73 65 72 20 76 | 65 72 69 66 69 63 61 74 |r user v|erificat|
|000062e0| 69 6f 6e 2c 20 6f 74 68 | 65 72 77 69 73 65 2c 20 |ion, oth|erwise, |
|000062f0| 74 68 69 73 0a 20 20 20 | 20 20 74 61 72 20 66 69 |this.   |  tar fi|
|00006300| 6c 65 20 62 72 6f 77 73 | 65 72 20 69 73 20 71 75 |le brows|er is qu|
|00006310| 69 74 2e 22 20 6e 69 6c | 5d 29 0a 28 66 73 65 74 |it." nil|]).(fset|
|00006320| 20 27 73 6d 61 72 74 2d | 74 61 72 2d 61 73 73 69 | 'smart-|tar-assi|
|00006330| 73 74 20 23 5b 6e 69 6c | 20 22 c0 20 ab 8b c1 c2 |st #[nil| ". ....|
|00006340| 65 64 5c 22 5b 21 88 64 | 62 87 c3 c4 21 87 22 20 |ed\"[!.d|b...!." |
|00006350| 5b 6c 61 73 74 2d 6c 69 | 6e 65 2d 70 20 74 61 72 |[last-li|ne-p tar|
|00006360| 2d 75 6e 66 6c 61 67 20 | 63 6f 75 6e 74 2d 6c 69 |-unflag |count-li|
|00006370| 6e 65 73 20 74 61 72 2d | 66 6c 61 67 2d 64 65 6c |nes tar-|flag-del|
|00006380| 65 74 65 64 20 31 5d 20 | 34 20 22 5c 0a 55 73 65 |eted 1] |4 "\.Use|
|00006390| 73 20 61 20 73 69 6e 67 | 6c 65 20 61 73 73 69 73 |s a sing|le assis|
|000063a0| 74 2d 6b 65 79 20 6f 72 | 20 6d 6f 75 73 65 20 61 |t-key or| mouse a|
|000063b0| 73 73 69 73 74 2d 6b 65 | 79 20 74 6f 20 6d 61 6e |ssist-ke|y to man|
|000063c0| 69 70 75 6c 61 74 65 20 | 74 61 72 20 66 69 6c 65 |ipulate |tar file|
|000063d0| 20 65 6e 74 72 69 65 73 | 2e 0a 0a 49 6e 76 6f 6b | entries|...Invok|
|000063e0| 65 64 20 76 69 61 20 61 | 6e 20 61 73 73 69 73 74 |ed via a|n assist|
|000063f0| 2d 6b 65 79 20 70 72 65 | 73 73 20 77 68 65 6e 20 |-key pre|ss when |
+--------+-------------------------+-------------------------+--------+--------+