ofs | hex dump | ascii |
---|
0000 | 0a 28 72 65 71 75 69 72 65 20 28 71 75 6f 74 65 20 65 6c 65 63 74 72 69 63 29 29 0a 0a 28 64 65 | .(require.(quote.electric))..(de |
0020 | 66 76 61 72 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 6d | fvar.electric-buffer-menu-mode-m |
0040 | 61 70 20 6e 69 6c 29 0a 0a 28 64 65 66 75 6e 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d | ap.nil)..(defun.electric-buffer- |
0060 | 6c 69 73 74 20 28 61 72 67 29 20 22 5c 0a 56 61 67 75 65 6c 79 20 6c 69 6b 65 20 49 54 53 20 6c | list.(arg)."\.Vaguely.like.ITS.l |
0080 | 75 6e 61 72 20 73 65 6c 65 63 74 20 62 75 66 66 65 72 3b 0a 63 6f 6d 62 69 6e 69 6e 67 20 74 79 | unar.select.buffer;.combining.ty |
00a0 | 70 65 6f 75 74 6f 69 64 20 62 75 66 66 65 72 20 6c 69 73 74 69 6e 67 20 77 69 74 68 20 6d 65 6e | peoutoid.buffer.listing.with.men |
00c0 | 75 6f 69 64 20 62 75 66 66 65 72 20 73 65 6c 65 63 74 69 6f 6e 2e 0a 0a 54 68 69 73 20 70 6f 70 | uoid.buffer.selection...This.pop |
00e0 | 73 20 75 70 20 61 20 62 75 66 66 65 72 20 64 65 73 63 72 69 62 69 6e 67 20 74 68 65 20 73 65 74 | s.up.a.buffer.describing.the.set |
0100 | 20 6f 66 20 65 6d 61 63 73 20 62 75 66 66 65 72 73 2e 0a 49 66 20 74 68 65 20 76 65 72 79 20 6e | .of.emacs.buffers..If.the.very.n |
0120 | 65 78 74 20 63 68 61 72 61 63 74 65 72 20 74 79 70 65 64 20 69 73 20 61 20 73 70 61 63 65 20 74 | ext.character.typed.is.a.space.t |
0140 | 68 65 6e 20 74 68 65 20 62 75 66 66 65 72 20 6c 69 73 74 0a 20 77 69 6e 64 6f 77 20 64 69 73 61 | hen.the.buffer.list..window.disa |
0160 | 70 70 65 61 72 73 2e 0a 0a 4f 74 68 65 72 77 69 73 65 2c 20 6f 6e 65 20 6d 61 79 20 6d 6f 76 65 | ppears...Otherwise,.one.may.move |
0180 | 20 61 72 6f 75 6e 64 20 69 6e 20 74 68 65 20 62 75 66 66 65 72 20 6c 69 73 74 20 77 69 6e 64 6f | .around.in.the.buffer.list.windo |
01a0 | 77 2c 20 6d 61 72 6b 69 6e 67 0a 20 62 75 66 66 65 72 73 20 74 6f 20 62 65 20 73 65 6c 65 63 74 | w,.marking..buffers.to.be.select |
01c0 | 65 64 2c 20 73 61 76 65 64 20 6f 72 20 64 65 6c 65 74 65 64 2e 0a 0a 54 6f 20 65 78 69 74 20 61 | ed,.saved.or.deleted...To.exit.a |
01e0 | 6e 64 20 73 65 6c 65 63 74 20 61 20 6e 65 77 20 62 75 66 66 65 72 2c 20 74 79 70 65 20 53 70 61 | nd.select.a.new.buffer,.type.Spa |
0200 | 63 65 20 77 68 65 6e 20 74 68 65 20 63 75 72 73 6f 72 20 69 73 20 6f 6e 20 74 68 65 0a 20 61 70 | ce.when.the.cursor.is.on.the..ap |
0220 | 70 72 6f 70 72 69 61 74 65 20 6c 69 6e 65 20 6f 66 20 74 68 65 20 62 75 66 66 65 72 2d 6c 69 73 | propriate.line.of.the.buffer-lis |
0240 | 74 20 77 69 6e 64 6f 77 2e 0a 0a 4f 74 68 65 72 20 63 6f 6d 6d 61 6e 64 73 20 61 72 65 20 6d 75 | t.window...Other.commands.are.mu |
0260 | 63 68 20 6c 69 6b 65 20 74 68 6f 73 65 20 6f 66 20 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 | ch.like.those.of.buffer-menu-mod |
0280 | 65 2e 0a 0a 43 61 6c 6c 73 20 76 61 6c 75 65 20 6f 66 20 20 65 6c 65 63 74 72 69 63 2d 62 75 66 | e...Calls.value.of..electric-buf |
02a0 | 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 68 6f 6f 6b 20 20 6f 6e 20 65 6e 74 72 79 20 69 66 20 | fer-menu-mode-hook..on.entry.if. |
02c0 | 6e 6f 6e 2d 6e 69 6c 2e 0a 0a 5c 5c 7b 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e | non-nil...\\{electric-buffer-men |
02e0 | 75 2d 6d 6f 64 65 2d 6d 61 70 7d 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 22 50 22 29 20 28 | u-mode-map}".(interactive."P").( |
0300 | 62 79 74 65 2d 63 6f 64 65 20 22 c4 88 c4 c4 19 18 c6 8b 88 08 83 37 00 09 71 88 c7 20 1b c8 20 | byte-code."...........7..q...... |
0320 | 88 65 62 88 c9 ca c4 c5 23 0b 62 88 cb 0b c4 5c 22 88 83 2e 00 cc 20 82 33 00 cd ce c5 21 21 29 | .eb.....#.b....\".......3....!!) |
0340 | 82 38 00 c4 2a 87 22 20 5b 73 65 6c 65 63 74 20 62 75 66 66 65 72 20 61 72 67 20 6f 70 6f 69 6e | .8..*.".[select.buffer.arg.opoin |
0360 | 74 20 6e 69 6c 20 74 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 8b 88 c4 c5 c6 21 21 89 11 88 | t.nil.t.((byte-code."......!!... |
0380 | c7 8e 09 71 88 c8 20 88 c9 ca 8d 89 12 29 87 22 20 5b 61 72 67 20 62 75 66 66 65 72 20 73 65 6c | ...q.........).".[arg.buffer.sel |
03a0 | 65 63 74 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 08 21 87 22 20 5b 61 72 67 20 6c 69 73 74 | ect.((byte-code."..!.".[arg.list |
03c0 | 2d 62 75 66 66 65 72 73 5d 20 32 29 29 20 77 69 6e 64 6f 77 2d 62 75 66 66 65 72 20 45 6c 65 63 | -buffers].2)).window-buffer.Elec |
03e0 | 74 72 69 63 2d 70 6f 70 2d 75 70 2d 77 69 6e 64 6f 77 20 22 2a 42 75 66 66 65 72 20 4c 69 73 74 | tric-pop-up-window."*Buffer.List |
0400 | 2a 22 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 08 71 88 c1 20 88 c2 08 21 88 c3 c4 21 87 22 20 | *".((byte-code.".q......!...!.". |
0420 | 5b 62 75 66 66 65 72 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 20 62 75 72 79 2d 62 75 | [buffer.Buffer-menu-mode.bury-bu |
0440 | 66 66 65 72 20 6d 65 73 73 61 67 65 20 22 22 5d 20 34 29 29 20 45 6c 65 63 74 72 69 63 2d 62 75 | ffer.message.""].4)).Electric-bu |
0460 | 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d | ffer-menu-mode.electric-buffer-m |
0480 | 65 6e 75 2d 73 65 6c 65 63 74 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c6 c7 21 88 72 89 10 c8 55 | enu-select.(byte-code."..!.r...U |
04a0 | 83 17 00 c9 89 10 88 ca cb c1 5c 22 82 18 00 c1 88 65 62 88 cc cd 21 88 60 64 62 88 cc c9 21 88 | ..........\".....eb...!.`db...!. |
04c0 | 60 ce 1c 1b 1a 0a 62 88 cf cb c1 c5 d0 0a 0b 42 25 2b 87 22 20 5b 75 6e 72 65 61 64 2d 63 6f 6d | `.....b........B%+.".[unread-com |
04e0 | 6d 61 6e 64 2d 63 68 61 72 20 6e 69 6c 20 66 69 72 73 74 20 6c 61 73 74 20 67 6f 61 6c 2d 63 6f | mand-char.nil.first.last.goal-co |
0500 | 6c 75 6d 6e 20 74 20 6d 65 73 73 61 67 65 20 22 3c 3c 3c 20 50 72 65 73 73 20 53 70 61 63 65 20 | lumn.t.message."<<<.Press.Space. |
0520 | 74 6f 20 62 75 72 79 20 74 68 65 20 62 75 66 66 65 72 20 6c 69 73 74 20 3e 3e 3e 22 20 33 32 20 | to.bury.the.buffer.list.>>>".32. |
0540 | 2d 31 20 74 68 72 6f 77 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 | -1.throw.electric-buffer-menu-se |
0560 | 6c 65 63 74 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 32 20 30 20 45 6c 65 63 74 72 69 63 2d 63 | lect.forward-line.2.0.Electric-c |
0580 | 6f 6d 6d 61 6e 64 2d 6c 6f 6f 70 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 | ommand-loop.electric-buffer-menu |
05a0 | 2d 6c 6f 6f 70 65 72 5d 20 31 31 29 5d 20 35 29 29 20 70 6f 69 6e 74 2d 6d 61 72 6b 65 72 20 42 | -looper].11)].5)).point-marker.B |
05c0 | 75 66 66 65 72 2d 6d 65 6e 75 2d 65 78 65 63 75 74 65 20 73 65 61 72 63 68 2d 66 6f 72 77 61 72 | uffer-menu-execute.search-forwar |
05e0 | 64 20 22 0a 3e 22 20 73 65 74 2d 6d 61 72 6b 65 72 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 | d.".>".set-marker.Buffer-menu-se |
0600 | 6c 65 63 74 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 42 75 66 66 65 72 2d 6d 65 6e | lect.switch-to-buffer.Buffer-men |
0620 | 75 2d 62 75 66 66 65 72 5d 20 38 29 29 0a 0a 28 64 65 66 75 6e 20 65 6c 65 63 74 72 69 63 2d 62 | u-buffer].8))..(defun.electric-b |
0640 | 75 66 66 65 72 2d 6d 65 6e 75 2d 6c 6f 6f 70 65 72 20 28 73 74 61 74 65 20 63 6f 6e 64 69 74 69 | uffer-menu-looper.(state.conditi |
0660 | 6f 6e 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 85 09 00 08 40 c2 3e 3f 83 15 00 c3 08 40 08 | on).(byte-code.".....@.>?.....@. |
0680 | 41 5c 22 82 40 00 60 09 40 57 83 25 00 65 62 88 c4 c5 21 82 40 00 60 09 41 56 85 40 00 64 62 88 | A\".@.`.@W.%.eb...!.@.`.AV.@.db. |
06a0 | c4 c6 21 88 c7 64 21 83 3f 00 c8 c6 21 82 40 00 c9 87 22 20 5b 63 6f 6e 64 69 74 69 6f 6e 20 73 | ..!..d!.?...!.@...".[condition.s |
06c0 | 74 61 74 65 20 28 62 75 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 65 6e 64 2d 6f 66 2d 62 75 | tate.(buffer-read-only.end-of-bu |
06e0 | 66 66 65 72 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 62 75 66 66 65 72 29 20 73 69 67 6e 61 6c | ffer.beginning-of-buffer).signal |
0700 | 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 32 20 2d 31 20 70 6f 73 2d 76 69 73 69 62 6c 65 2d 69 | .forward-line.2.-1.pos-visible-i |
0720 | 6e 2d 77 69 6e 64 6f 77 2d 70 20 72 65 63 65 6e 74 65 72 20 6e 69 6c 5d 20 36 29 29 0a 0a 28 70 | n-window-p.recenter.nil].6))..(p |
0740 | 75 74 20 28 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d | ut.(quote.Electric-buffer-menu-m |
0760 | 6f 64 65 29 20 28 71 75 6f 74 65 20 6d 6f 64 65 2d 63 6c 61 73 73 29 20 28 71 75 6f 74 65 20 73 | ode).(quote.mode-class).(quote.s |
0780 | 70 65 63 69 61 6c 29 29 0a 0a 28 64 65 66 75 6e 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 | pecial))..(defun.Electric-buffer |
07a0 | 2d 6d 65 6e 75 2d 6d 6f 64 65 20 6e 69 6c 20 22 5c 0a 4d 61 6a 6f 72 20 6d 6f 64 65 20 66 6f 72 | -menu-mode.nil."\.Major.mode.for |
07c0 | 20 65 64 69 74 69 6e 67 20 61 20 6c 69 73 74 20 6f 66 20 62 75 66 66 65 72 73 2e 0a 45 61 63 68 | .editing.a.list.of.buffers..Each |
07e0 | 20 6c 69 6e 65 20 64 65 73 63 72 69 62 65 73 20 6f 6e 65 20 6f 66 20 74 68 65 20 62 75 66 66 65 | .line.describes.one.of.the.buffe |
0800 | 72 73 20 69 6e 20 45 6d 61 63 73 2e 0a 4c 65 74 74 65 72 73 20 64 6f 20 6e 6f 74 20 69 6e 73 65 | rs.in.Emacs..Letters.do.not.inse |
0820 | 72 74 20 74 68 65 6d 73 65 6c 76 65 73 3b 20 69 6e 73 74 65 61 64 2c 20 74 68 65 79 20 61 72 65 | rt.themselves;.instead,.they.are |
0840 | 20 63 6f 6d 6d 61 6e 64 73 2e 0a 5c 5c 7b 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 | .commands..\\{electric-buffer-me |
0860 | 6e 75 2d 6d 6f 64 65 2d 6d 61 70 7d 0a 0a 43 2d 67 20 6f 72 20 43 2d 63 20 43 2d 63 20 2d 2d 20 | nu-mode-map}..C-g.or.C-c.C-c.--. |
0880 | 65 78 69 74 20 62 75 66 66 65 72 20 6d 65 6e 75 2c 20 72 65 74 75 72 6e 69 6e 67 20 74 6f 20 70 | exit.buffer.menu,.returning.to.p |
08a0 | 72 65 76 69 6f 75 73 20 77 69 6e 64 6f 77 20 61 6e 64 20 62 75 66 66 65 72 0a 20 20 63 6f 6e 66 | revious.window.and.buffer...conf |
08c0 | 69 67 75 72 61 74 69 6f 6e 2e 20 20 49 66 20 74 68 65 20 76 65 72 79 20 66 69 72 73 74 20 63 68 | iguration...If.the.very.first.ch |
08e0 | 61 72 61 63 74 65 72 20 74 79 70 65 64 20 69 73 20 61 20 73 70 61 63 65 2c 20 69 74 0a 20 20 61 | aracter.typed.is.a.space,.it...a |
0900 | 6c 73 6f 20 68 61 73 20 74 68 69 73 20 65 66 66 65 63 74 2e 0a 53 70 61 63 65 20 2d 2d 20 73 65 | lso.has.this.effect..Space.--.se |
0920 | 6c 65 63 74 20 62 75 66 66 65 72 20 6f 66 20 6c 69 6e 65 20 70 6f 69 6e 74 20 69 73 20 6f 6e 2e | lect.buffer.of.line.point.is.on. |
0940 | 0a 20 20 41 6c 73 6f 20 73 68 6f 77 20 62 75 66 66 65 72 73 20 6d 61 72 6b 65 64 20 77 69 74 68 | ...Also.show.buffers.marked.with |
0960 | 20 6d 20 69 6e 20 6f 74 68 65 72 20 77 69 6e 64 6f 77 73 2c 0a 20 20 64 65 6c 65 74 65 73 20 62 | .m.in.other.windows,...deletes.b |
0980 | 75 66 66 65 72 73 20 6d 61 72 6b 65 64 20 77 69 74 68 20 5c 22 44 5c 22 2c 20 61 6e 64 20 73 61 | uffers.marked.with.\"D\",.and.sa |
09a0 | 76 65 73 20 74 68 6f 73 65 20 6d 61 72 6b 65 64 20 77 69 74 68 20 5c 22 53 5c 22 2e 0a 6d 20 2d | ves.those.marked.with.\"S\"..m.- |
09c0 | 2d 20 6d 61 72 6b 20 62 75 66 66 65 72 20 74 6f 20 62 65 20 64 69 73 70 6c 61 79 65 64 2e 0a 7e | -.mark.buffer.to.be.displayed..~ |
09e0 | 20 2d 2d 20 63 6c 65 61 72 20 6d 6f 64 69 66 69 65 64 2d 66 6c 61 67 20 6f 6e 20 74 68 61 74 20 | .--.clear.modified-flag.on.that. |
0a00 | 62 75 66 66 65 72 2e 0a 73 20 2d 2d 20 6d 61 72 6b 20 74 68 61 74 20 62 75 66 66 65 72 20 74 6f | buffer..s.--.mark.that.buffer.to |
0a20 | 20 62 65 20 73 61 76 65 64 2e 0a 64 20 6f 72 20 43 2d 64 20 2d 2d 20 6d 61 72 6b 20 74 68 61 74 | .be.saved..d.or.C-d.--.mark.that |
0a40 | 20 62 75 66 66 65 72 20 74 6f 20 62 65 20 64 65 6c 65 74 65 64 2e 0a 75 20 2d 2d 20 72 65 6d 6f | .buffer.to.be.deleted..u.--.remo |
0a60 | 76 65 20 61 6c 6c 20 6b 69 6e 64 73 20 6f 66 20 6d 61 72 6b 73 20 66 72 6f 6d 20 63 75 72 72 65 | ve.all.kinds.of.marks.from.curre |
0a80 | 6e 74 20 6c 69 6e 65 2e 0a 76 20 2d 2d 20 76 69 65 77 20 62 75 66 66 65 72 2c 20 72 65 74 75 72 | nt.line..v.--.view.buffer,.retur |
0aa0 | 6e 69 6e 67 20 77 68 65 6e 20 64 6f 6e 65 2e 0a 44 65 6c 65 74 65 20 2d 2d 20 62 61 63 6b 20 75 | ning.when.done..Delete.--.back.u |
0ac0 | 70 20 61 20 6c 69 6e 65 20 61 6e 64 20 72 65 6d 6f 76 65 20 6d 61 72 6b 73 2e 0a 0a 0a 45 6e 74 | p.a.line.and.remove.marks....Ent |
0ae0 | 72 79 20 74 6f 20 74 68 69 73 20 6d 6f 64 65 20 76 69 61 20 63 6f 6d 6d 61 6e 64 20 5c 5c 5b 65 | ry.to.this.mode.via.command.\\[e |
0b00 | 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6c 69 73 74 5d 20 63 61 6c 6c 73 20 74 68 65 20 76 | lectric-buffer-list].calls.the.v |
0b20 | 61 6c 75 65 20 6f 66 0a 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 | alue.of.electric-buffer-menu-mod |
0b40 | 65 2d 68 6f 6f 6b 20 69 66 20 69 74 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2e 22 20 28 62 79 74 65 2d | e-hook.if.it.is.non-nil.".(byte- |
0b60 | 63 6f 64 65 20 22 ca 20 88 cb 08 21 88 cc 89 11 88 cd 89 12 88 c1 0b 3e 83 24 00 ce 0b 21 89 13 | code.".....!...........>.$...!.. |
0b80 | 88 cf c1 0b 3e d0 5c 22 82 25 00 c9 88 d1 c4 21 88 d2 89 14 88 c6 89 15 88 c6 89 16 07 88 d3 89 | ....>.\".%.....!................ |
0ba0 | 16 08 88 65 62 88 d4 d5 c9 c6 23 83 4d 00 d6 d7 21 82 4e 00 c9 88 d8 d9 21 87 22 20 5b 65 6c 65 | ...eb.....#.M...!.N.....!.".[ele |
0bc0 | 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 6d 61 70 20 6d 6f 64 65 2d | ctric-buffer-menu-mode-map.mode- |
0be0 | 6e 61 6d 65 20 6d 6f 64 65 2d 6c 69 6e 65 2d 62 75 66 66 65 72 2d 69 64 65 6e 74 69 66 69 63 61 | name.mode-line-buffer-identifica |
0c00 | 74 69 6f 6e 20 6d 6f 64 65 2d 6c 69 6e 65 2d 66 6f 72 6d 61 74 20 48 65 6c 70 65 72 2d 72 65 74 | tion.mode-line-format.Helper-ret |
0c20 | 75 72 6e 2d 62 6c 75 72 62 20 74 72 75 6e 63 61 74 65 2d 6c 69 6e 65 73 20 74 20 62 75 66 66 65 | urn-blurb.truncate-lines.t.buffe |
0c40 | 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 6e 69 6c 20 6b 69 6c 6c 2d | r-read-only.major-mode.nil.kill- |
0c60 | 61 6c 6c 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 6c 65 73 20 75 73 65 2d 6c 6f 63 61 6c 2d 6d 61 | all-local-variables.use-local-ma |
0c80 | 70 20 22 45 6c 65 63 74 72 69 63 20 42 75 66 66 65 72 20 4d 65 6e 75 22 20 22 45 6c 65 63 74 72 | p."Electric.Buffer.Menu"."Electr |
0ca0 | 69 63 20 42 75 66 66 65 72 20 4c 69 73 74 22 20 63 6f 70 79 2d 73 65 71 75 65 6e 63 65 20 73 65 | ic.Buffer.List".copy-sequence.se |
0cc0 | 74 63 61 72 20 22 42 75 66 66 65 72 73 22 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 62 | tcar."Buffers".make-local-variab |
0ce0 | 6c 65 20 22 72 65 74 75 72 6e 20 74 6f 20 62 75 66 66 65 72 20 65 64 69 74 69 6e 67 22 20 45 6c | le."return.to.buffer.editing".El |
0d00 | 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 20 73 65 61 72 63 68 2d 66 | ectric-buffer-menu-mode.search-f |
0d20 | 6f 72 77 61 72 64 20 22 0a 2e 22 20 66 6f 72 77 61 72 64 2d 63 68 61 72 20 2d 31 20 72 75 6e 2d | orward."..".forward-char.-1.run- |
0d40 | 68 6f 6f 6b 73 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d | hooks.electric-buffer-menu-mode- |
0d60 | 68 6f 6f 6b 5d 20 39 29 29 0a 0a 28 70 75 74 20 28 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 2d | hook].9))..(put.(quote.Electric- |
0d80 | 62 75 66 66 65 72 2d 6d 65 6e 75 2d 75 6e 64 65 66 69 6e 65 64 29 20 28 71 75 6f 74 65 20 73 75 | buffer-menu-undefined).(quote.su |
0da0 | 70 70 72 65 73 73 2d 6b 65 79 6d 61 70 29 20 74 29 0a 0a 28 69 66 20 65 6c 65 63 74 72 69 63 2d | ppress-keymap).t)..(if.electric- |
0dc0 | 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 6d 61 70 20 6e 69 6c 20 28 6c 65 74 20 28 28 | buffer-menu-mode-map.nil.(let.(( |
0de0 | 6d 61 70 20 28 6d 61 6b 65 2d 6b 65 79 6d 61 70 29 29 29 20 28 66 69 6c 6c 61 72 72 61 79 20 6d | map.(make-keymap))).(fillarray.m |
0e00 | 61 70 20 28 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 75 | ap.(quote.Electric-buffer-menu-u |
0e20 | 6e 64 65 66 69 6e 65 64 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 1b 22 20 28 | ndefined)).(define-key.map.".".( |
0e40 | 6d 61 6b 65 2d 6b 65 79 6d 61 70 29 29 20 28 66 69 6c 6c 61 72 72 61 79 20 28 6c 6f 6f 6b 75 70 | make-keymap)).(fillarray.(lookup |
0e60 | 2d 6b 65 79 20 6d 61 70 20 22 1b 22 29 20 28 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 2d 62 75 | -key.map.".").(quote.Electric-bu |
0e80 | 66 66 65 72 2d 6d 65 6e 75 2d 75 6e 64 65 66 69 6e 65 64 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 | ffer-menu-undefined)).(define-ke |
0ea0 | 79 20 6d 61 70 20 22 1a 22 20 28 71 75 6f 74 65 20 73 75 73 70 65 6e 64 2d 65 6d 61 63 73 29 29 | y.map.".".(quote.suspend-emacs)) |
0ec0 | 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 76 22 20 28 71 75 6f 74 65 20 45 6c 65 63 | .(define-key.map."v".(quote.Elec |
0ee0 | 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 76 69 65 77 2d 62 75 66 66 65 | tric-buffer-menu-mode-view-buffe |
0f00 | 72 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 08 22 20 28 71 75 6f 74 65 20 48 | r)).(define-key.map.".".(quote.H |
0f20 | 65 6c 70 65 72 2d 68 65 6c 70 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 3f 22 | elper-help)).(define-key.map."?" |
0f40 | 20 28 71 75 6f 74 65 20 48 65 6c 70 65 72 2d 64 65 73 63 72 69 62 65 2d 62 69 6e 64 69 6e 67 73 | .(quote.Helper-describe-bindings |
0f60 | 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 03 22 20 6e 69 6c 29 20 28 64 65 66 | )).(define-key.map.".".nil).(def |
0f80 | 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 03 03 22 20 28 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 | ine-key.map."..".(quote.Electric |
0fa0 | 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 71 75 69 74 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 | -buffer-menu-quit)).(define-key. |
0fc0 | 6d 61 70 20 22 1d 22 20 28 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d | map.".".(quote.Electric-buffer-m |
0fe0 | 65 6e 75 2d 71 75 69 74 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 71 22 20 28 | enu-quit)).(define-key.map."q".( |
1000 | 71 75 6f 74 65 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 71 75 69 74 29 | quote.Electric-buffer-menu-quit) |
1020 | 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 20 22 20 28 71 75 6f 74 65 20 45 6c 65 | ).(define-key.map.".".(quote.Ele |
1040 | 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 6c 65 63 74 29 29 20 28 64 65 66 69 | ctric-buffer-menu-select)).(defi |
1060 | 6e 65 2d 6b 65 79 20 6d 61 70 20 22 0c 22 20 28 71 75 6f 74 65 20 72 65 63 65 6e 74 65 72 29 29 | ne-key.map.".".(quote.recenter)) |
1080 | 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 73 22 20 28 71 75 6f 74 65 20 42 75 66 66 | .(define-key.map."s".(quote.Buff |
10a0 | 65 72 2d 6d 65 6e 75 2d 73 61 76 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | er-menu-save)).(define-key.map." |
10c0 | 64 22 20 28 71 75 6f 74 65 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 64 65 6c 65 74 65 29 29 20 28 | d".(quote.Buffer-menu-delete)).( |
10e0 | 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 6b 22 20 28 71 75 6f 74 65 20 42 75 66 66 65 72 | define-key.map."k".(quote.Buffer |
1100 | 2d 6d 65 6e 75 2d 64 65 6c 65 74 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 | -menu-delete)).(define-key.map." |
1120 | 04 22 20 28 71 75 6f 74 65 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 64 65 6c 65 74 65 2d 62 61 63 | .".(quote.Buffer-menu-delete-bac |
1140 | 6b 77 61 72 64 73 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 7f 22 20 28 71 75 | kwards)).(define-key.map.".".(qu |
1160 | 6f 74 65 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 62 61 63 6b 75 70 2d 75 6e 6d 61 72 6b 29 29 20 | ote.Buffer-menu-backup-unmark)). |
1180 | 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 7e 22 20 28 71 75 6f 74 65 20 42 75 66 66 65 | (define-key.map."~".(quote.Buffe |
11a0 | 72 2d 6d 65 6e 75 2d 6e 6f 74 2d 6d 6f 64 69 66 69 65 64 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 | r-menu-not-modified)).(define-ke |
11c0 | 79 20 6d 61 70 20 22 75 22 20 28 71 75 6f 74 65 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 75 6e 6d | y.map."u".(quote.Buffer-menu-unm |
11e0 | 61 72 6b 29 29 20 28 6c 65 74 20 28 28 69 20 34 38 29 29 20 28 77 68 69 6c 65 20 28 3c 3d 20 69 | ark)).(let.((i.48)).(while.(<=.i |
1200 | 20 35 37 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 63 68 61 72 2d 74 6f 2d 73 74 | .57).(define-key.map.(char-to-st |
1220 | 72 69 6e 67 20 69 29 20 28 71 75 6f 74 65 20 64 69 67 69 74 2d 61 72 67 75 6d 65 6e 74 29 29 20 | ring.i).(quote.digit-argument)). |
1240 | 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 28 63 6f 6e 63 61 74 20 22 1b 22 20 28 63 68 61 | (define-key.map.(concat.".".(cha |
1260 | 72 2d 74 6f 2d 73 74 72 69 6e 67 20 69 29 29 20 28 71 75 6f 74 65 20 64 69 67 69 74 2d 61 72 67 | r-to-string.i)).(quote.digit-arg |
1280 | 75 6d 65 6e 74 29 29 20 28 73 65 74 71 20 69 20 28 31 2b 20 69 29 29 29 29 20 28 64 65 66 69 6e | ument)).(setq.i.(1+.i)))).(defin |
12a0 | 65 2d 6b 65 79 20 6d 61 70 20 22 2d 22 20 28 71 75 6f 74 65 20 6e 65 67 61 74 69 76 65 2d 61 72 | e-key.map."-".(quote.negative-ar |
12c0 | 67 75 6d 65 6e 74 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 1b 2d 22 20 28 71 | gument)).(define-key.map.".-".(q |
12e0 | 75 6f 74 65 20 6e 65 67 61 74 69 76 65 2d 61 72 67 75 6d 65 6e 74 29 29 20 28 64 65 66 69 6e 65 | uote.negative-argument)).(define |
1300 | 2d 6b 65 79 20 6d 61 70 20 22 6d 22 20 28 71 75 6f 74 65 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d | -key.map."m".(quote.Buffer-menu- |
1320 | 6d 61 72 6b 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 15 22 20 28 71 75 6f 74 | mark)).(define-key.map.".".(quot |
1340 | 65 20 75 6e 69 76 65 72 73 61 6c 2d 61 72 67 75 6d 65 6e 74 29 29 20 28 64 65 66 69 6e 65 2d 6b | e.universal-argument)).(define-k |
1360 | 65 79 20 6d 61 70 20 22 10 22 20 28 71 75 6f 74 65 20 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 29 | ey.map.".".(quote.previous-line) |
1380 | 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 0e 22 20 28 71 75 6f 74 65 20 6e 65 78 | ).(define-key.map.".".(quote.nex |
13a0 | 74 2d 6c 69 6e 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 70 22 20 28 71 75 | t-line)).(define-key.map."p".(qu |
13c0 | 6f 74 65 20 70 72 65 76 69 6f 75 73 2d 6c 69 6e 65 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 | ote.previous-line)).(define-key. |
13e0 | 6d 61 70 20 22 6e 22 20 28 71 75 6f 74 65 20 6e 65 78 74 2d 6c 69 6e 65 29 29 20 28 64 65 66 69 | map."n".(quote.next-line)).(defi |
1400 | 6e 65 2d 6b 65 79 20 6d 61 70 20 22 16 22 20 28 71 75 6f 74 65 20 73 63 72 6f 6c 6c 2d 75 70 29 | ne-key.map.".".(quote.scroll-up) |
1420 | 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 1b 76 22 20 28 71 75 6f 74 65 20 73 63 | ).(define-key.map.".v".(quote.sc |
1440 | 72 6f 6c 6c 2d 64 6f 77 6e 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 1b 16 22 | roll-down)).(define-key.map.".." |
1460 | 20 28 71 75 6f 74 65 20 73 63 72 6f 6c 6c 2d 6f 74 68 65 72 2d 77 69 6e 64 6f 77 29 29 20 28 64 | .(quote.scroll-other-window)).(d |
1480 | 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 1b 3e 22 20 28 71 75 6f 74 65 20 65 6e 64 2d 6f 66 | efine-key.map.".>".(quote.end-of |
14a0 | 2d 62 75 66 66 65 72 29 29 20 28 64 65 66 69 6e 65 2d 6b 65 79 20 6d 61 70 20 22 1b 3c 22 20 28 | -buffer)).(define-key.map.".<".( |
14c0 | 71 75 6f 74 65 20 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 62 75 66 66 65 72 29 29 20 28 73 65 74 | quote.beginning-of-buffer)).(set |
14e0 | 71 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 6d 61 70 20 | q.electric-buffer-menu-mode-map. |
1500 | 6d 61 70 29 29 29 0a 0a 28 64 65 66 75 6e 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d | map)))..(defun.Electric-buffer-m |
1520 | 65 6e 75 2d 65 78 69 74 20 6e 69 6c 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 | enu-exit.nil.(interactive).(byte |
1540 | 2d 63 6f 64 65 20 22 c2 88 09 89 10 88 c2 c3 c4 8f 87 22 20 5b 75 6e 72 65 61 64 2d 63 6f 6d 6d | -code."...........".[unread-comm |
1560 | 61 6e 64 2d 63 68 61 72 20 6c 61 73 74 2d 69 6e 70 75 74 2d 63 68 61 72 20 6e 69 6c 20 28 62 79 | and-char.last-input-char.nil.(by |
1580 | 74 65 2d 63 6f 64 65 20 22 c1 c2 c0 5c 22 87 22 20 5b 6e 69 6c 20 74 68 72 6f 77 20 65 6c 65 63 | te-code."...\".".[nil.throw.elec |
15a0 | 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 6c 65 63 74 5d 20 33 29 20 28 28 65 72 | tric-buffer-menu-select].3).((er |
15c0 | 72 6f 72 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 20 88 c1 20 87 22 20 5b 42 75 66 66 65 72 2d | ror.(byte-code."......".[Buffer- |
15e0 | 6d 65 6e 75 2d 6d 6f 64 65 20 6f 74 68 65 72 2d 62 75 66 66 65 72 5d 20 33 29 29 29 5d 20 33 29 | menu-mode.other-buffer].3)))].3) |
1600 | 29 0a 0a 28 64 65 66 75 6e 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 | )..(defun.Electric-buffer-menu-s |
1620 | 65 6c 65 63 74 20 6e 69 6c 20 22 5c 0a 4c 65 61 76 65 20 45 6c 65 63 74 72 69 63 20 42 75 66 66 | elect.nil."\.Leave.Electric.Buff |
1640 | 65 72 20 4d 65 6e 75 2c 20 73 65 6c 65 63 74 69 6e 67 20 62 75 66 66 65 72 73 20 61 6e 64 20 65 | er.Menu,.selecting.buffers.and.e |
1660 | 78 65 63 75 74 69 6e 67 20 63 68 61 6e 67 65 73 2e 0a 53 61 76 65 73 20 62 75 66 66 65 72 73 20 | xecuting.changes..Saves.buffers. |
1680 | 6d 61 72 6b 65 64 20 5c 22 53 5c 22 2e 20 20 44 65 6c 65 74 65 73 20 62 75 66 66 65 72 73 20 6d | marked.\"S\"...Deletes.buffers.m |
16a0 | 61 72 6b 65 64 20 5c 22 4b 5c 22 2e 0a 53 65 6c 65 63 74 73 20 62 75 66 66 65 72 20 61 74 20 70 | arked.\"K\"..Selects.buffer.at.p |
16c0 | 6f 69 6e 74 20 61 6e 64 20 64 69 73 70 6c 61 79 73 20 62 75 66 66 65 72 73 20 6d 61 72 6b 65 64 | oint.and.displays.buffers.marked |
16e0 | 20 5c 22 3e 5c 22 20 69 6e 20 6f 74 68 65 72 0a 77 69 6e 64 6f 77 73 2e 22 20 28 69 6e 74 65 72 | .\">\".in.other.windows.".(inter |
1700 | 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c1 c2 60 5c 22 87 22 20 5b 6e | active).(byte-code."....`\".".[n |
1720 | 69 6c 20 74 68 72 6f 77 20 65 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 | il.throw.electric-buffer-menu-se |
1740 | 6c 65 63 74 5d 20 33 29 29 0a 0a 28 64 65 66 75 6e 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 | lect].3))..(defun.Electric-buffe |
1760 | 72 2d 6d 65 6e 75 2d 71 75 69 74 20 6e 69 6c 20 22 5c 0a 4c 65 61 76 65 20 45 6c 65 63 74 72 69 | r-menu-quit.nil."\.Leave.Electri |
1780 | 63 20 42 75 66 66 65 72 20 4d 65 6e 75 2c 20 72 65 73 74 6f 72 69 6e 67 20 70 72 65 76 69 6f 75 | c.Buffer.Menu,.restoring.previou |
17a0 | 73 20 77 69 6e 64 6f 77 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e 2e 0a 44 6f 65 73 20 6e 6f 74 | s.window.configuration..Does.not |
17c0 | 20 65 78 65 63 75 74 65 20 73 65 6c 65 63 74 2c 20 73 61 76 65 2c 20 6f 72 20 64 65 6c 65 74 65 | .execute.select,.save,.or.delete |
17e0 | 20 63 6f 6d 6d 61 6e 64 73 2e 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d | .commands.".(interactive).(byte- |
1800 | 63 6f 64 65 20 22 c0 88 c1 c2 c0 5c 22 87 22 20 5b 6e 69 6c 20 74 68 72 6f 77 20 65 6c 65 63 74 | code.".....\".".[nil.throw.elect |
1820 | 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 6c 65 63 74 5d 20 33 29 29 0a 0a 28 64 65 | ric-buffer-menu-select].3))..(de |
1840 | 66 75 6e 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 75 6e 64 65 66 69 6e | fun.Electric-buffer-menu-undefin |
1860 | 65 64 20 6e 69 6c 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 | ed.nil.(interactive).(byte-code. |
1880 | 22 c0 88 c1 20 88 c2 c3 c4 21 c5 3d 85 23 00 c3 c6 21 c7 3d 85 23 00 c3 c8 21 c9 3d 85 23 00 c3 | "........!.=.#...!.=.#...!.=.#.. |
18a0 | ca 21 cb 3d 83 2a 00 cc 82 2d 00 cd ce 21 21 88 cf d0 21 87 22 20 5b 6e 69 6c 20 64 69 6e 67 20 | .!.=.*...-...!!...!.".[nil.ding. |
18c0 | 6d 65 73 73 61 67 65 20 6b 65 79 2d 62 69 6e 64 69 6e 67 20 22 03 03 22 20 45 6c 65 63 74 72 69 | message.key-binding."..".Electri |
18e0 | 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 71 75 69 74 20 22 20 22 20 45 6c 65 63 74 72 69 63 2d | c-buffer-menu-quit.".".Electric- |
1900 | 62 75 66 66 65 72 2d 6d 65 6e 75 2d 73 65 6c 65 63 74 20 22 08 22 20 48 65 6c 70 65 72 2d 68 65 | buffer-menu-select.".".Helper-he |
1920 | 6c 70 20 22 3f 22 20 48 65 6c 70 65 72 2d 64 65 73 63 72 69 62 65 2d 62 69 6e 64 69 6e 67 73 20 | lp."?".Helper-describe-bindings. |
1940 | 22 54 79 70 65 20 43 2d 63 20 43 2d 63 20 74 6f 20 65 78 69 74 2c 20 53 70 61 63 65 20 74 6f 20 | "Type.C-c.C-c.to.exit,.Space.to. |
1960 | 73 65 6c 65 63 74 2c 20 43 2d 68 20 66 6f 72 20 68 65 6c 70 2c 20 3f 20 66 6f 72 20 63 6f 6d 6d | select,.C-h.for.help,.?.for.comm |
1980 | 61 6e 64 73 22 20 73 75 62 73 74 69 74 75 74 65 2d 63 6f 6d 6d 61 6e 64 2d 6b 65 79 73 20 22 54 | ands".substitute-command-keys."T |
19a0 | 79 70 65 20 5c 5c 5b 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 6e 75 2d 71 75 69 74 | ype.\\[Electric-buffer-menu-quit |
19c0 | 5d 20 74 6f 20 65 78 69 74 2c 20 5c 5c 5b 45 6c 65 63 74 72 69 63 2d 62 75 66 66 65 72 2d 6d 65 | ].to.exit,.\\[Electric-buffer-me |
19e0 | 6e 75 2d 73 65 6c 65 63 74 5d 20 74 6f 20 73 65 6c 65 63 74 2c 20 5c 5c 5b 48 65 6c 70 65 72 2d | nu-select].to.select,.\\[Helper- |
1a00 | 68 65 6c 70 5d 20 66 6f 72 20 68 65 6c 70 2c 20 5c 5c 5b 48 65 6c 70 65 72 2d 64 65 73 63 72 69 | help].for.help,.\\[Helper-descri |
1a20 | 62 65 2d 62 69 6e 64 69 6e 67 73 5d 20 66 6f 72 20 63 6f 6d 6d 61 6e 64 73 2e 22 20 73 69 74 2d | be-bindings].for.commands.".sit- |
1a40 | 66 6f 72 20 34 5d 20 39 29 29 0a 0a 28 64 65 66 75 6e 20 45 6c 65 63 74 72 69 63 2d 62 75 66 66 | for.4].9))..(defun.Electric-buff |
1a60 | 65 72 2d 6d 65 6e 75 2d 6d 6f 64 65 2d 76 69 65 77 2d 62 75 66 66 65 72 20 6e 69 6c 20 22 5c 0a | er-menu-mode-view-buffer.nil."\. |
1a80 | 56 69 65 77 20 62 75 66 66 65 72 20 6f 6e 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 20 69 6e 20 45 | View.buffer.on.current.line.in.E |
1aa0 | 6c 65 63 74 72 69 63 20 42 75 66 66 65 72 20 4d 65 6e 75 2e 0a 52 65 74 75 72 6e 73 20 74 6f 20 | lectric.Buffer.Menu..Returns.to. |
1ac0 | 45 6c 65 63 74 72 69 63 20 42 75 66 66 65 72 20 4d 65 6e 75 20 77 68 65 6e 20 64 6f 6e 65 2e 22 | Electric.Buffer.Menu.when.done." |
1ae0 | 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c1 88 c2 c1 21 | .(interactive).(byte-code."....! |
1b00 | 18 08 83 10 00 c3 08 21 82 1b 00 c4 20 88 c5 c6 08 5c 22 88 c7 c8 21 29 87 22 20 5b 62 75 66 6e | .......!.........\"...!).".[bufn |
1b20 | 61 6d 20 6e 69 6c 20 42 75 66 66 65 72 2d 6d 65 6e 75 2d 62 75 66 66 65 72 20 76 69 65 77 2d 62 | am.nil.Buffer-menu-buffer.view-b |
1b40 | 75 66 66 65 72 20 64 69 6e 67 20 6d 65 73 73 61 67 65 20 22 42 75 66 66 65 72 20 25 73 20 64 6f | uffer.ding.message."Buffer.%s.do |
1b60 | 65 73 20 6e 6f 74 20 65 78 69 73 74 21 22 20 73 69 74 2d 66 6f 72 20 34 5d 20 36 29 29 0a | es.not.exist!".sit-for.4].6)). |