home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1993-07-05 | 6.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 69 6d 62 40 67 65 |piled by| jimb@ge|
|00000020| 65 63 68 2e 67 6e 75 2e | 61 69 2e 6d 69 74 2e 65 |ech.gnu.|ai.mit.e|
|00000030| 64 75 20 6f 6e 20 4d 6f | 6e 20 4a 75 6c 20 20 35 |du on Mo|n Jul 5|
|00000040| 20 32 32 3a 35 32 3a 30 | 36 20 31 39 39 33 0a 3b | 22:52:0|6 1993.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 67 64 |;; from |file /gd|
|00000060| 2f 67 6e 75 2f 65 6d 61 | 63 73 2f 31 39 2e 30 2f |/gnu/ema|cs/19.0/|
|00000070| 6c 69 73 70 2f 65 62 75 | 66 66 2d 6d 65 6e 75 2e |lisp/ebu|ff-menu.|
|00000080| 65 6c 0a 3b 3b 3b 20 65 | 6d 61 63 73 20 76 65 72 |el.;;; e|macs ver|
|00000090| 73 69 6f 6e 20 31 39 2e | 31 35 2e 31 36 2e 0a 3b |sion 19.|15.16..;|
|000000a0| 3b 3b 20 62 79 74 65 63 | 6f 6d 70 20 76 65 72 73 |;; bytec|omp vers|
|000000b0| 69 6f 6e 20 46 53 46 20 | 32 2e 31 30 0a 3b 3b 3b |ion FSF |2.10.;;;|
|000000c0| 20 6f 70 74 69 6d 69 7a | 61 74 69 6f 6e 20 69 73 | optimiz|ation is|
|000000d0| 20 6f 6e 2e 0a 3b 3b 3b | 20 74 68 69 73 20 66 69 | on..;;;| this fi|
|000000e0| 6c 65 20 75 73 65 73 20 | 6f 70 63 6f 64 65 73 20 |le uses |opcodes |
|000000f0| 77 68 69 63 68 20 64 6f | 20 6e 6f 74 20 65 78 69 |which do| not exi|
|00000100| 73 74 20 69 6e 20 45 6d | 61 63 73 20 31 38 2e 0a |st in Em|acs 18..|
|00000110| 0a 28 69 66 20 28 61 6e | 64 20 28 62 6f 75 6e 64 |.(if (an|d (bound|
|00000120| 70 20 27 65 6d 61 63 73 | 2d 76 65 72 73 69 6f 6e |p 'emacs|-version|
|00000130| 29 0a 09 20 28 6f 72 20 | 28 61 6e 64 20 28 62 6f |).. (or |(and (bo|
|00000140| 75 6e 64 70 20 27 65 70 | 6f 63 68 3a 3a 76 65 72 |undp 'ep|och::ver|
|00000150| 73 69 6f 6e 29 20 65 70 | 6f 63 68 3a 3a 76 65 72 |sion) ep|och::ver|
|00000160| 73 69 6f 6e 29 0a 09 20 | 20 20 20 20 28 73 74 72 |sion).. | (str|
|00000170| 69 6e 67 2d 6c 65 73 73 | 70 20 65 6d 61 63 73 2d |ing-less|p emacs-|
|00000180| 76 65 72 73 69 6f 6e 20 | 22 31 39 22 29 29 29 0a |version |"19"))).|
|00000190| 20 20 20 20 28 65 72 72 | 6f 72 20 22 54 68 69 73 | (err|or "This|
|000001a0| 20 66 69 6c 65 20 77 61 | 73 20 63 6f 6d 70 69 6c | file wa|s compil|
|000001b0| 65 64 20 66 6f 72 20 45 | 6d 61 63 73 20 31 39 22 |ed for E|macs 19"|
|000001c0| 29 29 0a 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |))..(byt|e-code "|
|000001d0| c0 c1 21 88 c2 c3 21 84 | 0c 00 c4 13 c4 87 22 20 |..!...!.|......" |
|000001e0| 5b 72 65 71 75 69 72 65 | 20 65 6c 65 63 74 72 69 |[require| electri|
|000001f0| 63 20 62 6f 75 6e 64 70 | 20 65 6c 65 63 74 72 69 |c boundp| electri|
|00000200| 63 2d 62 75 66 66 65 72 | 2d 6d 65 6e 75 2d 6d 6f |c-buffer|-menu-mo|
|00000210| 64 65 2d 6d 61 70 20 6e | 69 6c 5d 20 32 29 0a 28 |de-map n|il] 2).(|
|00000220| 64 65 66 61 6c 69 61 73 | 20 27 65 6c 65 63 74 72 |defalias| 'electr|
|00000230| 69 63 2d 62 75 66 66 65 | 72 2d 6c 69 73 74 20 23 |ic-buffe|r-list #|
|00000240| 5b 28 61 72 67 29 20 22 | c0 89 19 1a c3 8b 88 5c |[(arg) "|.......\|
|00000250| 6e 85 32 00 09 71 88 c4 | 20 1d c6 20 88 65 62 88 |n.2..q..| .. .eb.|
|00000260| c7 c8 c0 c9 23 0d 62 88 | 0d c0 89 93 88 83 2c 00 |....#.b.|......,.|
|00000270| ca 20 82 31 00 cb cc c9 | 21 21 29 2a 87 22 20 5b |. .1....|!!)*." [|
|00000280| 6e 69 6c 20 62 75 66 66 | 65 72 20 73 65 6c 65 63 |nil buff|er selec|
|00000290| 74 20 28 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |t ((byte|-code ".|
|000002a0| 8b 88 c1 c2 c3 21 21 14 | c5 8e 0c 71 88 c6 20 88 |.....!!.|...q.. .|
|000002b0| c7 c8 8d 16 09 29 c1 87 | 22 20 5b 28 28 6c 69 73 |.....)..|" [((lis|
|000002c0| 74 2d 62 75 66 66 65 72 | 73 20 61 72 67 29 29 20 |t-buffer|s arg)) |
|000002d0| 77 69 6e 64 6f 77 2d 62 | 75 66 66 65 72 20 45 6c |window-b|uffer El|
|000002e0| 65 63 74 72 69 63 2d 70 | 6f 70 2d 75 70 2d 77 69 |ectric-p|op-up-wi|
|000002f0| 6e 64 6f 77 20 22 2a 42 | 75 66 66 65 72 20 4c 69 |ndow "*B|uffer Li|
|00000300| 73 74 2a 22 20 62 75 66 | 66 65 72 20 28 28 62 79 |st*" buf|fer ((by|
|00000310| 74 65 2d 63 6f 64 65 20 | 22 08 71 88 c1 20 88 c2 |te-code |".q.. ..|
|00000320| 08 21 88 c3 c4 21 87 22 | 20 5b 62 75 66 66 65 72 |.!...!."| [buffer|
|00000330| 20 42 75 66 66 65 72 2d | 6d 65 6e 75 2d 6d 6f 64 | Buffer-|menu-mod|
|00000340| 65 20 62 75 72 79 2d 62 | 75 66 66 65 72 20 6d 65 |e bury-b|uffer me|
|00000350| 73 73 61 67 65 20 22 22 | 5d 20 32 29 29 20 45 6c |ssage ""|] 2)) El|
|00000360| 65 63 74 72 69 63 2d 62 | 75 66 66 65 72 2d 6d 65 |ectric-b|uffer-me|
|00000370| 6e 75 2d 6d 6f 64 65 20 | 65 6c 65 63 74 72 69 63 |nu-mode |electric|
|00000380| 2d 62 75 66 66 65 72 2d | 6d 65 6e 75 2d 73 65 6c |-buffer-|menu-sel|
|00000390| 65 63 74 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |ect (byt|e-code "|
|000003a0| c0 c1 21 88 c2 20 43 89 | 13 c4 3d 83 15 00 c5 13 |..!.. C.|..=.....|
|000003b0| c6 c7 c5 5c 22 88 65 62 | 88 c8 79 88 60 64 62 88 |...\".eb|..y.`db.|
|000003c0| c9 79 88 60 ca 1e 0b 1e | 0c 89 1e 0d 62 88 ce c7 |.y.`....|....b...|
|000003d0| c5 cf d0 0e 0d 0e 0c 42 | 25 2b 87 22 20 5b 6d 65 |.......B|%+." [me|
|000003e0| 73 73 61 67 65 20 22 3c | 3c 3c 20 50 72 65 73 73 |ssage "<|<< Press|
|000003f0| 20 53 70 61 63 65 20 74 | 6f 20 62 75 72 79 20 74 | Space t|o bury t|
|00000400| 68 65 20 62 75 66 66 65 | 72 20 6c 69 73 74 20 3e |he buffe|r list >|
|00000410| 3e 3e 22 20 72 65 61 64 | 2d 65 76 65 6e 74 20 75 |>>" read|-event u|
|00000420| 6e 72 65 61 64 2d 63 6f | 6d 6d 61 6e 64 2d 65 76 |nread-co|mmand-ev|
|00000430| 65 6e 74 73 20 33 32 20 | 6e 69 6c 20 74 68 72 6f |ents 32 |nil thro|
|00000440| 77 20 65 6c 65 63 74 72 | 69 63 2d 62 75 66 66 65 |w electr|ic-buffe|
|00000450| 72 2d 6d 65 6e 75 2d 73 | 65 6c 65 63 74 20 32 20 |r-menu-s|elect 2 |
|00000460| 2d 31 20 30 20 67 6f 61 | 6c 2d 63 6f 6c 75 6d 6e |-1 0 goa|l-column|
|00000470| 20 6c 61 73 74 20 66 69 | 72 73 74 20 45 6c 65 63 | last fi|rst Elec|
|00000480| 74 72 69 63 2d 63 6f 6d | 6d 61 6e 64 2d 6c 6f 6f |tric-com|mand-loo|
|00000490| 70 20 74 20 65 6c 65 63 | 74 72 69 63 2d 62 75 66 |p t elec|tric-buf|
|000004a0| 66 65 72 2d 6d 65 6e 75 | 2d 6c 6f 6f 70 65 72 5d |fer-menu|-looper]|
|000004b0| 20 38 29 20 73 65 6c 65 | 63 74 5d 20 33 29 29 20 | 8) sele|ct] 3)) |
|000004c0| 70 6f 69 6e 74 2d 6d 61 | 72 6b 65 72 20 6f 70 6f |point-ma|rker opo|
|000004d0| 69 6e 74 20 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |int Buff|er-menu-|
|000004e0| 65 78 65 63 75 74 65 20 | 73 65 61 72 63 68 2d 66 |execute |search-f|
|000004f0| 6f 72 77 61 72 64 20 22 | 5c 6e 3e 22 20 74 20 42 |orward "|\n>" t B|
|00000500| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 73 65 6c 65 63 |uffer-me|nu-selec|
|00000510| 74 20 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |t switch|-to-buff|
|00000520| 65 72 20 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 62 |er Buffe|r-menu-b|
|00000530| 75 66 66 65 72 5d 20 34 | 20 22 5c 0a 50 6f 70 73 |uffer] 4| "\.Pops|
|00000540| 20 75 70 20 61 20 62 75 | 66 66 65 72 20 64 65 73 | up a bu|ffer des|
|00000550| 63 72 69 62 69 6e 67 20 | 74 68 65 20 73 65 74 20 |cribing |the set |
|00000560| 6f 66 20 45 6d 61 63 73 | 20 62 75 66 66 65 72 73 |of Emacs| buffers|
|00000570| 2e 0a 56 61 67 75 65 6c | 79 20 6c 69 6b 65 20 49 |..Vaguel|y like I|
|00000580| 54 53 20 6c 75 6e 61 72 | 20 73 65 6c 65 63 74 20 |TS lunar| select |
|00000590| 62 75 66 66 65 72 3b 20 | 63 6f 6d 62 69 6e 69 6e |buffer; |combinin|
|000005a0| 67 20 74 79 70 65 6f 75 | 74 6f 69 64 20 62 75 66 |g typeou|toid buf|
|000005b0| 66 65 72 0a 6c 69 73 74 | 69 6e 67 20 77 69 74 68 |fer.list|ing with|
|000005c0| 20 6d 65 6e 75 6f 69 64 | 20 62 75 66 66 65 72 20 | menuoid| buffer |
|000005d0| 73 65 6c 65 63 74 69 6f | 6e 2e 0a 0a 49 66 20 74 |selectio|n...If t|
|000005e0| 68 65 20 76 65 72 79 20 | 6e 65 78 74 20 63 68 61 |he very |next cha|
|000005f0| 72 61 63 74 65 72 20 74 | 79 70 65 64 20 69 73 20 |racter t|yped is |
|00000600| 61 20 73 70 61 63 65 20 | 74 68 65 6e 20 74 68 65 |a space |then the|
|00000610| 20 62 75 66 66 65 72 20 | 6c 69 73 74 0a 77 69 6e | buffer |list.win|
|00000620| 64 6f 77 20 64 69 73 61 | 70 70 65 61 72 73 2e 20 |dow disa|ppears. |
|00000630| 20 4f 74 68 65 72 77 69 | 73 65 2c 20 6f 6e 65 20 | Otherwi|se, one |
|00000640| 6d 61 79 20 6d 6f 76 65 | 20 61 72 6f 75 6e 64 20 |may move| around |
|00000650| 69 6e 20 74 68 65 20 62 | 75 66 66 65 72 20 6c 69 |in the b|uffer li|
|00000660| 73 74 0a 77 69 6e 64 6f | 77 2c 20 6d 61 72 6b 69 |st.windo|w, marki|
|00000670| 6e 67 20 62 75 66 66 65 | 72 73 20 74 6f 20 62 65 |ng buffe|rs to be|
|00000680| 20 73 65 6c 65 63 74 65 | 64 2c 20 73 61 76 65 64 | selecte|d, saved|
|00000690| 20 6f 72 20 64 65 6c 65 | 74 65 64 2e 0a 0a 54 6f | or dele|ted...To|
|000006a0| 20 65 78 69 74 20 61 6e | 64 20 73 65 6c 65 63 74 | exit an|d select|
|000006b0| 20 61 20 6e 65 77 20 62 | 75 66 66 65 72 2c 20 74 | a new b|uffer, t|
|000006c0| 79 70 65 20 61 20 73 70 | 61 63 65 20 77 68 65 6e |ype a sp|ace when|
|000006d0| 20 74 68 65 20 63 75 72 | 73 6f 72 20 69 73 20 6f | the cur|sor is o|
|000006e0| 6e 0a 74 68 65 20 61 70 | 70 72 6f 70 72 69 61 74 |n.the ap|propriat|
|000006f0| 65 20 6c 69 6e 65 20 6f | 66 20 74 68 65 20 62 75 |e line o|f the bu|
|00000700| 66 66 65 72 2d 6c 69 73 | 74 20 77 69 6e 64 6f 77 |ffer-lis|t window|
|00000710| 2e 20 20 4f 74 68 65 72 | 20 63 6f 6d 6d 61 6e 64 |. Other| command|
|00000720| 73 20 61 72 65 0a 6d 75 | 63 68 20 6c 69 6b 65 20 |s are.mu|ch like |
|00000730| 74 68 6f 73 65 20 6f 66 | 20 62 75 66 66 65 72 2d |those of| buffer-|
|00000740| 6d 65 6e 75 2d 6d 6f 64 | 65 2e 0a 0a 43 61 6c 6c |menu-mod|e...Call|
|00000750| 73 20 76 61 6c 75 65 20 | 6f 66 20 60 65 6c 65 63 |s value |of `elec|
|00000760| 74 72 69 63 2d 62 75 66 | 66 65 72 2d 6d 65 6e 75 |tric-buf|fer-menu|
|00000770| 2d 6d 6f 64 65 2d 68 6f | 6f 6b 27 20 6f 6e 20 65 |-mode-ho|ok' on e|
|00000780| 6e 74 72 79 20 69 66 20 | 6e 6f 6e 2d 6e 69 6c 2e |ntry if |non-nil.|
|00000790| 0a 0a 5c 5c 7b 65 6c 65 | 63 74 72 69 63 2d 62 75 |..\\{ele|ctric-bu|
|000007a0| 66 66 65 72 2d 6d 65 6e | 75 2d 6d 6f 64 65 2d 6d |ffer-men|u-mode-m|
|000007b0| 61 70 7d 22 20 22 50 22 | 5d 29 0a 28 62 79 74 65 |ap}" "P"|]).(byte|
|000007c0| 2d 63 6f 64 65 20 22 c0 | c1 c2 5c 22 88 c3 c4 c5 |-code ".|..\"....|
|000007d0| c6 23 87 22 20 5b 64 65 | 66 61 6c 69 61 73 20 65 |.#." [de|falias e|
|000007e0| 6c 65 63 74 72 69 63 2d | 62 75 66 66 65 72 2d 6d |lectric-|buffer-m|
|000007f0| 65 6e 75 2d 6c 6f 6f 70 | 65 72 20 23 5b 28 73 74 |enu-loop|er #[(st|
|00000800| 61 74 65 20 63 6f 6e 64 | 69 74 69 6f 6e 29 20 22 |ate cond|ition) "|
|00000810| 08 83 12 00 08 40 c1 3e | 84 12 00 c2 08 40 08 41 |.....@.>|.....@.A|
|00000820| 5c 22 87 60 0b 40 57 83 | 1f 00 65 62 88 c4 79 87 |\".`.@W.|..eb..y.|
|00000830| 60 0b 41 56 85 35 00 64 | 62 88 c5 79 88 c6 64 21 |`.AV.5.d|b..y..d!|
|00000840| 85 35 00 c7 c5 21 87 22 | 20 5b 63 6f 6e 64 69 74 |.5...!."| [condit|
|00000850| 69 6f 6e 20 28 62 75 66 | 66 65 72 2d 72 65 61 64 |ion (buf|fer-read|
|00000860| 2d 6f 6e 6c 79 20 65 6e | 64 2d 6f 66 2d 62 75 66 |-only en|d-of-buf|
|00000870| 66 65 72 20 62 65 67 69 | 6e 6e 69 6e 67 2d 6f 66 |fer begi|nning-of|
|00000880| 2d 62 75 66 66 65 72 29 | 20 73 69 67 6e 61 6c 20 |-buffer)| signal |
|00000890| 73 74 61 74 65 20 32 20 | 2d 31 20 70 6f 73 2d 76 |state 2 |-1 pos-v|
|000008a0| 69 73 69 62 6c 65 2d 69 | 6e 2d 77 69 6e 64 6f 77 |isible-i|n-window|
|000008b0| 2d 70 20 72 65 63 65 6e | 74 65 72 5d 20 33 5d 20 |-p recen|ter] 3] |
|000008c0| 70 75 74 20 45 6c 65 63 | 74 72 69 63 2d 62 75 66 |put Elec|tric-buf|
|000008d0| 66 65 72 2d 6d 65 6e 75 | 2d 6d 6f 64 65 20 6d 6f |fer-menu|-mode mo|
|000008e0| 64 65 2d 63 6c 61 73 73 | 20 73 70 65 63 69 61 6c |de-class| special|
|000008f0| 5d 20 34 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |] 4).(de|falias '|
|00000900| 45 6c 65 63 74 72 69 63 | 2d 62 75 66 66 65 72 2d |Electric|-buffer-|
|00000910| 6d 65 6e 75 2d 6d 6f 64 | 65 20 23 5b 6e 69 6c 20 |menu-mod|e #[nil |
|00000920| 22 c0 20 88 c1 5c 6e 21 | 88 c3 14 c5 16 06 c7 c8 |". ..\n!|........|
|00000930| 21 88 c9 16 08 ca 16 0b | ca 16 0c cd 16 0e 65 62 |!.......|......eb|
|00000940| 88 cf d0 d1 ca 23 83 2a | 00 d2 75 88 d3 d4 21 87 |.....#.*|..u...!.|
|00000950| 22 20 5b 6b 69 6c 6c 2d | 61 6c 6c 2d 6c 6f 63 61 |" [kill-|all-loca|
|00000960| 6c 2d 76 61 72 69 61 62 | 6c 65 73 20 75 73 65 2d |l-variab|les use-|
|00000970| 6c 6f 63 61 6c 2d 6d 61 | 70 20 65 6c 65 63 74 72 |local-ma|p electr|
|00000980| 69 63 2d 62 75 66 66 65 | 72 2d 6d 65 6e 75 2d 6d |ic-buffe|r-menu-m|
|00000990| 6f 64 65 2d 6d 61 70 20 | 22 45 6c 65 63 74 72 69 |ode-map |"Electri|
|000009a0| 63 20 42 75 66 66 65 72 | 20 4d 65 6e 75 22 20 6d |c Buffer| Menu" m|
|000009b0| 6f 64 65 2d 6e 61 6d 65 | 20 22 45 6c 65 63 74 72 |ode-name| "Electr|
|000009c0| 69 63 20 42 75 66 66 65 | 72 20 4c 69 73 74 22 20 |ic Buffe|r List" |
|000009d0| 6d 6f 64 65 2d 6c 69 6e | 65 2d 62 75 66 66 65 72 |mode-lin|e-buffer|
|000009e0| 2d 69 64 65 6e 74 69 66 | 69 63 61 74 69 6f 6e 20 |-identif|ication |
|000009f0| 6d 61 6b 65 2d 6c 6f 63 | 61 6c 2d 76 61 72 69 61 |make-loc|al-varia|
|00000a00| 62 6c 65 20 48 65 6c 70 | 65 72 2d 72 65 74 75 72 |ble Help|er-retur|
|00000a10| 6e 2d 62 6c 75 72 62 20 | 22 72 65 74 75 72 6e 20 |n-blurb |"return |
|00000a20| 74 6f 20 62 75 66 66 65 | 72 20 65 64 69 74 69 6e |to buffe|r editin|
|00000a30| 67 22 20 74 20 74 72 75 | 6e 63 61 74 65 2d 6c 69 |g" t tru|ncate-li|
|00000a40| 6e 65 73 20 62 75 66 66 | 65 72 2d 72 65 61 64 2d |nes buff|er-read-|
|00000a50| 6f 6e 6c 79 20 45 6c 65 | 63 74 72 69 63 2d 62 75 |only Ele|ctric-bu|
|00000a60| 66 66 65 72 2d 6d 65 6e | 75 2d 6d 6f 64 65 20 6d |ffer-men|u-mode m|
|00000a70| 61 6a 6f 72 2d 6d 6f 64 | 65 20 73 65 61 72 63 68 |ajor-mod|e search|
|00000a80| 2d 66 6f 72 77 61 72 64 | 20 22 5c 6e 2e 22 20 6e |-forward| "\n." n|
|00000a90| 69 6c 20 2d 31 20 72 75 | 6e 2d 68 6f 6f 6b 73 20 |il -1 ru|n-hooks |
|00000aa0| 65 6c 65 63 74 72 69 63 | 2d 62 75 66 66 65 72 2d |electric|-buffer-|
|00000ab0| 6d 65 6e 75 2d 6d 6f 64 | 65 2d 68 6f 6f 6b 5d 20 |menu-mod|e-hook] |
|00000ac0| 34 20 22 5c 0a 4d 61 6a | 6f 72 20 6d 6f 64 65 20 |4 "\.Maj|or mode |
|00000ad0| 66 6f 72 20 65 64 69 74 | 69 6e 67 20 61 20 6c 69 |for edit|ing a li|
|00000ae0| 73 74 20 6f 66 20 62 75 | 66 66 65 72 73 2e 0a 45 |st of bu|ffers..E|
|00000af0| 61 63 68 20 6c 69 6e 65 | 20 64 65 73 63 72 69 62 |ach line| describ|
|00000b00| 65 73 20 6f 6e 65 20 6f | 66 20 74 68 65 20 62 75 |es one o|f the bu|
|00000b10| 66 66 65 72 73 20 69 6e | 20 45 6d 61 63 73 2e 0a |ffers in| Emacs..|
|00000b20| 4c 65 74 74 65 72 73 20 | 64 6f 20 6e 6f 74 20 69 |Letters |do not i|
|00000b30| 6e 73 65 72 74 20 74 68 | 65 6d 73 65 6c 76 65 73 |nsert th|emselves|
|00000b40| 3b 20 69 6e 73 74 65 61 | 64 2c 20 74 68 65 79 20 |; instea|d, they |
|00000b50| 61 72 65 20 63 6f 6d 6d | 61 6e 64 73 2e 0a 5c 5c |are comm|ands..\\|
|00000b60| 3c 65 6c 65 63 74 72 69 | 63 2d 62 75 66 66 65 72 |<electri|c-buffer|
|00000b70| 2d 6d 65 6e 75 2d 6d 6f | 64 65 2d 6d 61 70 3e 0a |-menu-mo|de-map>.|
|00000b80| 5c 5c 5b 6b 65 79 62 6f | 61 72 64 2d 71 75 69 74 |\\[keybo|ard-quit|
|00000b90| 5d 20 6f 72 20 5c 5c 5b | 45 6c 65 63 74 72 69 63 |] or \\[|Electric|
|00000ba0| 2d 62 75 66 66 65 72 2d | 6d 65 6e 75 2d 71 75 69 |-buffer-|menu-qui|
|00000bb0| 74 5d 20 2d 2d 20 65 78 | 69 74 20 62 75 66 66 65 |t] -- ex|it buffe|
|00000bc0| 72 20 6d 65 6e 75 2c 20 | 72 65 74 75 72 6e 69 6e |r menu, |returnin|
|00000bd0| 67 20 74 6f 20 70 72 65 | 76 69 6f 75 73 20 77 69 |g to pre|vious wi|
|00000be0| 6e 64 6f 77 20 61 6e 64 | 20 62 75 66 66 65 72 0a |ndow and| buffer.|
|00000bf0| 20 20 63 6f 6e 66 69 67 | 75 72 61 74 69 6f 6e 2e | config|uration.|
|00000c00| 20 20 49 66 20 74 68 65 | 20 76 65 72 79 20 66 69 | If the| very fi|
|00000c10| 72 73 74 20 63 68 61 72 | 61 63 74 65 72 20 74 79 |rst char|acter ty|
|00000c20| 70 65 64 20 69 73 20 61 | 20 73 70 61 63 65 2c 20 |ped is a| space, |
|00000c30| 69 74 0a 20 20 61 6c 73 | 6f 20 68 61 73 20 74 68 |it. als|o has th|
|00000c40| 69 73 20 65 66 66 65 63 | 74 2e 0a 5c 5c 5b 45 6c |is effec|t..\\[El|
|00000c50| 65 63 74 72 69 63 2d 62 | 75 66 66 65 72 2d 6d 65 |ectric-b|uffer-me|
|00000c60| 6e 75 2d 73 65 6c 65 63 | 74 5d 20 2d 2d 20 73 65 |nu-selec|t] -- se|
|00000c70| 6c 65 63 74 20 62 75 66 | 66 65 72 20 6f 66 20 6c |lect buf|fer of l|
|00000c80| 69 6e 65 20 70 6f 69 6e | 74 20 69 73 20 6f 6e 2e |ine poin|t is on.|
|00000c90| 0a 20 20 41 6c 73 6f 20 | 73 68 6f 77 20 62 75 66 |. Also |show buf|
|00000ca0| 66 65 72 73 20 6d 61 72 | 6b 65 64 20 77 69 74 68 |fers mar|ked with|
|00000cb0| 20 6d 20 69 6e 20 6f 74 | 68 65 72 20 77 69 6e 64 | m in ot|her wind|
|00000cc0| 6f 77 73 2c 0a 20 20 64 | 65 6c 65 74 65 73 20 62 |ows,. d|eletes b|
|00000cd0| 75 66 66 65 72 73 20 6d | 61 72 6b 65 64 20 77 69 |uffers m|arked wi|
|00000ce0| 74 68 20 5c 22 44 5c 22 | 2c 20 61 6e 64 20 73 61 |th \"D\"|, and sa|
|00000cf0| 76 65 73 20 74 68 6f 73 | 65 20 6d 61 72 6b 65 64 |ves thos|e marked|
|00000d00| 20 77 69 74 68 20 5c 22 | 53 5c 22 2e 0a 5c 5c 5b | with \"|S\"..\\[|
|00000d10| 42 75 66 66 65 72 2d 6d | 65 6e 75 2d 6d 61 72 6b |Buffer-m|enu-mark|
|00000d20| 5d 20 2d 2d 20 6d 61 72 | 6b 20 62 75 66 66 65 72 |] -- mar|k buffer|
|00000d30| 20 74 6f 20 62 65 20 64 | 69 73 70 6c 61 79 65 64 | to be d|isplayed|
|00000d40| 2e 0a 5c 5c 5b 42 75 66 | 66 65 72 2d 6d 65 6e 75 |..\\[Buf|fer-menu|
|00000d50| 2d 6e 6f 74 2d 6d 6f 64 | 69 66 69 65 64 5d 20 2d |-not-mod|ified] -|
|00000d60| 2d 20 63 6c 65 61 72 20 | 6d 6f 64 69 66 69 65 64 |- clear |modified|
|00000d70| 2d 66 6c 61 67 20 6f 6e | 20 74 68 61 74 20 62 75 |-flag on| that bu|
|00000d80| 66 66 65 72 2e 0a 5c 5c | 5b 42 75 66 66 65 72 2d |ffer..\\|[Buffer-|
|00000d90| 6d 65 6e 75 2d 73 61 76 | 65 5d 20 2d 2d 20 6d 61 |menu-sav|e] -- ma|
|00000da0| 72 6b 20 74 68 61 74 20 | 62 75 66 66 65 72 20 74 |rk that |buffer t|
|00000db0| 6f 20 62 65 20 73 61 76 | 65 64 2e 0a 5c 5c 5b 42 |o be sav|ed..\\[B|
|00000dc0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 64 65 6c 65 74 |uffer-me|nu-delet|
|00000dd0| 65 5d 20 6f 72 20 5c 5c | 5b 42 75 66 66 65 72 2d |e] or \\|[Buffer-|
|00000de0| 6d 65 6e 75 2d 64 65 6c | 65 74 65 2d 62 61 63 6b |menu-del|ete-back|
|00000df0| 77 61 72 64 73 5d 20 2d | 2d 20 6d 61 72 6b 20 74 |wards] -|- mark t|
|00000e00| 68 61 74 20 62 75 66 66 | 65 72 20 74 6f 20 62 65 |hat buff|er to be|
|00000e10| 20 64 65 6c 65 74 65 64 | 2e 0a 5c 5c 5b 42 75 66 | deleted|..\\[Buf|
|00000e20| 66 65 72 2d 6d 65 6e 75 | 2d 75 6e 6d 61 72 6b 5d |fer-menu|-unmark]|
|00000e30| 20 2d 2d 20 72 65 6d 6f | 76 65 20 61 6c 6c 20 6b | -- remo|ve all k|
|00000e40| 69 6e 64 73 20 6f 66 20 | 6d 61 72 6b 73 20 66 72 |inds of |marks fr|
|00000e50| 6f 6d 20 63 75 72 72 65 | 6e 74 20 6c 69 6e 65 2e |om curre|nt line.|
|00000e60| 0a 5c 5c 5b 45 6c 65 63 | 74 72 69 63 2d 62 75 66 |.\\[Elec|tric-buf|
|00000e70| 66 65 72 2d 6d 65 6e 75 | 2d 6d 6f 64 65 2d 76 69 |fer-menu|-mode-vi|
|00000e80| 65 77 2d 62 75 66 66 65 | 72 5d 20 2d 2d 20 76 69 |ew-buffe|r] -- vi|
|00000e90| 65 77 20 62 75 66 66 65 | 72 2c 20 72 65 74 75 72 |ew buffe|r, retur|
|00000ea0| 6e 69 6e 67 20 77 68 65 | 6e 20 64 6f 6e 65 2e 0a |ning whe|n done..|
|00000eb0| 5c 5c 5b 42 75 66 66 65 | 72 2d 6d 65 6e 75 2d 62 |\\[Buffe|r-menu-b|
|00000ec0| 61 63 6b 75 70 2d 75 6e | 6d 61 72 6b 5d 20 2d 2d |ackup-un|mark] --|
|00000ed0| 20 62 61 63 6b 20 75 70 | 20 61 20 6c 69 6e 65 20 | back up| a line |
|00000ee0| 61 6e 64 20 72 65 6d 6f | 76 65 20 6d 61 72 6b 73 |and remo|ve marks|
|00000ef0| 2e 0a 0a 5c 5c 7b 65 6c | 65 63 74 72 69 63 2d 62 |...\\{el|ectric-b|
|00000f00| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 6d 6f 64 65 2d |uffer-me|nu-mode-|
|00000f10| 6d 61 70 7d 0a 0a 45 6e | 74 72 79 20 74 6f 20 74 |map}..En|try to t|
|00000f20| 68 69 73 20 6d 6f 64 65 | 20 76 69 61 20 63 6f 6d |his mode| via com|
|00000f30| 6d 61 6e 64 20 65 6c 65 | 63 74 72 69 63 2d 62 75 |mand ele|ctric-bu|
|00000f40| 66 66 65 72 2d 6c 69 73 | 74 20 63 61 6c 6c 73 20 |ffer-lis|t calls |
|00000f50| 74 68 65 20 76 61 6c 75 | 65 20 6f 66 0a 65 6c 65 |the valu|e of.ele|
|00000f60| 63 74 72 69 63 2d 62 75 | 66 66 65 72 2d 6d 65 6e |ctric-bu|ffer-men|
|00000f70| 75 2d 6d 6f 64 65 2d 68 | 6f 6f 6b 20 69 66 20 69 |u-mode-h|ook if i|
|00000f80| 74 20 69 73 20 6e 6f 6e | 2d 6e 69 6c 2e 22 5d 29 |t is non|-nil."])|
|00000f90| 0a 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 c1 c2 |.(byte-c|ode "...|
|00000fa0| c3 23 88 0c 84 4e 01 c5 | 20 c5 20 1e 06 1e 07 c8 |.#...N..| . .....|
|00000fb0| 0e 07 41 40 c1 5c 22 88 | c9 0e 07 ca 0e 06 23 88 |..A@.\".|......#.|
|00000fc0| c8 0e 06 41 40 c1 5c 22 | 88 c9 0e 07 cb cc 23 88 |...A@.\"|......#.|
|00000fd0| c9 0e 07 cd ce 23 88 c9 | 0e 07 cf 0e 10 21 d1 23 |.....#..|.....!.#|
|00000fe0| 88 c9 0e 07 d2 d3 23 88 | c9 0e 07 d4 d5 23 88 c9 |......#.|.....#..|
|00000ff0| 0e 07 d6 d7 23 88 c9 0e | 07 d8 d7 23 88 c9 0e 07 |....#...|...#....|
|00001000| d9 d7 23 88 c9 0e 07 da | db 23 88 c9 0e 07 dc dd |..#.....|.#......|
|00001010| 23 88 c9 0e 07 de df 23 | 88 c9 0e 07 e0 e1 23 88 |#......#|......#.|
|00001020| c9 0e 07 e2 e1 23 88 c9 | 0e 07 e3 e4 23 88 c9 0e |.....#..|....#...|
|00001030| 07 e5 e6 23 88 c9 0e 07 | e7 e8 23 88 c9 0e 07 e9 |...#....|..#.....|
|00001040| ea 23 88 eb 1e 2c eb ed | 58 83 cc 00 c9 0e 07 cf |.#...,..|X.......|
|00001050| 0e 2c 21 ee 23 88 c9 0e | 07 ca cf 0e 2c 21 50 ee |.,!.#...|....,!P.|
|00001060| 23 88 0e 2c 54 89 16 2c | 82 a8 00 29 c9 0e 07 ef |#..,T..,|...)....|
|00001070| f0 23 88 c9 0e 07 f1 f0 | 23 88 c9 0e 07 f2 f3 23 |.#......|#......#|
|00001080| 88 c9 0e 07 f4 f5 23 88 | c9 0e 07 f6 f7 23 88 c9 |......#.|.....#..|
|00001090| 0e 07 f8 f9 23 88 c9 0e | 07 fa f7 23 88 c9 0e 07 |....#...|...#....|
|000010a0| fb f9 23 88 c9 0e 07 fc | fd 23 88 c9 0e 07 fe ff |..#.....|.#......|
|000010b0| 23 88 c9 0e 07 81 40 00 | 81 41 00 23 88 c9 0e 07 |#.....@.|.A.#....|
|000010c0| 81 42 00 81 43 00 23 88 | c9 0e 07 81 44 00 81 45 |.B..C.#.|....D..E|
|000010d0| 00 23 88 c9 0e 07 81 46 | 00 81 47 00 23 88 c9 0e |.#.....F|..G.#...|
|000010e0| 07 81 48 00 81 49 00 23 | 88 0e 07 14 2a 81 4a 00 |..H..I.#|....*.J.|
|000010f0| 81 4b 00 81 4c 00 5c 22 | 87 22 20 5b 70 75 74 20 |.K..L.\"|." [put |
|00001100| 45 6c 65 63 74 72 69 63 | 2d 62 75 66 66 65 72 2d |Electric|-buffer-|
|00001110| 6d 65 6e 75 2d 75 6e 64 | 65 66 69 6e 65 64 20 73 |menu-und|efined s|
|00001120| 75 70 70 72 65 73 73 2d | 6b 65 79 6d 61 70 20 74 |uppress-|keymap t|
|00001130| 20 65 6c 65 63 74 72 69 | 63 2d 62 75 66 66 65 72 | electri|c-buffer|
|00001140| 2d 6d 65 6e 75 2d 6d 6f | 64 65 2d 6d 61 70 20 6d |-menu-mo|de-map m|
|00001150| 61 6b 65 2d 6b 65 79 6d | 61 70 20 73 75 62 6d 61 |ake-keym|ap subma|
|00001160| 70 20 6d 61 70 20 66 69 | 6c 6c 61 72 72 61 79 20 |p map fi|llarray |
|00001170| 64 65 66 69 6e 65 2d 6b | 65 79 20 22 1b 22 20 22 |define-k|ey "." "|
|00001180| 1a 22 20 73 75 73 70 65 | 6e 64 2d 65 6d 61 63 73 |." suspe|nd-emacs|
|00001190| 20 22 76 22 20 45 6c 65 | 63 74 72 69 63 2d 62 75 | "v" Ele|ctric-bu|
|000011a0| 66 66 65 72 2d 6d 65 6e | 75 2d 6d 6f 64 65 2d 76 |ffer-men|u-mode-v|
|000011b0| 69 65 77 2d 62 75 66 66 | 65 72 20 63 68 61 72 2d |iew-buff|er char-|
|000011c0| 74 6f 2d 73 74 72 69 6e | 67 20 68 65 6c 70 2d 63 |to-strin|g help-c|
|000011d0| 68 61 72 20 48 65 6c 70 | 65 72 2d 68 65 6c 70 20 |har Help|er-help |
|000011e0| 22 3f 22 20 48 65 6c 70 | 65 72 2d 64 65 73 63 72 |"?" Help|er-descr|
|000011f0| 69 62 65 2d 62 69 6e 64 | 69 6e 67 73 20 22 03 22 |ibe-bind|ings "."|
|00001200| 20 6e 69 6c 20 22 03 03 | 22 20 45 6c 65 63 74 72 | nil "..|" Electr|
|00001210| 69 63 2d 62 75 66 66 65 | 72 2d 6d 65 6e 75 2d 71 |ic-buffe|r-menu-q|
|00001220| 75 69 74 20 22 1d 22 20 | 22 71 22 20 22 20 22 20 |uit "." |"q" " " |
|00001230| 45 6c 65 63 74 72 69 63 | 2d 62 75 66 66 65 72 2d |Electric|-buffer-|
|00001240| 6d 65 6e 75 2d 73 65 6c | 65 63 74 20 22 0c 22 20 |menu-sel|ect "." |
|00001250| 72 65 63 65 6e 74 65 72 | 20 22 73 22 20 42 75 66 |recenter| "s" Buf|
|00001260| 66 65 72 2d 6d 65 6e 75 | 2d 73 61 76 65 20 22 64 |fer-menu|-save "d|
|00001270| 22 20 42 75 66 66 65 72 | 2d 6d 65 6e 75 2d 64 65 |" Buffer|-menu-de|
|00001280| 6c 65 74 65 20 22 6b 22 | 20 22 04 22 20 42 75 66 |lete "k"| "." Buf|
|00001290| 66 65 72 2d 6d 65 6e 75 | 2d 64 65 6c 65 74 65 2d |fer-menu|-delete-|
|000012a0| 62 61 63 6b 77 61 72 64 | 73 20 22 7f 22 20 42 75 |backward|s "." Bu|
|000012b0| 66 66 65 72 2d 6d 65 6e | 75 2d 62 61 63 6b 75 70 |ffer-men|u-backup|
|000012c0| 2d 75 6e 6d 61 72 6b 20 | 22 7e 22 20 42 75 66 66 |-unmark |"~" Buff|
|000012d0| 65 72 2d 6d 65 6e 75 2d | 6e 6f 74 2d 6d 6f 64 69 |er-menu-|not-modi|
|000012e0| 66 69 65 64 20 22 75 22 | 20 42 75 66 66 65 72 2d |fied "u"| Buffer-|
|000012f0| 6d 65 6e 75 2d 75 6e 6d | 61 72 6b 20 34 38 20 69 |menu-unm|ark 48 i|
|00001300| 20 35 37 20 64 69 67 69 | 74 2d 61 72 67 75 6d 65 | 57 digi|t-argume|
|00001310| 6e 74 20 22 2d 22 20 6e | 65 67 61 74 69 76 65 2d |nt "-" n|egative-|
|00001320| 61 72 67 75 6d 65 6e 74 | 20 22 1b 2d 22 20 22 6d |argument| ".-" "m|
|00001330| 22 20 42 75 66 66 65 72 | 2d 6d 65 6e 75 2d 6d 61 |" Buffer|-menu-ma|
|00001340| 72 6b 20 22 15 22 20 75 | 6e 69 76 65 72 73 61 6c |rk "." u|niversal|
|00001350| 2d 61 72 67 75 6d 65 6e | 74 20 22 10 22 20 70 72 |-argumen|t "." pr|
|00001360| 65 76 69 6f 75 73 2d 6c | 69 6e 65 20 22 0e 22 20 |evious-l|ine "." |
|00001370| 6e 65 78 74 2d 6c 69 6e | 65 20 22 70 22 20 22 6e |next-lin|e "p" "n|
|00001380| 22 20 22 16 22 20 73 63 | 72 6f 6c 6c 2d 75 70 20 |" "." sc|roll-up |
|00001390| 22 1b 76 22 20 73 63 72 | 6f 6c 6c 2d 64 6f 77 6e |".v" scr|oll-down|
|000013a0| 20 22 3e 22 20 73 63 72 | 6f 6c 6c 2d 72 69 67 68 | ">" scr|oll-righ|
|000013b0| 74 20 22 3c 22 20 73 63 | 72 6f 6c 6c 2d 6c 65 66 |t "<" sc|roll-lef|
|000013c0| 74 20 22 1b 16 22 20 73 | 63 72 6f 6c 6c 2d 6f 74 |t ".." s|croll-ot|
|000013d0| 68 65 72 2d 77 69 6e 64 | 6f 77 20 22 1b 3e 22 20 |her-wind|ow ".>" |
|000013e0| 65 6e 64 2d 6f 66 2d 62 | 75 66 66 65 72 20 22 1b |end-of-b|uffer ".|
|000013f0| 3c 22 20 62 65 67 69 6e | 6e 69 6e 67 2d 6f 66 2d |<" begin|ning-of-|
|00001400| 62 75 66 66 65 72 20 64 | 65 66 61 6c 69 61 73 20 |buffer d|efalias |
|00001410| 45 6c 65 63 74 72 69 63 | 2d 62 75 66 66 65 72 2d |Electric|-buffer-|
|00001420| 6d 65 6e 75 2d 65 78 69 | 74 20 23 5b 6e 69 6c 20 |menu-exi|t #[nil |
|00001430| 22 c0 c1 20 21 12 c3 c4 | c5 8f 87 22 20 5b 6c 69 |".. !...|..." [li|
|00001440| 73 74 69 66 79 2d 6b 65 | 79 2d 73 65 71 75 65 6e |stify-ke|y-sequen|
|00001450| 63 65 20 74 68 69 73 2d | 63 6f 6d 6d 61 6e 64 2d |ce this-|command-|
|00001460| 6b 65 79 73 20 75 6e 72 | 65 61 64 2d 63 6f 6d 6d |keys unr|ead-comm|
|00001470| 61 6e 64 2d 65 76 65 6e | 74 73 20 6e 69 6c 20 28 |and-even|ts nil (|
|00001480| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 c2 5c 22 |byte-cod|e "...\"|
|00001490| 87 22 20 5b 74 68 72 6f | 77 20 65 6c 65 63 74 72 |." [thro|w electr|
|000014a0| 69 63 2d 62 75 66 66 65 | 72 2d 6d 65 6e 75 2d 73 |ic-buffe|r-menu-s|
|000014b0| 65 6c 65 63 74 20 6e 69 | 6c 5d 20 33 29 20 28 28 |elect ni|l] 3) ((|
|000014c0| 65 72 72 6f 72 20 28 62 | 79 74 65 2d 63 6f 64 65 |error (b|yte-code|
|000014d0| 20 22 c0 20 88 c1 20 87 | 22 20 5b 42 75 66 66 65 | ". .. .|" [Buffe|
|000014e0| 72 2d 6d 65 6e 75 2d 6d | 6f 64 65 20 6f 74 68 65 |r-menu-m|ode othe|
|000014f0| 72 2d 62 75 66 66 65 72 | 5d 20 31 29 29 29 5d 20 |r-buffer|] 1)))] |
|00001500| 33 20 6e 69 6c 20 6e 69 | 6c 5d 5d 20 36 29 0a 28 |3 nil ni|l]] 6).(|
|00001510| 64 65 66 61 6c 69 61 73 | 20 27 45 6c 65 63 74 72 |defalias| 'Electr|
|00001520| 69 63 2d 62 75 66 66 65 | 72 2d 6d 65 6e 75 2d 73 |ic-buffe|r-menu-s|
|00001530| 65 6c 65 63 74 20 23 5b | 6e 69 6c 20 22 c0 c1 60 |elect #[|nil "..`|
|00001540| 5c 22 87 22 20 5b 74 68 | 72 6f 77 20 65 6c 65 63 |\"." [th|row elec|
|00001550| 74 72 69 63 2d 62 75 66 | 66 65 72 2d 6d 65 6e 75 |tric-buf|fer-menu|
|00001560| 2d 73 65 6c 65 63 74 5d | 20 33 20 22 5c 0a 4c 65 |-select]| 3 "\.Le|
|00001570| 61 76 65 20 45 6c 65 63 | 74 72 69 63 20 42 75 66 |ave Elec|tric Buf|
|00001580| 66 65 72 20 4d 65 6e 75 | 2c 20 73 65 6c 65 63 74 |fer Menu|, select|
|00001590| 69 6e 67 20 62 75 66 66 | 65 72 73 20 61 6e 64 20 |ing buff|ers and |
|000015a0| 65 78 65 63 75 74 69 6e | 67 20 63 68 61 6e 67 65 |executin|g change|
|000015b0| 73 2e 0a 53 61 76 65 73 | 20 62 75 66 66 65 72 73 |s..Saves| buffers|
|000015c0| 20 6d 61 72 6b 65 64 20 | 5c 22 53 5c 22 2e 20 20 | marked |\"S\". |
|000015d0| 44 65 6c 65 74 65 73 20 | 62 75 66 66 65 72 73 20 |Deletes |buffers |
|000015e0| 6d 61 72 6b 65 64 20 5c | 22 4b 5c 22 2e 0a 53 65 |marked \|"K\"..Se|
|000015f0| 6c 65 63 74 73 20 62 75 | 66 66 65 72 20 61 74 20 |lects bu|ffer at |
|00001600| 70 6f 69 6e 74 20 61 6e | 64 20 64 69 73 70 6c 61 |point an|d displa|
|00001610| 79 73 20 62 75 66 66 65 | 72 73 20 6d 61 72 6b 65 |ys buffe|rs marke|
|00001620| 64 20 5c 22 3e 5c 22 20 | 69 6e 20 6f 74 68 65 72 |d \">\" |in other|
|00001630| 20 77 69 6e 64 6f 77 73 | 2e 22 20 6e 69 6c 5d 29 | windows|." nil])|
|00001640| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 45 6c 65 63 |.(defali|as 'Elec|
|00001650| 74 72 69 63 2d 62 75 66 | 66 65 72 2d 6d 65 6e 75 |tric-buf|fer-menu|
|00001660| 2d 71 75 69 74 20 23 5b | 6e 69 6c 20 22 c0 c1 c2 |-quit #[|nil "...|
|00001670| 5c 22 87 22 20 5b 74 68 | 72 6f 77 20 65 6c 65 63 |\"." [th|row elec|
|00001680| 74 72 69 63 2d 62 75 66 | 66 65 72 2d 6d 65 6e 75 |tric-buf|fer-menu|
|00001690| 2d 73 65 6c 65 63 74 20 | 6e 69 6c 5d 20 33 20 22 |-select |nil] 3 "|
|000016a0| 5c 0a 4c 65 61 76 65 20 | 45 6c 65 63 74 72 69 63 |\.Leave |Electric|
|000016b0| 20 42 75 66 66 65 72 20 | 4d 65 6e 75 2c 20 72 65 | Buffer |Menu, re|
|000016c0| 73 74 6f 72 69 6e 67 20 | 70 72 65 76 69 6f 75 73 |storing |previous|
|000016d0| 20 77 69 6e 64 6f 77 20 | 63 6f 6e 66 69 67 75 72 | window |configur|
|000016e0| 61 74 69 6f 6e 2e 0a 44 | 6f 65 73 20 6e 6f 74 20 |ation..D|oes not |
|000016f0| 65 78 65 63 75 74 65 20 | 73 65 6c 65 63 74 2c 20 |execute |select, |
|00001700| 73 61 76 65 2c 20 6f 72 | 20 64 65 6c 65 74 65 20 |save, or| delete |
|00001710| 63 6f 6d 6d 61 6e 64 73 | 2e 22 20 6e 69 6c 5d 29 |commands|." nil])|
|00001720| 0a 28 64 65 66 61 6c 69 | 61 73 20 28 71 75 6f 74 |.(defali|as (quot|
|00001730| 65 20 45 6c 65 63 74 72 | 69 63 2d 62 75 66 66 65 |e Electr|ic-buffe|
|00001740| 72 2d 6d 65 6e 75 2d 75 | 6e 64 65 66 69 6e 65 64 |r-menu-u|ndefined|
|00001750| 29 20 23 5b 6e 69 6c 20 | 22 c0 20 88 c1 c2 c3 21 |) #[nil |". ....!|
|00001760| c4 3d 83 2d 00 c2 c5 21 | c6 3d 83 2d 00 c2 c7 0e |.=.-...!|.=.-....|
|00001770| 08 21 21 c9 3d 83 2d 00 | c2 ca 21 cb 3d 83 2d 00 |.!!.=.-.|..!.=.-.|
|00001780| cc cd 21 82 30 00 cc ce | 21 21 88 cf d0 21 87 22 |..!.0...|!!...!."|
|00001790| 20 5b 64 69 6e 67 20 6d | 65 73 73 61 67 65 20 6b | [ding m|essage k|
|000017a0| 65 79 2d 62 69 6e 64 69 | 6e 67 20 22 03 03 22 20 |ey-bindi|ng ".." |
|000017b0| 45 6c 65 63 74 72 69 63 | 2d 62 75 66 66 65 72 2d |Electric|-buffer-|
|000017c0| 6d 65 6e 75 2d 71 75 69 | 74 20 22 20 22 20 45 6c |menu-qui|t " " El|
|000017d0| 65 63 74 72 69 63 2d 62 | 75 66 66 65 72 2d 6d 65 |ectric-b|uffer-me|
|000017e0| 6e 75 2d 73 65 6c 65 63 | 74 20 63 68 61 72 2d 74 |nu-selec|t char-t|
|000017f0| 6f 2d 73 74 72 69 6e 67 | 20 68 65 6c 70 2d 63 68 |o-string| help-ch|
|00001800| 61 72 20 48 65 6c 70 65 | 72 2d 68 65 6c 70 20 22 |ar Helpe|r-help "|
|00001810| 3f 22 20 48 65 6c 70 65 | 72 2d 64 65 73 63 72 69 |?" Helpe|r-descri|
|00001820| 62 65 2d 62 69 6e 64 69 | 6e 67 73 20 73 75 62 73 |be-bindi|ngs subs|
|00001830| 74 69 74 75 74 65 2d 63 | 6f 6d 6d 61 6e 64 2d 6b |titute-c|ommand-k|
|00001840| 65 79 73 20 22 54 79 70 | 65 20 43 2d 63 20 43 2d |eys "Typ|e C-c C-|
|00001850| 63 20 74 6f 20 65 78 69 | 74 2c 20 53 70 61 63 65 |c to exi|t, Space|
|00001860| 20 74 6f 20 73 65 6c 65 | 63 74 2c 20 5c 5c 5b 48 | to sele|ct, \\[H|
|00001870| 65 6c 70 65 72 2d 68 65 | 6c 70 5d 20 66 6f 72 20 |elper-he|lp] for |
|00001880| 68 65 6c 70 2c 20 3f 20 | 66 6f 72 20 63 6f 6d 6d |help, ? |for comm|
|00001890| 61 6e 64 73 22 20 22 54 | 79 70 65 20 5c 5c 5b 45 |ands" "T|ype \\[E|
|000018a0| 6c 65 63 74 72 69 63 2d | 62 75 66 66 65 72 2d 6d |lectric-|buffer-m|
|000018b0| 65 6e 75 2d 71 75 69 74 | 5d 20 74 6f 20 65 78 69 |enu-quit|] to exi|
|000018c0| 74 2c 20 5c 5c 5b 45 6c | 65 63 74 72 69 63 2d 62 |t, \\[El|ectric-b|
|000018d0| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 73 65 6c 65 63 |uffer-me|nu-selec|
|000018e0| 74 5d 20 74 6f 20 73 65 | 6c 65 63 74 2c 20 5c 5c |t] to se|lect, \\|
|000018f0| 5b 48 65 6c 70 65 72 2d | 68 65 6c 70 5d 20 66 6f |[Helper-|help] fo|
|00001900| 72 20 68 65 6c 70 2c 20 | 5c 5c 5b 48 65 6c 70 65 |r help, |\\[Helpe|
|00001910| 72 2d 64 65 73 63 72 69 | 62 65 2d 62 69 6e 64 69 |r-descri|be-bindi|
|00001920| 6e 67 73 5d 20 66 6f 72 | 20 63 6f 6d 6d 61 6e 64 |ngs] for| command|
|00001930| 73 2e 22 20 73 69 74 2d | 66 6f 72 20 34 5d 20 34 |s." sit-|for 4] 4|
|00001940| 20 6e 69 6c 20 6e 69 6c | 5d 29 0a 28 64 65 66 61 | nil nil|]).(defa|
|00001950| 6c 69 61 73 20 27 45 6c | 65 63 74 72 69 63 2d 62 |lias 'El|ectric-b|
|00001960| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 6d 6f 64 65 2d |uffer-me|nu-mode-|
|00001970| 76 69 65 77 2d 62 75 66 | 66 65 72 20 23 5b 6e 69 |view-buf|fer #[ni|
|00001980| 6c 20 22 c0 c1 21 89 1a | 83 0e 00 c3 5c 6e 21 82 |l "..!..|....\n!.|
|00001990| 19 00 c4 20 88 c5 c6 5c | 6e 5c 22 88 c7 c8 21 29 |... ...\|n\"...!)|
|000019a0| 87 22 20 5b 42 75 66 66 | 65 72 2d 6d 65 6e 75 2d |." [Buff|er-menu-|
|000019b0| 62 75 66 66 65 72 20 6e | 69 6c 20 62 75 66 6e 61 |buffer n|il bufna|
|000019c0| 6d 20 76 69 65 77 2d 62 | 75 66 66 65 72 20 64 69 |m view-b|uffer di|
|000019d0| 6e 67 20 6d 65 73 73 61 | 67 65 20 22 42 75 66 66 |ng messa|ge "Buff|
|000019e0| 65 72 20 25 73 20 64 6f | 65 73 20 6e 6f 74 20 65 |er %s do|es not e|
|000019f0| 78 69 73 74 21 22 20 73 | 69 74 2d 66 6f 72 20 34 |xist!" s|it-for 4|
|00001a00| 5d 20 34 20 22 5c 0a 56 | 69 65 77 20 62 75 66 66 |] 4 "\.V|iew buff|
|00001a10| 65 72 20 6f 6e 20 63 75 | 72 72 65 6e 74 20 6c 69 |er on cu|rrent li|
|00001a20| 6e 65 20 69 6e 20 45 6c | 65 63 74 72 69 63 20 42 |ne in El|ectric B|
|00001a30| 75 66 66 65 72 20 4d 65 | 6e 75 2e 0a 52 65 74 75 |uffer Me|nu..Retu|
|00001a40| 72 6e 73 20 74 6f 20 45 | 6c 65 63 74 72 69 63 20 |rns to E|lectric |
|00001a50| 42 75 66 66 65 72 20 4d | 65 6e 75 20 77 68 65 6e |Buffer M|enu when|
|00001a60| 20 64 6f 6e 65 2e 22 20 | 6e 69 6c 5d 29 0a | done." |nil]). |
+--------+-------------------------+-------------------------+--------+--------+
