home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1995-08-29 | 24.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 55%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
| 44%
| TrID
| Summation Document Image Information Load File
| default (weak)
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 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 36 3a 35 30 3a 32 | 38 20 31 39 39 35 0a 3b | 16:50:2|8 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 78 31 | 31 2f 78 2d 6d 65 6e 75 |/lisp/x1|1/x-menu|
|00000090| 62 61 72 2e 65 6c 0a 3b | 3b 3b 20 65 6d 61 63 73 |bar.el.;|;; emacs|
|000000a0| 20 76 65 72 73 69 6f 6e | 20 31 39 2e 31 33 20 58 | version| 19.13 X|
|000000b0| 45 6d 61 63 73 20 4c 75 | 63 69 64 2e 0a 3b 3b 3b |Emacs Lu|cid..;;;|
|000000c0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000d0| 6e 20 32 2e 32 35 3b 20 | 31 2d 53 65 70 2d 39 34 |n 2.25; |1-Sep-94|
|000000e0| 2e 0a 3b 3b 3b 20 6f 70 | 74 69 6d 69 7a 61 74 69 |..;;; op|timizati|
|000000f0| 6f 6e 20 69 73 20 6f 6e | 2e 0a 3b 3b 3b 20 74 68 |on is on|..;;; th|
|00000100| 69 73 20 66 69 6c 65 20 | 75 73 65 73 20 6f 70 63 |is file |uses opc|
|00000110| 6f 64 65 73 20 77 68 69 | 63 68 20 64 6f 20 6e 6f |odes whi|ch do no|
|00000120| 74 20 65 78 69 73 74 20 | 69 6e 20 45 6d 61 63 73 |t exist |in Emacs|
|00000130| 20 31 38 2e 0a 0a 28 69 | 66 20 28 61 6e 64 20 28 | 18...(i|f (and (|
|00000140| 62 6f 75 6e 64 70 20 27 | 65 6d 61 63 73 2d 76 65 |boundp '|emacs-ve|
|00000150| 72 73 69 6f 6e 29 0a 09 | 20 28 6f 72 20 28 61 6e |rsion)..| (or (an|
|00000160| 64 20 28 62 6f 75 6e 64 | 70 20 27 65 70 6f 63 68 |d (bound|p 'epoch|
|00000170| 3a 3a 76 65 72 73 69 6f | 6e 29 20 65 70 6f 63 68 |::versio|n) epoch|
|00000180| 3a 3a 76 65 72 73 69 6f | 6e 29 0a 09 20 20 20 20 |::versio|n).. |
|00000190| 20 28 73 74 72 69 6e 67 | 2d 6c 65 73 73 70 20 65 | (string|-lessp e|
|000001a0| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 20 22 31 39 |macs-ver|sion "19|
|000001b0| 22 29 29 29 0a 20 20 20 | 20 28 65 72 72 6f 72 20 |"))). | (error |
|000001c0| 22 54 68 69 73 20 66 69 | 6c 65 20 77 61 73 20 63 |"This fi|le was c|
|000001d0| 6f 6d 70 69 6c 65 64 20 | 66 6f 72 20 45 6d 61 63 |ompiled |for Emac|
|000001e0| 73 20 31 39 2e 22 29 29 | 0a 0a 28 62 79 74 65 2d |s 19."))|..(byte-|
|000001f0| 63 6f 64 65 20 22 c0 c1 | 21 12 c3 c4 4d 88 c5 c6 |code "..|!...M...|
|00000200| 4d 88 c7 c8 4d 88 c9 ca | 4d 88 cb cc c9 5c 22 88 |M...M...|M....\".|
|00000210| cd ce 21 ac 83 cf 16 0e | c0 87 22 20 5b 70 75 72 |..!.....|.." [pur|
|00000220| 65 63 6f 70 79 2d 6d 65 | 6e 75 62 61 72 20 28 28 |ecopy-me|nubar ((|
|00000230| 22 46 69 6c 65 22 20 3a | 66 69 6c 74 65 72 20 66 |"File" :|filter f|
|00000240| 69 6c 65 2d 6d 65 6e 75 | 2d 66 69 6c 74 65 72 20 |ile-menu|-filter |
|00000250| 5b 22 4f 70 65 6e 2e 2e | 2e 22 20 66 69 6e 64 2d |["Open..|." find-|
|00000260| 66 69 6c 65 20 74 5d 20 | 5b 22 4f 70 65 6e 20 69 |file t] |["Open i|
|00000270| 6e 20 4f 74 68 65 72 20 | 57 69 6e 64 6f 77 2e 2e |n Other |Window..|
|00000280| 2e 22 20 66 69 6e 64 2d | 66 69 6c 65 2d 6f 74 68 |." find-|file-oth|
|00000290| 65 72 2d 77 69 6e 64 6f | 77 20 74 5d 20 5b 22 4f |er-windo|w t] ["O|
|000002a0| 70 65 6e 20 69 6e 20 4e | 65 77 20 46 72 61 6d 65 |pen in N|ew Frame|
|000002b0| 2e 2e 2e 22 20 66 69 6e | 64 2d 66 69 6c 65 2d 6f |..." fin|d-file-o|
|000002c0| 74 68 65 72 2d 66 72 61 | 6d 65 20 74 5d 20 5b 22 |ther-fra|me t] ["|
|000002d0| 49 6e 73 65 72 74 20 46 | 69 6c 65 2e 2e 2e 22 20 |Insert F|ile..." |
|000002e0| 69 6e 73 65 72 74 2d 66 | 69 6c 65 20 74 5d 20 5b |insert-f|ile t] [|
|000002f0| 22 56 69 65 77 20 46 69 | 6c 65 2e 2e 2e 22 20 76 |"View Fi|le..." v|
|00000300| 69 65 77 2d 66 69 6c 65 | 20 74 5d 20 22 2d 2d 2d |iew-file| t] "---|
|00000310| 2d 2d 2d 22 20 5b 22 53 | 61 76 65 22 20 73 61 76 |---" ["S|ave" sav|
|00000320| 65 2d 62 75 66 66 65 72 | 20 74 20 6e 69 6c 5d 20 |e-buffer| t nil] |
|00000330| 5b 22 53 61 76 65 20 41 | 73 2e 2e 2e 22 20 77 72 |["Save A|s..." wr|
|00000340| 69 74 65 2d 66 69 6c 65 | 20 74 5d 20 5b 22 53 61 |ite-file| t] ["Sa|
|00000350| 76 65 20 53 6f 6d 65 20 | 42 75 66 66 65 72 73 22 |ve Some |Buffers"|
|00000360| 20 73 61 76 65 2d 73 6f | 6d 65 2d 62 75 66 66 65 | save-so|me-buffe|
|00000370| 72 73 20 74 5d 20 22 2d | 2d 2d 2d 2d 22 20 5b 22 |rs t] "-|----" ["|
|00000380| 50 72 69 6e 74 20 42 75 | 66 66 65 72 22 20 6c 70 |Print Bu|ffer" lp|
|00000390| 72 2d 62 75 66 66 65 72 | 20 74 20 6e 69 6c 5d 20 |r-buffer| t nil] |
|000003a0| 5b 22 50 72 65 74 74 79 | 2d 50 72 69 6e 74 20 42 |["Pretty|-Print B|
|000003b0| 75 66 66 65 72 22 20 70 | 73 2d 70 72 69 6e 74 2d |uffer" p|s-print-|
|000003c0| 62 75 66 66 65 72 2d 77 | 69 74 68 2d 66 61 63 65 |buffer-w|ith-face|
|000003d0| 73 20 74 20 6e 69 6c 5d | 20 22 2d 2d 2d 2d 2d 22 |s t nil]| "-----"|
|000003e0| 20 5b 22 4e 65 77 20 46 | 72 61 6d 65 22 20 6d 61 | ["New F|rame" ma|
|000003f0| 6b 65 2d 66 72 61 6d 65 | 20 74 5d 20 5b 22 44 65 |ke-frame| t] ["De|
|00000400| 6c 65 74 65 20 46 72 61 | 6d 65 22 20 64 65 6c 65 |lete Fra|me" dele|
|00000410| 74 65 2d 66 72 61 6d 65 | 20 74 5d 20 22 2d 2d 2d |te-frame| t] "---|
|00000420| 2d 2d 22 20 5b 22 53 70 | 6c 69 74 20 57 69 6e 64 |--" ["Sp|lit Wind|
|00000430| 6f 77 22 20 73 70 6c 69 | 74 2d 77 69 6e 64 6f 77 |ow" spli|t-window|
|00000440| 2d 76 65 72 74 69 63 61 | 6c 6c 79 20 74 5d 20 5b |-vertica|lly t] [|
|00000450| 22 55 6e 2d 53 70 6c 69 | 74 20 28 4b 65 65 70 20 |"Un-Spli|t (Keep |
|00000460| 54 68 69 73 29 22 20 64 | 65 6c 65 74 65 2d 6f 74 |This)" d|elete-ot|
|00000470| 68 65 72 2d 77 69 6e 64 | 6f 77 73 20 28 6e 6f 74 |her-wind|ows (not|
|00000480| 20 28 6f 6e 65 2d 77 69 | 6e 64 6f 77 2d 70 20 74 | (one-wi|ndow-p t|
|00000490| 29 29 5d 20 5b 22 55 6e | 2d 53 70 6c 69 74 20 28 |))] ["Un|-Split (|
|000004a0| 4b 65 65 70 20 4f 74 68 | 65 72 73 29 22 20 64 65 |Keep Oth|ers)" de|
|000004b0| 6c 65 74 65 2d 77 69 6e | 64 6f 77 20 28 6e 6f 74 |lete-win|dow (not|
|000004c0| 20 28 6f 6e 65 2d 77 69 | 6e 64 6f 77 2d 70 20 74 | (one-wi|ndow-p t|
|000004d0| 29 29 5d 20 22 2d 2d 2d | 2d 2d 22 20 5b 22 52 65 |))] "---|--" ["Re|
|000004e0| 76 65 72 74 20 42 75 66 | 66 65 72 22 20 72 65 76 |vert Buf|fer" rev|
|000004f0| 65 72 74 2d 62 75 66 66 | 65 72 20 74 20 6e 69 6c |ert-buff|er t nil|
|00000500| 5d 20 5b 22 44 65 6c 65 | 74 65 20 42 75 66 66 65 |] ["Dele|te Buffe|
|00000510| 72 22 20 6b 69 6c 6c 2d | 74 68 69 73 2d 62 75 66 |r" kill-|this-buf|
|00000520| 66 65 72 20 74 20 6e 69 | 6c 5d 20 22 2d 2d 2d 2d |fer t ni|l] "----|
|00000530| 2d 22 20 5b 22 45 78 69 | 74 20 58 45 6d 61 63 73 |-" ["Exi|t XEmacs|
|00000540| 22 20 73 61 76 65 2d 62 | 75 66 66 65 72 73 2d 6b |" save-b|uffers-k|
|00000550| 69 6c 6c 2d 65 6d 61 63 | 73 20 74 5d 29 20 28 22 |ill-emac|s t]) ("|
|00000560| 45 64 69 74 22 20 3a 66 | 69 6c 74 65 72 20 65 64 |Edit" :f|ilter ed|
|00000570| 69 74 2d 6d 65 6e 75 2d | 66 69 6c 74 65 72 20 5b |it-menu-|filter [|
|00000580| 22 55 6e 64 6f 22 20 61 | 64 76 65 72 74 69 73 65 |"Undo" a|dvertise|
|00000590| 64 2d 75 6e 64 6f 20 74 | 5d 20 5b 22 43 75 74 22 |d-undo t|] ["Cut"|
|000005a0| 20 78 2d 6b 69 6c 6c 2d | 70 72 69 6d 61 72 79 2d | x-kill-|primary-|
|000005b0| 73 65 6c 65 63 74 69 6f | 6e 20 74 5d 20 5b 22 43 |selectio|n t] ["C|
|000005c0| 6f 70 79 22 20 78 2d 63 | 6f 70 79 2d 70 72 69 6d |opy" x-c|opy-prim|
|000005d0| 61 72 79 2d 73 65 6c 65 | 63 74 69 6f 6e 20 74 5d |ary-sele|ction t]|
|000005e0| 20 5b 22 50 61 73 74 65 | 22 20 78 2d 79 61 6e 6b | ["Paste|" x-yank|
|000005f0| 2d 63 6c 69 70 62 6f 61 | 72 64 2d 73 65 6c 65 63 |-clipboa|rd-selec|
|00000600| 74 69 6f 6e 20 74 5d 20 | 5b 22 43 6c 65 61 72 22 |tion t] |["Clear"|
|00000610| 20 78 2d 64 65 6c 65 74 | 65 2d 70 72 69 6d 61 72 | x-delet|e-primar|
|00000620| 79 2d 73 65 6c 65 63 74 | 69 6f 6e 20 74 5d 20 22 |y-select|ion t] "|
|00000630| 2d 2d 2d 2d 22 20 5b 22 | 53 65 61 72 63 68 2e 2e |----" ["|Search..|
|00000640| 2e 22 20 69 73 65 61 72 | 63 68 2d 66 6f 72 77 61 |." isear|ch-forwa|
|00000650| 72 64 20 74 5d 20 5b 22 | 53 65 61 72 63 68 20 42 |rd t] ["|Search B|
|00000660| 61 63 6b 77 61 72 64 2e | 2e 2e 22 20 69 73 65 61 |ackward.|.." isea|
|00000670| 72 63 68 2d 62 61 63 6b | 77 61 72 64 20 74 5d 20 |rch-back|ward t] |
|00000680| 5b 22 52 65 70 6c 61 63 | 65 2e 2e 2e 22 20 71 75 |["Replac|e..." qu|
|00000690| 65 72 79 2d 72 65 70 6c | 61 63 65 20 74 5d 20 22 |ery-repl|ace t] "|
|000006a0| 2d 2d 2d 2d 22 20 5b 22 | 53 65 61 72 63 68 20 28 |----" ["|Search (|
|000006b0| 52 65 67 65 78 70 29 2e | 2e 2e 22 20 69 73 65 61 |Regexp).|.." isea|
|000006c0| 72 63 68 2d 66 6f 72 77 | 61 72 64 2d 72 65 67 65 |rch-forw|ard-rege|
|000006d0| 78 70 20 74 5d 20 5b 22 | 53 65 61 72 63 68 20 42 |xp t] ["|Search B|
|000006e0| 61 63 6b 77 61 72 64 20 | 28 52 65 67 65 78 70 29 |ackward |(Regexp)|
|000006f0| 2e 2e 2e 22 20 69 73 65 | 61 72 63 68 2d 62 61 63 |..." ise|arch-bac|
|00000700| 6b 77 61 72 64 2d 72 65 | 67 65 78 70 20 74 5d 20 |kward-re|gexp t] |
|00000710| 5b 22 52 65 70 6c 61 63 | 65 20 28 52 65 67 65 78 |["Replac|e (Regex|
|00000720| 70 29 2e 2e 2e 22 20 71 | 75 65 72 79 2d 72 65 70 |p)..." q|uery-rep|
|00000730| 6c 61 63 65 2d 72 65 67 | 65 78 70 20 74 5d 20 22 |lace-reg|exp t] "|
|00000740| 2d 2d 2d 2d 22 20 5b 22 | 47 6f 74 6f 20 4c 69 6e |----" ["|Goto Lin|
|00000750| 65 2e 2e 2e 22 20 67 6f | 74 6f 2d 6c 69 6e 65 20 |e..." go|to-line |
|00000760| 74 5d 20 5b 22 57 68 61 | 74 20 4c 69 6e 65 22 20 |t] ["Wha|t Line" |
|00000770| 77 68 61 74 2d 6c 69 6e | 65 20 74 5d 20 22 2d 2d |what-lin|e t] "--|
|00000780| 2d 2d 22 20 5b 22 53 74 | 61 72 74 20 4d 61 63 72 |--" ["St|art Macr|
|00000790| 6f 20 52 65 63 6f 72 64 | 69 6e 67 22 20 73 74 61 |o Record|ing" sta|
|000007a0| 72 74 2d 6b 62 64 2d 6d | 61 63 72 6f 20 28 6e 6f |rt-kbd-m|acro (no|
|000007b0| 74 20 64 65 66 69 6e 69 | 6e 67 2d 6b 62 64 2d 6d |t defini|ng-kbd-m|
|000007c0| 61 63 72 6f 29 5d 20 5b | 22 45 6e 64 20 4d 61 63 |acro)] [|"End Mac|
|000007d0| 72 6f 20 52 65 63 6f 72 | 64 69 6e 67 22 20 65 6e |ro Recor|ding" en|
|000007e0| 64 2d 6b 62 64 2d 6d 61 | 63 72 6f 20 64 65 66 69 |d-kbd-ma|cro defi|
|000007f0| 6e 69 6e 67 2d 6b 62 64 | 2d 6d 61 63 72 6f 5d 20 |ning-kbd|-macro] |
|00000800| 5b 22 45 78 65 63 75 74 | 65 20 4c 61 73 74 20 4d |["Execut|e Last M|
|00000810| 61 63 72 6f 22 20 63 61 | 6c 6c 2d 6c 61 73 74 2d |acro" ca|ll-last-|
|00000820| 6b 62 64 2d 6d 61 63 72 | 6f 20 6c 61 73 74 2d 6b |kbd-macr|o last-k|
|00000830| 62 64 2d 6d 61 63 72 6f | 5d 20 22 2d 2d 2d 2d 22 |bd-macro|] "----"|
|00000840| 20 5b 22 53 68 6f 77 20 | 4d 65 73 73 61 67 65 20 | ["Show |Message |
|00000850| 4c 6f 67 22 20 73 68 6f | 77 2d 6d 65 73 73 61 67 |Log" sho|w-messag|
|00000860| 65 2d 6c 6f 67 20 74 5d | 29 20 28 22 41 70 70 73 |e-log t]|) ("Apps|
|00000870| 22 20 5b 22 52 65 61 64 | 20 4d 61 69 6c 20 28 56 |" ["Read| Mail (V|
|00000880| 4d 29 2e 2e 2e 22 20 76 | 6d 20 74 5d 20 5b 22 52 |M)..." v|m t] ["R|
|00000890| 65 61 64 20 4d 61 69 6c | 20 28 4d 48 29 2e 2e 2e |ead Mail| (MH)...|
|000008a0| 22 20 28 6d 68 2d 72 6d | 61 69 6c 20 74 29 20 74 |" (mh-rm|ail t) t|
|000008b0| 5d 20 5b 22 53 65 6e 64 | 20 6d 61 69 6c 2e 2e 2e |] ["Send| mail...|
|000008c0| 22 20 6d 61 69 6c 20 74 | 5d 20 5b 22 55 73 65 6e |" mail t|] ["Usen|
|000008d0| 65 74 20 4e 65 77 73 22 | 20 67 6e 75 73 20 74 5d |et News"| gnus t]|
|000008e0| 20 5b 22 42 72 6f 77 73 | 65 20 74 68 65 20 57 65 | ["Brows|e the We|
|000008f0| 62 22 20 77 33 20 74 5d | 20 5b 22 47 6f 70 68 65 |b" w3 t]| ["Gophe|
|00000900| 72 22 20 67 6f 70 68 65 | 72 20 74 5d 20 5b 22 48 |r" gophe|r t] ["H|
|00000910| 79 70 65 72 62 6f 6c 65 | 2e 2e 2e 22 20 68 79 70 |yperbole|..." hyp|
|00000920| 65 72 62 6f 6c 65 20 74 | 5d 20 22 2d 2d 2d 2d 22 |erbole t|] "----"|
|00000930| 20 5b 22 53 70 65 6c 6c | 2d 43 68 65 63 6b 20 42 | ["Spell|-Check B|
|00000940| 75 66 66 65 72 22 20 69 | 73 70 65 6c 6c 2d 62 75 |uffer" i|spell-bu|
|00000950| 66 66 65 72 20 74 5d 20 | 5b 22 45 6d 75 6c 61 74 |ffer t] |["Emulat|
|00000960| 65 20 56 49 22 20 76 69 | 70 65 72 2d 6d 6f 64 65 |e VI" vi|per-mode|
|00000970| 20 74 5d 20 22 2d 2d 2d | 2d 22 20 28 22 43 61 6c | t] "---|-" ("Cal|
|00000980| 65 6e 64 61 72 22 20 5b | 22 33 2d 4d 6f 6e 74 68 |endar" [|"3-Month|
|00000990| 20 43 61 6c 65 6e 64 61 | 72 22 20 63 61 6c 65 6e | Calenda|r" calen|
|000009a0| 64 61 72 20 74 5d 20 5b | 22 44 69 61 72 79 22 20 |dar t] [|"Diary" |
|000009b0| 64 69 61 72 79 20 74 5d | 20 5b 22 48 6f 6c 69 64 |diary t]| ["Holid|
|000009c0| 61 79 73 22 20 68 6f 6c | 69 64 61 79 73 20 74 5d |ays" hol|idays t]|
|000009d0| 20 5b 22 50 68 61 73 65 | 73 20 6f 66 20 74 68 65 | ["Phase|s of the|
|000009e0| 20 4d 6f 6f 6e 22 20 70 | 68 61 73 65 73 2d 6f 66 | Moon" p|hases-of|
|000009f0| 2d 6d 6f 6f 6e 20 74 5d | 20 5b 22 53 75 6e 72 69 |-moon t]| ["Sunri|
|00000a00| 73 65 2f 53 75 6e 73 65 | 74 22 20 73 75 6e 72 69 |se/Sunse|t" sunri|
|00000a10| 73 65 2d 73 75 6e 73 65 | 74 20 74 5d 29 20 28 22 |se-sunse|t t]) ("|
|00000a20| 47 61 6d 65 73 22 20 5b | 22 51 75 6f 74 65 20 66 |Games" [|"Quote f|
|00000a30| 72 6f 6d 20 5a 69 70 70 | 79 22 20 79 6f 77 20 74 |rom Zipp|y" yow t|
|00000a40| 5d 20 5b 22 50 73 79 63 | 68 6f 61 6e 61 6c 79 73 |] ["Psyc|hoanalys|
|00000a50| 74 22 20 64 6f 63 74 6f | 72 20 74 5d 20 5b 22 50 |t" docto|r t] ["P|
|00000a60| 73 79 63 68 6f 61 6e 61 | 6c 79 7a 65 20 5a 69 70 |sychoana|lyze Zip|
|00000a70| 70 79 21 22 20 70 73 79 | 63 68 6f 61 6e 61 6c 79 |py!" psy|choanaly|
|00000a80| 7a 65 2d 70 69 6e 68 65 | 61 64 20 74 5d 20 5b 22 |ze-pinhe|ad t] ["|
|00000a90| 52 61 6e 64 6f 6d 20 46 | 6c 61 6d 65 73 22 20 66 |Random F|lames" f|
|00000aa0| 6c 61 6d 65 20 74 5d 20 | 5b 22 44 75 6e 6e 65 74 |lame t] |["Dunnet|
|00000ab0| 20 28 41 64 76 65 6e 74 | 75 72 65 29 22 20 64 75 | (Advent|ure)" du|
|00000ac0| 6e 6e 65 74 20 74 5d 20 | 5b 22 54 6f 77 65 72 73 |nnet t] |["Towers|
|00000ad0| 20 6f 66 20 48 61 6e 6f | 69 22 20 68 61 6e 6f 69 | of Hano|i" hanoi|
|00000ae0| 20 74 5d 20 5b 22 47 61 | 6d 65 20 6f 66 20 4c 69 | t] ["Ga|me of Li|
|00000af0| 66 65 22 20 6c 69 66 65 | 20 74 5d 20 5b 22 4d 75 |fe" life| t] ["Mu|
|00000b00| 6c 74 69 70 6c 69 63 61 | 74 69 6f 6e 20 50 75 7a |ltiplica|tion Puz|
|00000b10| 7a 6c 65 22 20 6d 70 75 | 7a 20 74 5d 29 29 20 28 |zle" mpu|z t])) (|
|00000b20| 22 4f 70 74 69 6f 6e 73 | 22 20 5b 22 52 65 61 64 |"Options|" ["Read|
|00000b30| 20 4f 6e 6c 79 22 20 28 | 74 6f 67 67 6c 65 2d 72 | Only" (|toggle-r|
|00000b40| 65 61 64 2d 6f 6e 6c 79 | 29 20 3a 73 74 79 6c 65 |ead-only|) :style|
|00000b50| 20 74 6f 67 67 6c 65 20 | 3a 73 65 6c 65 63 74 65 | toggle |:selecte|
|00000b60| 64 20 62 75 66 66 65 72 | 2d 72 65 61 64 2d 6f 6e |d buffer|-read-on|
|00000b70| 6c 79 5d 20 28 22 45 64 | 69 74 69 6e 67 20 4f 70 |ly] ("Ed|iting Op|
|00000b80| 74 69 6f 6e 73 22 20 5b | 22 4f 76 65 72 73 74 72 |tions" [|"Overstr|
|00000b90| 69 6b 65 22 20 28 70 72 | 6f 67 6e 20 28 6f 76 65 |ike" (pr|ogn (ove|
|00000ba0| 72 77 72 69 74 65 2d 6d | 6f 64 65 20 63 75 72 72 |rwrite-m|ode curr|
|00000bb0| 65 6e 74 2d 70 72 65 66 | 69 78 2d 61 72 67 29 20 |ent-pref|ix-arg) |
|00000bc0| 28 73 65 74 71 2d 64 65 | 66 61 75 6c 74 20 6f 76 |(setq-de|fault ov|
|00000bd0| 65 72 77 72 69 74 65 2d | 6d 6f 64 65 20 6f 76 65 |erwrite-|mode ove|
|00000be0| 72 77 72 69 74 65 2d 6d | 6f 64 65 29 29 20 3a 73 |rwrite-m|ode)) :s|
|00000bf0| 74 79 6c 65 20 74 6f 67 | 67 6c 65 20 3a 73 65 6c |tyle tog|gle :sel|
|00000c00| 65 63 74 65 64 20 6f 76 | 65 72 77 72 69 74 65 2d |ected ov|erwrite-|
|00000c10| 6d 6f 64 65 5d 20 5b 22 | 43 61 73 65 20 53 65 6e |mode] ["|Case Sen|
|00000c20| 73 69 74 69 76 65 20 53 | 65 61 72 63 68 22 20 28 |sitive S|earch" (|
|00000c30| 70 72 6f 67 6e 20 28 73 | 65 74 71 20 63 61 73 65 |progn (s|etq case|
|00000c40| 2d 66 6f 6c 64 2d 73 65 | 61 72 63 68 20 28 6e 6f |-fold-se|arch (no|
|00000c50| 74 20 63 61 73 65 2d 66 | 6f 6c 64 2d 73 65 61 72 |t case-f|old-sear|
|00000c60| 63 68 29 29 20 28 73 65 | 74 71 2d 64 65 66 61 75 |ch)) (se|tq-defau|
|00000c70| 6c 74 20 63 61 73 65 2d | 66 6f 6c 64 2d 73 65 61 |lt case-|fold-sea|
|00000c80| 72 63 68 20 63 61 73 65 | 2d 66 6f 6c 64 2d 73 65 |rch case|-fold-se|
|00000c90| 61 72 63 68 29 29 20 3a | 73 74 79 6c 65 20 74 6f |arch)) :|style to|
|00000ca0| 67 67 6c 65 20 3a 73 65 | 6c 65 63 74 65 64 20 28 |ggle :se|lected (|
|00000cb0| 6e 6f 74 20 63 61 73 65 | 2d 66 6f 6c 64 2d 73 65 |not case|-fold-se|
|00000cc0| 61 72 63 68 29 5d 20 5b | 22 43 61 73 65 20 4d 61 |arch)] [|"Case Ma|
|00000cd0| 74 63 68 69 6e 67 20 52 | 65 70 6c 61 63 65 22 20 |tching R|eplace" |
|00000ce0| 28 73 65 74 71 20 63 61 | 73 65 2d 72 65 70 6c 61 |(setq ca|se-repla|
|00000cf0| 63 65 20 28 6e 6f 74 20 | 63 61 73 65 2d 72 65 70 |ce (not |case-rep|
|00000d00| 6c 61 63 65 29 29 20 3a | 73 74 79 6c 65 20 74 6f |lace)) :|style to|
|00000d10| 67 67 6c 65 20 3a 73 65 | 6c 65 63 74 65 64 20 63 |ggle :se|lected c|
|00000d20| 61 73 65 2d 72 65 70 6c | 61 63 65 5d 20 5b 22 41 |ase-repl|ace] ["A|
|00000d30| 75 74 6f 20 44 65 6c 65 | 74 65 20 53 65 6c 65 63 |uto Dele|te Selec|
|00000d40| 74 69 6f 6e 22 20 28 69 | 66 20 28 6d 65 6d 71 20 |tion" (i|f (memq |
|00000d50| 27 70 65 6e 64 69 6e 67 | 2d 64 65 6c 65 74 65 2d |'pending|-delete-|
|00000d60| 70 72 65 2d 68 6f 6f 6b | 20 70 72 65 2d 63 6f 6d |pre-hook| pre-com|
|00000d70| 6d 61 6e 64 2d 68 6f 6f | 6b 29 20 28 70 65 6e 64 |mand-hoo|k) (pend|
|00000d80| 69 6e 67 2d 64 65 6c 65 | 74 65 2d 6f 66 66 20 6e |ing-dele|te-off n|
|00000d90| 69 6c 29 20 28 70 65 6e | 64 69 6e 67 2d 64 65 6c |il) (pen|ding-del|
|00000da0| 65 74 65 2d 6f 6e 20 6e | 69 6c 29 29 20 3a 73 74 |ete-on n|il)) :st|
|00000db0| 79 6c 65 20 74 6f 67 67 | 6c 65 20 3a 73 65 6c 65 |yle togg|le :sele|
|00000dc0| 63 74 65 64 20 28 6d 65 | 6d 71 20 27 70 65 6e 64 |cted (me|mq 'pend|
|00000dd0| 69 6e 67 2d 64 65 6c 65 | 74 65 2d 70 72 65 2d 68 |ing-dele|te-pre-h|
|00000de0| 6f 6f 6b 20 70 72 65 2d | 63 6f 6d 6d 61 6e 64 2d |ook pre-|command-|
|00000df0| 68 6f 6f 6b 29 5d 20 5b | 22 41 63 74 69 76 65 20 |hook)] [|"Active |
|00000e00| 52 65 67 69 6f 6e 73 22 | 20 28 73 65 74 71 20 7a |Regions"| (setq z|
|00000e10| 6d 61 63 73 2d 72 65 67 | 69 6f 6e 73 20 28 6e 6f |macs-reg|ions (no|
|00000e20| 74 20 7a 6d 61 63 73 2d | 72 65 67 69 6f 6e 73 29 |t zmacs-|regions)|
|00000e30| 29 20 3a 73 74 79 6c 65 | 20 74 6f 67 67 6c 65 20 |) :style| toggle |
|00000e40| 3a 73 65 6c 65 63 74 65 | 64 20 7a 6d 61 63 73 2d |:selecte|d zmacs-|
|00000e50| 72 65 67 69 6f 6e 73 5d | 20 5b 22 4d 6f 75 73 65 |regions]| ["Mouse|
|00000e60| 20 50 61 73 74 65 20 41 | 74 20 54 65 78 74 20 43 | Paste A|t Text C|
|00000e70| 75 72 73 6f 72 22 20 28 | 73 65 74 71 20 6d 6f 75 |ursor" (|setq mou|
|00000e80| 73 65 2d 79 61 6e 6b 2d | 61 74 2d 70 6f 69 6e 74 |se-yank-|at-point|
|00000e90| 20 28 6e 6f 74 20 6d 6f | 75 73 65 2d 79 61 6e 6b | (not mo|use-yank|
|00000ea0| 2d 61 74 2d 70 6f 69 6e | 74 29 29 20 3a 73 74 79 |-at-poin|t)) :sty|
|00000eb0| 6c 65 20 74 6f 67 67 6c | 65 20 3a 73 65 6c 65 63 |le toggl|e :selec|
|00000ec0| 74 65 64 20 6d 6f 75 73 | 65 2d 79 61 6e 6b 2d 61 |ted mous|e-yank-a|
|00000ed0| 74 2d 70 6f 69 6e 74 5d | 29 20 28 22 47 65 6e 65 |t-point]|) ("Gene|
|00000ee0| 72 61 6c 20 4f 70 74 69 | 6f 6e 73 22 20 5b 22 54 |ral Opti|ons" ["T|
|00000ef0| 65 61 63 68 20 45 78 74 | 65 6e 64 65 64 20 43 6f |each Ext|ended Co|
|00000f00| 6d 6d 61 6e 64 73 22 20 | 28 73 65 74 71 20 74 65 |mmands" |(setq te|
|00000f10| 61 63 68 2d 65 78 74 65 | 6e 64 65 64 2d 63 6f 6d |ach-exte|nded-com|
|00000f20| 6d 61 6e 64 73 2d 70 20 | 28 6e 6f 74 20 74 65 61 |mands-p |(not tea|
|00000f30| 63 68 2d 65 78 74 65 6e | 64 65 64 2d 63 6f 6d 6d |ch-exten|ded-comm|
|00000f40| 61 6e 64 73 2d 70 29 29 | 20 3a 73 74 79 6c 65 20 |ands-p))| :style |
|00000f50| 74 6f 67 67 6c 65 20 3a | 73 65 6c 65 63 74 65 64 |toggle :|selected|
|00000f60| 20 74 65 61 63 68 2d 65 | 78 74 65 6e 64 65 64 2d | teach-e|xtended-|
|00000f70| 63 6f 6d 6d 61 6e 64 73 | 2d 70 5d 20 5b 22 44 65 |commands|-p] ["De|
|00000f80| 62 75 67 20 4f 6e 20 45 | 72 72 6f 72 22 20 28 73 |bug On E|rror" (s|
|00000f90| 65 74 71 20 64 65 62 75 | 67 2d 6f 6e 2d 65 72 72 |etq debu|g-on-err|
|00000fa0| 6f 72 20 28 6e 6f 74 20 | 64 65 62 75 67 2d 6f 6e |or (not |debug-on|
|00000fb0| 2d 65 72 72 6f 72 29 29 | 20 3a 73 74 79 6c 65 20 |-error))| :style |
|00000fc0| 74 6f 67 67 6c 65 20 3a | 73 65 6c 65 63 74 65 64 |toggle :|selected|
|00000fd0| 20 64 65 62 75 67 2d 6f | 6e 2d 65 72 72 6f 72 5d | debug-o|n-error]|
|00000fe0| 20 5b 22 44 65 62 75 67 | 20 4f 6e 20 51 75 69 74 | ["Debug| On Quit|
|00000ff0| 22 20 28 73 65 74 71 20 | 64 65 62 75 67 2d 6f 6e |" (setq |debug-on|
|00001000| 2d 71 75 69 74 20 28 6e | 6f 74 20 64 65 62 75 67 |-quit (n|ot debug|
|00001010| 2d 6f 6e 2d 71 75 69 74 | 29 29 20 3a 73 74 79 6c |-on-quit|)) :styl|
|00001020| 65 20 74 6f 67 67 6c 65 | 20 3a 73 65 6c 65 63 74 |e toggle| :select|
|00001030| 65 64 20 64 65 62 75 67 | 2d 6f 6e 2d 71 75 69 74 |ed debug|-on-quit|
|00001040| 5d 29 20 28 22 5c 22 4f | 74 68 65 72 20 57 69 6e |]) ("\"O|ther Win|
|00001050| 64 6f 77 5c 22 20 4c 6f | 63 61 74 69 6f 6e 22 20 |dow\" Lo|cation" |
|00001060| 5b 22 41 6c 77 61 79 73 | 20 69 6e 20 53 61 6d 65 |["Always| in Same|
|00001070| 20 46 72 61 6d 65 22 20 | 28 73 65 74 71 20 67 65 | Frame" |(setq ge|
|00001080| 74 2d 66 72 61 6d 65 2d | 66 6f 72 2d 62 75 66 66 |t-frame-|for-buff|
|00001090| 65 72 2d 64 65 66 61 75 | 6c 74 2d 69 6e 73 74 61 |er-defau|lt-insta|
|000010a0| 6e 63 65 2d 6c 69 6d 69 | 74 20 6e 69 6c 29 20 3a |nce-limi|t nil) :|
|000010b0| 73 74 79 6c 65 20 72 61 | 64 69 6f 20 3a 73 65 6c |style ra|dio :sel|
|000010c0| 65 63 74 65 64 20 28 6e | 75 6c 6c 20 67 65 74 2d |ected (n|ull get-|
|000010d0| 66 72 61 6d 65 2d 66 6f | 72 2d 62 75 66 66 65 72 |frame-fo|r-buffer|
|000010e0| 2d 64 65 66 61 75 6c 74 | 2d 69 6e 73 74 61 6e 63 |-default|-instanc|
|000010f0| 65 2d 6c 69 6d 69 74 29 | 5d 20 5b 22 4f 74 68 65 |e-limit)|] ["Othe|
|00001100| 72 20 46 72 61 6d 65 20 | 28 32 20 46 72 61 6d 65 |r Frame |(2 Frame|
|00001110| 73 20 4d 61 78 29 22 20 | 28 73 65 74 71 20 67 65 |s Max)" |(setq ge|
|00001120| 74 2d 66 72 61 6d 65 2d | 66 6f 72 2d 62 75 66 66 |t-frame-|for-buff|
|00001130| 65 72 2d 64 65 66 61 75 | 6c 74 2d 69 6e 73 74 61 |er-defau|lt-insta|
|00001140| 6e 63 65 2d 6c 69 6d 69 | 74 20 32 29 20 3a 73 74 |nce-limi|t 2) :st|
|00001150| 79 6c 65 20 72 61 64 69 | 6f 20 3a 73 65 6c 65 63 |yle radi|o :selec|
|00001160| 74 65 64 20 28 65 71 20 | 32 20 67 65 74 2d 66 72 |ted (eq |2 get-fr|
|00001170| 61 6d 65 2d 66 6f 72 2d | 62 75 66 66 65 72 2d 64 |ame-for-|buffer-d|
|00001180| 65 66 61 75 6c 74 2d 69 | 6e 73 74 61 6e 63 65 2d |efault-i|nstance-|
|00001190| 6c 69 6d 69 74 29 5d 20 | 5b 22 4f 74 68 65 72 20 |limit)] |["Other |
|000011a0| 46 72 61 6d 65 20 28 33 | 20 46 72 61 6d 65 73 20 |Frame (3| Frames |
|000011b0| 4d 61 78 29 22 20 28 73 | 65 74 71 20 67 65 74 2d |Max)" (s|etq get-|
|000011c0| 66 72 61 6d 65 2d 66 6f | 72 2d 62 75 66 66 65 72 |frame-fo|r-buffer|
|000011d0| 2d 64 65 66 61 75 6c 74 | 2d 69 6e 73 74 61 6e 63 |-default|-instanc|
|000011e0| 65 2d 6c 69 6d 69 74 20 | 33 29 20 3a 73 74 79 6c |e-limit |3) :styl|
|000011f0| 65 20 72 61 64 69 6f 20 | 3a 73 65 6c 65 63 74 65 |e radio |:selecte|
|00001200| 64 20 28 65 71 20 33 20 | 67 65 74 2d 66 72 61 6d |d (eq 3 |get-fram|
|00001210| 65 2d 66 6f 72 2d 62 75 | 66 66 65 72 2d 64 65 66 |e-for-bu|ffer-def|
|00001220| 61 75 6c 74 2d 69 6e 73 | 74 61 6e 63 65 2d 6c 69 |ault-ins|tance-li|
|00001230| 6d 69 74 29 5d 20 5b 22 | 4f 74 68 65 72 20 46 72 |mit)] ["|Other Fr|
|00001240| 61 6d 65 20 28 34 20 46 | 72 61 6d 65 73 20 4d 61 |ame (4 F|rames Ma|
|00001250| 78 29 22 20 28 73 65 74 | 71 20 67 65 74 2d 66 72 |x)" (set|q get-fr|
|00001260| 61 6d 65 2d 66 6f 72 2d | 62 75 66 66 65 72 2d 64 |ame-for-|buffer-d|
|00001270| 65 66 61 75 6c 74 2d 69 | 6e 73 74 61 6e 63 65 2d |efault-i|nstance-|
|00001280| 6c 69 6d 69 74 20 34 29 | 20 3a 73 74 79 6c 65 20 |limit 4)| :style |
|00001290| 72 61 64 69 6f 20 3a 73 | 65 6c 65 63 74 65 64 20 |radio :s|elected |
|000012a0| 28 65 71 20 34 20 67 65 | 74 2d 66 72 61 6d 65 2d |(eq 4 ge|t-frame-|
|000012b0| 66 6f 72 2d 62 75 66 66 | 65 72 2d 64 65 66 61 75 |for-buff|er-defau|
|000012c0| 6c 74 2d 69 6e 73 74 61 | 6e 63 65 2d 6c 69 6d 69 |lt-insta|nce-limi|
|000012d0| 74 29 5d 20 5b 22 4f 74 | 68 65 72 20 46 72 61 6d |t)] ["Ot|her Fram|
|000012e0| 65 20 28 35 20 46 72 61 | 6d 65 73 20 4d 61 78 29 |e (5 Fra|mes Max)|
|000012f0| 22 20 28 73 65 74 71 20 | 67 65 74 2d 66 72 61 6d |" (setq |get-fram|
|00001300| 65 2d 66 6f 72 2d 62 75 | 66 66 65 72 2d 64 65 66 |e-for-bu|ffer-def|
|00001310| 61 75 6c 74 2d 69 6e 73 | 74 61 6e 63 65 2d 6c 69 |ault-ins|tance-li|
|00001320| 6d 69 74 20 35 29 20 3a | 73 74 79 6c 65 20 72 61 |mit 5) :|style ra|
|00001330| 64 69 6f 20 3a 73 65 6c | 65 63 74 65 64 20 28 65 |dio :sel|ected (e|
|00001340| 71 20 35 20 67 65 74 2d | 66 72 61 6d 65 2d 66 6f |q 5 get-|frame-fo|
|00001350| 72 2d 62 75 66 66 65 72 | 2d 64 65 66 61 75 6c 74 |r-buffer|-default|
|00001360| 2d 69 6e 73 74 61 6e 63 | 65 2d 6c 69 6d 69 74 29 |-instanc|e-limit)|
|00001370| 5d 20 5b 22 41 6c 77 61 | 79 73 20 43 72 65 61 74 |] ["Alwa|ys Creat|
|00001380| 65 20 4e 65 77 20 46 72 | 61 6d 65 22 20 28 73 65 |e New Fr|ame" (se|
|00001390| 74 71 20 67 65 74 2d 66 | 72 61 6d 65 2d 66 6f 72 |tq get-f|rame-for|
|000013a0| 2d 62 75 66 66 65 72 2d | 64 65 66 61 75 6c 74 2d |-buffer-|default-|
|000013b0| 69 6e 73 74 61 6e 63 65 | 2d 6c 69 6d 69 74 20 30 |instance|-limit 0|
|000013c0| 29 20 3a 73 74 79 6c 65 | 20 72 61 64 69 6f 20 3a |) :style| radio :|
|000013d0| 73 65 6c 65 63 74 65 64 | 20 28 65 71 20 30 20 67 |selected| (eq 0 g|
|000013e0| 65 74 2d 66 72 61 6d 65 | 2d 66 6f 72 2d 62 75 66 |et-frame|-for-buf|
|000013f0| 66 65 72 2d 64 65 66 61 | 75 6c 74 2d 69 6e 73 74 |fer-defa|ult-inst|
|00001400| 61 6e 63 65 2d 6c 69 6d | 69 74 29 5d 20 22 2d 2d |ance-lim|it)] "--|
|00001410| 2d 2d 2d 22 20 5b 22 54 | 65 6d 70 20 42 75 66 66 |---" ["T|emp Buff|
|00001420| 65 72 73 20 41 6c 77 61 | 79 73 20 69 6e 20 53 61 |ers Alwa|ys in Sa|
|00001430| 6d 65 20 46 72 61 6d 65 | 22 20 28 73 65 74 71 20 |me Frame|" (setq |
|00001440| 74 65 6d 70 2d 62 75 66 | 66 65 72 2d 73 68 6f 77 |temp-buf|fer-show|
|00001450| 2d 66 75 6e 63 74 69 6f | 6e 20 27 73 68 6f 77 2d |-functio|n 'show-|
|00001460| 74 65 6d 70 2d 62 75 66 | 66 65 72 2d 69 6e 2d 63 |temp-buf|fer-in-c|
|00001470| 75 72 72 65 6e 74 2d 66 | 72 61 6d 65 29 20 3a 73 |urrent-f|rame) :s|
|00001480| 74 79 6c 65 20 72 61 64 | 69 6f 20 3a 73 65 6c 65 |tyle rad|io :sele|
|00001490| 63 74 65 64 20 28 65 71 | 20 74 65 6d 70 2d 62 75 |cted (eq| temp-bu|
|000014a0| 66 66 65 72 2d 73 68 6f | 77 2d 66 75 6e 63 74 69 |ffer-sho|w-functi|
|000014b0| 6f 6e 20 27 73 68 6f 77 | 2d 74 65 6d 70 2d 62 75 |on 'show|-temp-bu|
|000014c0| 66 66 65 72 2d 69 6e 2d | 63 75 72 72 65 6e 74 2d |ffer-in-|current-|
|000014d0| 66 72 61 6d 65 29 5d 20 | 5b 22 54 65 6d 70 20 42 |frame)] |["Temp B|
|000014e0| 75 66 66 65 72 73 20 4c | 69 6b 65 20 4f 74 68 65 |uffers L|ike Othe|
|000014f0| 72 20 42 75 66 66 65 72 | 73 22 20 28 73 65 74 71 |r Buffer|s" (setq|
|00001500| 20 74 65 6d 70 2d 62 75 | 66 66 65 72 2d 73 68 6f | temp-bu|ffer-sho|
|00001510| 77 2d 66 75 6e 63 74 69 | 6f 6e 20 6e 69 6c 29 20 |w-functi|on nil) |
|00001520| 3a 73 74 79 6c 65 20 72 | 61 64 69 6f 20 3a 73 65 |:style r|adio :se|
|00001530| 6c 65 63 74 65 64 20 28 | 6e 75 6c 6c 20 74 65 6d |lected (|null tem|
|00001540| 70 2d 62 75 66 66 65 72 | 2d 73 68 6f 77 2d 66 75 |p-buffer|-show-fu|
|00001550| 6e 63 74 69 6f 6e 29 5d | 29 20 22 2d 2d 2d 2d 2d |nction)]|) "-----|
|00001560| 22 20 28 22 53 79 6e 74 | 61 78 20 48 69 67 68 6c |" ("Synt|ax Highl|
|00001570| 69 67 68 74 69 6e 67 22 | 20 5b 22 4e 6f 6e 65 22 |ighting"| ["None"|
|00001580| 20 28 70 72 6f 67 6e 20 | 28 66 6f 6e 74 2d 6c 6f | (progn |(font-lo|
|00001590| 63 6b 2d 6d 6f 64 65 20 | 30 29 20 28 66 61 73 74 |ck-mode |0) (fast|
|000015a0| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 20 30 29 29 20 3a |-lock-mo|de 0)) :|
|000015b0| 73 74 79 6c 65 20 72 61 | 64 69 6f 20 3a 73 65 6c |style ra|dio :sel|
|000015c0| 65 63 74 65 64 20 28 6e | 75 6c 6c 20 66 6f 6e 74 |ected (n|ull font|
|000015d0| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 29 5d 20 5b 22 46 |-lock-mo|de)] ["F|
|000015e0| 6f 6e 74 73 22 20 28 70 | 72 6f 67 6e 20 28 72 65 |onts" (p|rogn (re|
|000015f0| 71 75 69 72 65 20 27 66 | 6f 6e 74 2d 6c 6f 63 6b |quire 'f|ont-lock|
|00001600| 29 20 28 66 6f 6e 74 2d | 6c 6f 63 6b 2d 75 73 65 |) (font-|lock-use|
|00001610| 2d 64 65 66 61 75 6c 74 | 2d 66 6f 6e 74 73 29 20 |-default|-fonts) |
|00001620| 28 73 65 74 71 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d |(setq fo|nt-lock-|
|00001630| 75 73 65 2d 66 6f 6e 74 | 73 20 74 20 66 6f 6e 74 |use-font|s t font|
|00001640| 2d 6c 6f 63 6b 2d 75 73 | 65 2d 63 6f 6c 6f 72 73 |-lock-us|e-colors|
|00001650| 20 6e 69 6c 29 20 28 66 | 6f 6e 74 2d 6c 6f 63 6b | nil) (f|ont-lock|
|00001660| 2d 6d 6f 64 65 20 31 29 | 29 20 3a 73 74 79 6c 65 |-mode 1)|) :style|
|00001670| 20 72 61 64 69 6f 20 3a | 73 65 6c 65 63 74 65 64 | radio :|selected|
|00001680| 20 28 61 6e 64 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d | (and fo|nt-lock-|
|00001690| 6d 6f 64 65 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 75 |mode fon|t-lock-u|
|000016a0| 73 65 2d 66 6f 6e 74 73 | 29 5d 20 5b 22 43 6f 6c |se-fonts|)] ["Col|
|000016b0| 6f 72 73 22 20 28 70 72 | 6f 67 6e 20 28 72 65 71 |ors" (pr|ogn (req|
|000016c0| 75 69 72 65 20 27 66 6f | 6e 74 2d 6c 6f 63 6b 29 |uire 'fo|nt-lock)|
|000016d0| 20 28 66 6f 6e 74 2d 6c | 6f 63 6b 2d 75 73 65 2d | (font-l|ock-use-|
|000016e0| 64 65 66 61 75 6c 74 2d | 63 6f 6c 6f 72 73 29 20 |default-|colors) |
|000016f0| 28 73 65 74 71 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d |(setq fo|nt-lock-|
|00001700| 75 73 65 2d 63 6f 6c 6f | 72 73 20 74 20 66 6f 6e |use-colo|rs t fon|
|00001710| 74 2d 6c 6f 63 6b 2d 75 | 73 65 2d 66 6f 6e 74 73 |t-lock-u|se-fonts|
|00001720| 20 6e 69 6c 29 20 28 66 | 6f 6e 74 2d 6c 6f 63 6b | nil) (f|ont-lock|
|00001730| 2d 6d 6f 64 65 20 31 29 | 29 20 3a 73 74 79 6c 65 |-mode 1)|) :style|
|00001740| 20 72 61 64 69 6f 20 3a | 73 65 6c 65 63 74 65 64 | radio :|selected|
|00001750| 20 28 61 6e 64 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d | (and fo|nt-lock-|
|00001760| 6d 6f 64 65 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 75 |mode fon|t-lock-u|
|00001770| 73 65 2d 63 6f 6c 6f 72 | 73 29 5d 20 22 2d 2d 2d |se-color|s)] "---|
|00001780| 2d 2d 22 20 5b 22 4c 65 | 73 73 22 20 28 70 72 6f |--" ["Le|ss" (pro|
|00001790| 67 6e 20 28 72 65 71 75 | 69 72 65 20 27 66 6f 6e |gn (requ|ire 'fon|
|000017a0| 74 2d 6c 6f 63 6b 29 20 | 28 66 6f 6e 74 2d 6c 6f |t-lock) |(font-lo|
|000017b0| 63 6b 2d 75 73 65 2d 64 | 65 66 61 75 6c 74 2d 6d |ck-use-d|efault-m|
|000017c0| 69 6e 69 6d 61 6c 2d 64 | 65 63 6f 72 61 74 69 6f |inimal-d|ecoratio|
|000017d0| 6e 29 20 28 73 65 74 71 | 20 66 6f 6e 74 2d 6c 6f |n) (setq| font-lo|
|000017e0| 63 6b 2d 75 73 65 2d 6d | 61 78 69 6d 61 6c 2d 64 |ck-use-m|aximal-d|
|000017f0| 65 63 6f 72 61 74 69 6f | 6e 20 6e 69 6c 29 20 28 |ecoratio|n nil) (|
|00001800| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 6d 6f 64 65 20 30 |font-loc|k-mode 0|
|00001810| 29 20 28 66 6f 6e 74 2d | 6c 6f 63 6b 2d 6d 6f 64 |) (font-|lock-mod|
|00001820| 65 20 31 29 29 20 3a 73 | 74 79 6c 65 20 72 61 64 |e 1)) :s|tyle rad|
|00001830| 69 6f 20 3a 73 65 6c 65 | 63 74 65 64 20 28 61 6e |io :sele|cted (an|
|00001840| 64 20 66 6f 6e 74 2d 6c | 6f 63 6b 2d 6d 6f 64 65 |d font-l|ock-mode|
|00001850| 20 28 6e 6f 74 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d | (not fo|nt-lock-|
|00001860| 75 73 65 2d 6d 61 78 69 | 6d 61 6c 2d 64 65 63 6f |use-maxi|mal-deco|
|00001870| 72 61 74 69 6f 6e 29 29 | 5d 20 5b 22 4d 6f 72 65 |ration))|] ["More|
|00001880| 22 20 28 70 72 6f 67 6e | 20 28 72 65 71 75 69 72 |" (progn| (requir|
|00001890| 65 20 27 66 6f 6e 74 2d | 6c 6f 63 6b 29 20 28 66 |e 'font-|lock) (f|
|000018a0| 6f 6e 74 2d 6c 6f 63 6b | 2d 75 73 65 2d 64 65 66 |ont-lock|-use-def|
|000018b0| 61 75 6c 74 2d 6d 61 78 | 69 6d 61 6c 2d 64 65 63 |ault-max|imal-dec|
|000018c0| 6f 72 61 74 69 6f 6e 29 | 20 28 73 65 74 71 20 66 |oration)| (setq f|
|000018d0| 6f 6e 74 2d 6c 6f 63 6b | 2d 75 73 65 2d 6d 61 78 |ont-lock|-use-max|
|000018e0| 69 6d 61 6c 2d 64 65 63 | 6f 72 61 74 69 6f 6e 20 |imal-dec|oration |
|000018f0| 74 29 20 28 66 6f 6e 74 | 2d 6c 6f 63 6b 2d 6d 6f |t) (font|-lock-mo|
|00001900| 64 65 20 30 29 20 28 66 | 6f 6e 74 2d 6c 6f 63 6b |de 0) (f|ont-lock|
|00001910| 2d 6d 6f 64 65 20 31 29 | 29 20 3a 73 74 79 6c 65 |-mode 1)|) :style|
|00001920| 20 72 61 64 69 6f 20 3a | 73 65 6c 65 63 74 65 64 | radio :|selected|
|00001930| 20 28 61 6e 64 20 66 6f | 6e 74 2d 6c 6f 63 6b 2d | (and fo|nt-lock-|
|00001940| 6d 6f 64 65 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 75 |mode fon|t-lock-u|
|00001950| 73 65 2d 6d 61 78 69 6d | 61 6c 2d 64 65 63 6f 72 |se-maxim|al-decor|
|00001960| 61 74 69 6f 6e 29 5d 20 | 22 2d 2d 2d 2d 2d 22 20 |ation)] |"-----" |
|00001970| 5b 22 46 61 73 74 22 20 | 28 70 72 6f 67 6e 20 28 |["Fast" |(progn (|
|00001980| 72 65 71 75 69 72 65 20 | 27 66 61 73 74 2d 6c 6f |require |'fast-lo|
|00001990| 63 6b 29 20 28 69 66 20 | 66 61 73 74 2d 6c 6f 63 |ck) (if |fast-loc|
|000019a0| 6b 2d 6d 6f 64 65 20 28 | 70 72 6f 67 6e 20 28 66 |k-mode (|progn (f|
|000019b0| 61 73 74 2d 6c 6f 63 6b | 2d 6d 6f 64 65 20 30 29 |ast-lock|-mode 0)|
|000019c0| 20 28 72 65 64 72 61 77 | 2d 6d 6f 64 65 6c 69 6e | (redraw|-modelin|
|000019d0| 65 29 29 20 28 69 66 20 | 66 6f 6e 74 2d 6c 6f 63 |e)) (if |font-loc|
|000019e0| 6b 2d 6d 6f 64 65 20 28 | 70 72 6f 67 6e 20 28 66 |k-mode (|progn (f|
|000019f0| 61 73 74 2d 6c 6f 63 6b | 2d 6d 6f 64 65 20 31 29 |ast-lock|-mode 1)|
|00001a00| 20 28 72 65 64 72 61 77 | 2d 6d 6f 64 65 6c 69 6e | (redraw|-modelin|
|00001a10| 65 29 29 29 29 29 20 3a | 61 63 74 69 76 65 20 66 |e))))) :|active f|
|00001a20| 6f 6e 74 2d 6c 6f 63 6b | 2d 6d 6f 64 65 20 3a 73 |ont-lock|-mode :s|
|00001a30| 74 79 6c 65 20 74 6f 67 | 67 6c 65 20 3a 73 65 6c |tyle tog|gle :sel|
|00001a40| 65 63 74 65 64 20 66 61 | 73 74 2d 6c 6f 63 6b 2d |ected fa|st-lock-|
|00001a50| 6d 6f 64 65 5d 20 5b 22 | 41 75 74 6f 2d 46 6f 6e |mode] ["|Auto-Fon|
|00001a60| 74 69 66 79 22 20 28 69 | 66 20 28 6e 6f 74 20 28 |tify" (i|f (not (|
|00001a70| 66 65 61 74 75 72 65 70 | 20 27 66 6f 6e 74 2d 6c |featurep| 'font-l|
|00001a80| 6f 63 6b 29 29 20 28 70 | 72 6f 67 6e 20 28 73 65 |ock)) (p|rogn (se|
|00001a90| 74 71 20 66 6f 6e 74 2d | 6c 6f 63 6b 2d 61 75 74 |tq font-|lock-aut|
|00001aa0| 6f 2d 66 6f 6e 74 69 66 | 79 20 74 29 20 28 72 65 |o-fontif|y t) (re|
|00001ab0| 71 75 69 72 65 20 27 66 | 6f 6e 74 2d 6c 6f 63 6b |quire 'f|ont-lock|
|00001ac0| 29 29 20 28 73 65 74 71 | 20 66 6f 6e 74 2d 6c 6f |)) (setq| font-lo|
|00001ad0| 63 6b 2d 61 75 74 6f 2d | 66 6f 6e 74 69 66 79 20 |ck-auto-|fontify |
|00001ae0| 28 6e 6f 74 20 66 6f 6e | 74 2d 6c 6f 63 6b 2d 61 |(not fon|t-lock-a|
|00001af0| 75 74 6f 2d 66 6f 6e 74 | 69 66 79 29 29 29 20 3a |uto-font|ify))) :|
|00001b00| 73 74 79 6c 65 20 74 6f | 67 67 6c 65 20 3a 73 65 |style to|ggle :se|
|00001b10| 6c 65 63 74 65 64 20 28 | 61 6e 64 20 28 66 65 61 |lected (|and (fea|
|00001b20| 74 75 72 65 70 20 27 66 | 6f 6e 74 2d 6c 6f 63 6b |turep 'f|ont-lock|
|00001b30| 29 20 66 6f 6e 74 2d 6c | 6f 63 6b 2d 61 75 74 6f |) font-l|ock-auto|
|00001b40| 2d 66 6f 6e 74 69 66 79 | 29 5d 29 20 28 22 50 61 |-fontify|)]) ("Pa|
|00001b50| 72 65 6e 20 48 69 67 68 | 6c 69 67 68 74 69 6e 67 |ren High|lighting|
|00001b60| 22 20 5b 22 4e 6f 6e 65 | 22 20 28 70 61 72 65 6e |" ["None|" (paren|
|00001b70| 2d 73 65 74 2d 6d 6f 64 | 65 20 2d 31 29 20 3a 73 |-set-mod|e -1) :s|
|00001b80| 74 79 6c 65 20 72 61 64 | 69 6f 20 3a 73 65 6c 65 |tyle rad|io :sele|
|00001b90| 63 74 65 64 20 28 6e 6f | 74 20 70 61 72 65 6e 2d |cted (no|t paren-|
|00001ba0| 6d 6f 64 65 29 5d 20 5b | 22 42 6c 69 6e 6b 69 6e |mode)] [|"Blinkin|
|00001bb0| 67 20 50 61 72 65 6e 22 | 20 28 70 61 72 65 6e 2d |g Paren"| (paren-|
|00001bc0| 73 65 74 2d 6d 6f 64 65 | 20 27 62 6c 69 6e 6b 2d |set-mode| 'blink-|
|00001bd0| 70 61 72 65 6e 29 20 3a | 73 74 79 6c 65 20 72 61 |paren) :|style ra|
|00001be0| 64 69 6f 20 3a 73 65 6c | 65 63 74 65 64 20 28 65 |dio :sel|ected (e|
|00001bf0| 71 20 70 61 72 65 6e 2d | 6d 6f 64 65 20 27 62 6c |q paren-|mode 'bl|
|00001c00| 69 6e 6b 2d 70 61 72 65 | 6e 29 5d 20 5b 22 53 74 |ink-pare|n)] ["St|
|00001c10| 65 61 64 79 20 50 61 72 | 65 6e 22 20 28 70 61 72 |eady Par|en" (par|
|00001c20| 65 6e 2d 73 65 74 2d 6d | 6f 64 65 20 27 70 61 72 |en-set-m|ode 'par|
|00001c30| 65 6e 29 20 3a 73 74 79 | 6c 65 20 72 61 64 69 6f |en) :sty|le radio|
|00001c40| 20 3a 73 65 6c 65 63 74 | 65 64 20 28 65 71 20 70 | :select|ed (eq p|
|00001c50| 61 72 65 6e 2d 6d 6f 64 | 65 20 27 70 61 72 65 6e |aren-mod|e 'paren|
|00001c60| 29 5d 20 5b 22 45 78 70 | 72 65 73 73 69 6f 6e 22 |)] ["Exp|ression"|
|00001c70| 20 28 70 61 72 65 6e 2d | 73 65 74 2d 6d 6f 64 65 | (paren-|set-mode|
|00001c80| 20 27 73 65 78 70 29 20 | 3a 73 74 79 6c 65 20 72 | 'sexp) |:style r|
|00001c90| 61 64 69 6f 20 3a 73 65 | 6c 65 63 74 65 64 20 28 |adio :se|lected (|
|00001ca0| 65 71 20 70 61 72 65 6e | 2d 6d 6f 64 65 20 27 73 |eq paren|-mode 's|
|00001cb0| 65 78 70 29 5d 29 20 22 | 2d 2d 2d 2d 2d 22 20 28 |exp)]) "|-----" (|
|00001cc0| 22 46 72 61 6d 65 20 41 | 70 70 65 61 72 61 6e 63 |"Frame A|ppearanc|
|00001cd0| 65 22 20 5b 22 53 63 72 | 6f 6c 6c 62 61 72 73 22 |e" ["Scr|ollbars"|
|00001ce0| 20 28 69 66 20 28 3d 20 | 28 73 70 65 63 69 66 69 | (if (= |(specifi|
|00001cf0| 65 72 2d 69 6e 73 74 61 | 6e 63 65 20 73 63 72 6f |er-insta|nce scro|
|00001d00| 6c 6c 62 61 72 2d 77 69 | 64 74 68 29 20 30 29 20 |llbar-wi|dth) 0) |
|00001d10| 28 70 72 6f 67 6e 20 28 | 73 65 74 2d 73 70 65 63 |(progn (|set-spec|
|00001d20| 69 66 69 65 72 20 73 63 | 72 6f 6c 6c 62 61 72 2d |ifier sc|rollbar-|
|00001d30| 77 69 64 74 68 20 31 35 | 29 20 28 73 65 74 2d 73 |width 15|) (set-s|
|00001d40| 70 65 63 69 66 69 65 72 | 20 73 63 72 6f 6c 6c 62 |pecifier| scrollb|
|00001d50| 61 72 2d 68 65 69 67 68 | 74 20 31 35 29 29 20 28 |ar-heigh|t 15)) (|
|00001d60| 73 65 74 2d 73 70 65 63 | 69 66 69 65 72 20 73 63 |set-spec|ifier sc|
|00001d70| 72 6f 6c 6c 62 61 72 2d | 77 69 64 74 68 20 30 29 |rollbar-|width 0)|
|00001d80| 20 28 73 65 74 2d 73 70 | 65 63 69 66 69 65 72 20 | (set-sp|ecifier |
|00001d90| 73 63 72 6f 6c 6c 62 61 | 72 2d 68 65 69 67 68 74 |scrollba|r-height|
|00001da0| 20 30 29 29 20 3a 73 74 | 79 6c 65 20 74 6f 67 67 | 0)) :st|yle togg|
|00001db0| 6c 65 20 3a 73 65 6c 65 | 63 74 65 64 20 28 3e 20 |le :sele|cted (> |
|00001dc0| 28 73 70 65 63 69 66 69 | 65 72 2d 69 6e 73 74 61 |(specifi|er-insta|
|00001dd0| 6e 63 65 20 73 63 72 6f | 6c 6c 62 61 72 2d 77 69 |nce scro|llbar-wi|
|00001de0| 64 74 68 29 20 30 29 5d | 20 5b 22 33 44 20 4d 6f |dth) 0)]| ["3D Mo|
|00001df0| 64 65 6c 69 6e 65 22 20 | 28 70 72 6f 67 6e 20 28 |deline" |(progn (|
|00001e00| 69 66 20 28 7a 65 72 6f | 70 20 28 73 70 65 63 69 |if (zero|p (speci|
|00001e10| 66 69 65 72 2d 69 6e 73 | 74 61 6e 63 65 20 6d 6f |fier-ins|tance mo|
|00001e20| 64 65 6c 69 6e 65 2d 73 | 68 61 64 6f 77 2d 74 68 |deline-s|hadow-th|
|00001e30| 69 63 6b 6e 65 73 73 29 | 29 20 28 73 65 74 2d 73 |ickness)|) (set-s|
|00001e40| 70 65 63 69 66 69 65 72 | 20 6d 6f 64 65 6c 69 6e |pecifier| modelin|
|00001e50| 65 2d 73 68 61 64 6f 77 | 2d 74 68 69 63 6b 6e 65 |e-shadow|-thickne|
|00001e60| 73 73 20 32 29 20 28 73 | 65 74 2d 73 70 65 63 69 |ss 2) (s|et-speci|
|00001e70| 66 69 65 72 20 6d 6f 64 | 65 6c 69 6e 65 2d 73 68 |fier mod|eline-sh|
|00001e80| 61 64 6f 77 2d 74 68 69 | 63 6b 6e 65 73 73 20 30 |adow-thi|ckness 0|
|00001e90| 29 29 20 28 72 65 64 72 | 61 77 2d 6d 6f 64 65 6c |)) (redr|aw-model|
|00001ea0| 69 6e 65 20 74 29 29 20 | 3a 73 74 79 6c 65 20 74 |ine t)) |:style t|
|00001eb0| 6f 67 67 6c 65 20 3a 73 | 65 6c 65 63 74 65 64 20 |oggle :s|elected |
|00001ec0| 28 6c 65 74 20 28 28 74 | 68 69 63 6b 6e 65 73 73 |(let ((t|hickness|
|00001ed0| 20 28 73 70 65 63 69 66 | 69 65 72 2d 69 6e 73 74 | (specif|ier-inst|
|00001ee0| 61 6e 63 65 20 6d 6f 64 | 65 6c 69 6e 65 2d 73 68 |ance mod|eline-sh|
|00001ef0| 61 64 6f 77 2d 74 68 69 | 63 6b 6e 65 73 73 29 29 |adow-thi|ckness))|
|00001f00| 29 20 28 61 6e 64 20 28 | 69 6e 74 65 67 65 72 70 |) (and (|integerp|
|00001f10| 20 74 68 69 63 6b 6e 65 | 73 73 29 20 28 3e 20 74 | thickne|ss) (> t|
|00001f20| 68 69 63 6b 6e 65 73 73 | 20 30 29 29 29 5d 20 5b |hickness| 0)))] [|
|00001f30| 22 54 72 75 6e 63 61 74 | 65 20 4c 69 6e 65 73 22 |"Truncat|e Lines"|
|00001f40| 20 28 70 72 6f 67 6e 20 | 28 73 65 74 71 20 74 72 | (progn |(setq tr|
|00001f50| 75 6e 63 61 74 65 2d 6c | 69 6e 65 73 20 28 6e 6f |uncate-l|ines (no|
|00001f60| 74 20 74 72 75 6e 63 61 | 74 65 2d 6c 69 6e 65 73 |t trunca|te-lines|
|00001f70| 29 29 20 28 73 65 74 71 | 2d 64 65 66 61 75 6c 74 |)) (setq|-default|
|00001f80| 20 74 72 75 6e 63 61 74 | 65 2d 6c 69 6e 65 73 20 | truncat|e-lines |
|00001f90| 74 72 75 6e 63 61 74 65 | 2d 6c 69 6e 65 73 29 29 |truncate|-lines))|
|00001fa0| 20 3a 73 74 79 6c 65 20 | 74 6f 67 67 6c 65 20 3a | :style |toggle :|
|00001fb0| 73 65 6c 65 63 74 65 64 | 20 74 72 75 6e 63 61 74 |selected| truncat|
|00001fc0| 65 2d 6c 69 6e 65 73 5d | 20 5b 22 42 61 72 20 43 |e-lines]| ["Bar C|
|00001fd0| 75 72 73 6f 72 22 20 28 | 70 72 6f 67 6e 20 28 73 |ursor" (|progn (s|
|00001fe0| 65 74 71 20 62 61 72 2d | 63 75 72 73 6f 72 20 28 |etq bar-|cursor (|
|00001ff0| 6e 6f 74 20 62 61 72 2d | 63 75 72 73 6f 72 29 29 |not bar-|cursor))|
|00002000| 20 28 66 6f 72 63 65 2d | 63 75 72 73 6f 72 2d 72 | (force-|cursor-r|
|00002010| 65 64 69 73 70 6c 61 79 | 29 29 20 3a 73 74 79 6c |edisplay|)) :styl|
|00002020| 65 20 74 6f 67 67 6c 65 | 20 3a 73 65 6c 65 63 74 |e toggle| :select|
|00002030| 65 64 20 62 61 72 2d 63 | 75 72 73 6f 72 5d 29 20 |ed bar-c|ursor]) |
|00002040| 28 22 4d 65 6e 75 62 61 | 72 20 41 70 70 65 61 72 |("Menuba|r Appear|
|00002050| 61 6e 63 65 22 20 5b 22 | 42 75 66 66 65 72 73 20 |ance" ["|Buffers |
|00002060| 4d 65 6e 75 20 4c 65 6e | 67 74 68 2e 2e 2e 22 20 |Menu Len|gth..." |
|00002070| 28 70 72 6f 67 6e 20 28 | 73 65 74 71 20 62 75 66 |(progn (|setq buf|
|00002080| 66 65 72 73 2d 6d 65 6e | 75 2d 6d 61 78 2d 73 69 |fers-men|u-max-si|
|00002090| 7a 65 20 28 72 65 61 64 | 2d 6e 75 6d 62 65 72 20 |ze (read|-number |
|000020a0| 22 45 6e 74 65 72 20 6e | 75 6d 62 65 72 20 6f 66 |"Enter n|umber of|
|000020b0| 20 62 75 66 66 65 72 73 | 20 74 6f 20 64 69 73 70 | buffers| to disp|
|000020c0| 6c 61 79 20 28 6f 72 20 | 30 20 66 6f 72 20 75 6e |lay (or |0 for un|
|000020d0| 6c 69 6d 69 74 65 64 29 | 3a 20 22 29 29 20 28 69 |limited)|: ")) (i|
|000020e0| 66 20 28 65 71 20 62 75 | 66 66 65 72 73 2d 6d 65 |f (eq bu|ffers-me|
|000020f0| 6e 75 2d 6d 61 78 2d 73 | 69 7a 65 20 30 29 20 28 |nu-max-s|ize 0) (|
|00002100| 73 65 74 71 20 62 75 66 | 66 65 72 73 2d 6d 65 6e |setq buf|fers-men|
|00002110| 75 2d 6d 61 78 2d 73 69 | 7a 65 20 6e 69 6c 29 29 |u-max-si|ze nil))|
|00002120| 29 20 74 5d 20 5b 22 42 | 75 66 66 65 72 73 20 53 |) t] ["B|uffers S|
|00002130| 75 62 2d 4d 65 6e 75 73 | 22 20 28 73 65 74 71 20 |ub-Menus|" (setq |
|00002140| 63 6f 6d 70 6c 65 78 2d | 62 75 66 66 65 72 73 2d |complex-|buffers-|
|00002150| 6d 65 6e 75 2d 70 20 28 | 6e 6f 74 20 63 6f 6d 70 |menu-p (|not comp|
|00002160| 6c 65 78 2d 62 75 66 66 | 65 72 73 2d 6d 65 6e 75 |lex-buff|ers-menu|
|00002170| 2d 70 29 29 20 3a 73 74 | 79 6c 65 20 74 6f 67 67 |-p)) :st|yle togg|
|00002180| 6c 65 20 3a 73 65 6c 65 | 63 74 65 64 20 63 6f 6d |le :sele|cted com|
|00002190| 70 6c 65 78 2d 62 75 66 | 66 65 72 73 2d 6d 65 6e |plex-buf|fers-men|
|000021a0| 75 2d 70 5d 20 5b 22 46 | 72 61 6d 65 2d 4c 6f 63 |u-p] ["F|rame-Loc|
|000021b0| 61 6c 20 46 6f 6e 74 20 | 4d 65 6e 75 22 20 28 73 |al Font |Menu" (s|
|000021c0| 65 74 71 20 66 6f 6e 74 | 2d 6d 65 6e 75 2d 74 68 |etq font|-menu-th|
|000021d0| 69 73 2d 66 72 61 6d 65 | 2d 6f 6e 6c 79 2d 70 20 |is-frame|-only-p |
|000021e0| 28 6e 6f 74 20 66 6f 6e | 74 2d 6d 65 6e 75 2d 74 |(not fon|t-menu-t|
|000021f0| 68 69 73 2d 66 72 61 6d | 65 2d 6f 6e 6c 79 2d 70 |his-fram|e-only-p|
|00002200| 29 29 20 3a 73 74 79 6c | 65 20 74 6f 67 67 6c 65 |)) :styl|e toggle|
|00002210| 20 3a 73 65 6c 65 63 74 | 65 64 20 66 6f 6e 74 2d | :select|ed font-|
|00002220| 6d 65 6e 75 2d 74 68 69 | 73 2d 66 72 61 6d 65 2d |menu-thi|s-frame-|
|00002230| 6f 6e 6c 79 2d 70 5d 20 | 5b 22 49 67 6e 6f 72 65 |only-p] |["Ignore|
|00002240| 20 53 63 61 6c 65 64 20 | 46 6f 6e 74 73 22 20 28 | Scaled |Fonts" (|
|00002250| 73 65 74 71 20 66 6f 6e | 74 2d 6d 65 6e 75 2d 69 |setq fon|t-menu-i|
|00002260| 67 6e 6f 72 65 2d 73 63 | 61 6c 65 64 2d 66 6f 6e |gnore-sc|aled-fon|
|00002270| 74 73 20 28 6e 6f 74 20 | 66 6f 6e 74 2d 6d 65 6e |ts (not |font-men|
|00002280| 75 2d 69 67 6e 6f 72 65 | 2d 73 63 61 6c 65 64 2d |u-ignore|-scaled-|
|00002290| 66 6f 6e 74 73 29 29 20 | 3a 73 74 79 6c 65 20 74 |fonts)) |:style t|
|000022a0| 6f 67 67 6c 65 20 3a 73 | 65 6c 65 63 74 65 64 20 |oggle :s|elected |
|000022b0| 66 6f 6e 74 2d 6d 65 6e | 75 2d 69 67 6e 6f 72 65 |font-men|u-ignore|
|000022c0| 2d 73 63 61 6c 65 64 2d | 66 6f 6e 74 73 5d 29 20 |-scaled-|fonts]) |
|000022d0| 28 22 54 6f 6f 6c 62 61 | 72 20 41 70 70 65 61 72 |("Toolba|r Appear|
|000022e0| 61 6e 63 65 22 20 5b 22 | 56 69 73 69 62 6c 65 22 |ance" ["|Visible"|
|000022f0| 20 28 6d 65 6e 75 62 61 | 72 2d 74 6f 67 67 6c 65 | (menuba|r-toggle|
|00002300| 2d 74 6f 6f 6c 62 61 72 | 2d 76 69 73 69 62 69 6c |-toolbar|-visibil|
|00002310| 69 74 79 29 20 3a 73 74 | 79 6c 65 20 74 6f 67 67 |ity) :st|yle togg|
|00002320| 6c 65 20 3a 73 65 6c 65 | 63 74 65 64 20 28 6d 65 |le :sele|cted (me|
|00002330| 6e 75 62 61 72 2d 74 6f | 6f 6c 62 61 72 2d 76 69 |nubar-to|olbar-vi|
|00002340| 73 69 62 6c 65 2d 70 29 | 5d 20 5b 22 43 61 70 74 |sible-p)|] ["Capt|
|00002350| 69 6f 6e 65 64 22 20 28 | 69 66 20 28 66 65 61 74 |ioned" (|if (feat|
|00002360| 75 72 65 70 20 27 74 6f | 6f 6c 62 61 72 29 20 28 |urep 'to|olbar) (|
|00002370| 73 65 74 2d 73 70 65 63 | 69 66 69 65 72 20 74 6f |set-spec|ifier to|
|00002380| 6f 6c 62 61 72 2d 62 75 | 74 74 6f 6e 73 2d 63 61 |olbar-bu|ttons-ca|
|00002390| 70 74 69 6f 6e 65 64 2d | 70 20 28 6e 6f 74 20 28 |ptioned-|p (not (|
|000023a0| 73 70 65 63 69 66 69 65 | 72 2d 69 6e 73 74 61 6e |specifie|r-instan|
|000023b0| 63 65 20 74 6f 6f 6c 62 | 61 72 2d 62 75 74 74 6f |ce toolb|ar-butto|
|000023c0| 6e 73 2d 63 61 70 74 69 | 6f 6e 65 64 2d 70 29 29 |ns-capti|oned-p))|
|000023d0| 29 29 20 3a 73 74 79 6c | 65 20 74 6f 67 67 6c 65 |)) :styl|e toggle|
|000023e0| 20 3a 73 65 6c 65 63 74 | 65 64 20 28 61 6e 64 20 | :select|ed (and |
|000023f0| 28 66 65 61 74 75 72 65 | 70 20 27 74 6f 6f 6c 62 |(feature|p 'toolb|
|00002400| 61 72 29 20 28 73 70 65 | 63 69 66 69 65 72 2d 69 |ar) (spe|cifier-i|
|00002410| 6e 73 74 61 6e 63 65 20 | 74 6f 6f 6c 62 61 72 2d |nstance |toolbar-|
|00002420| 62 75 74 74 6f 6e 73 2d | 63 61 70 74 69 6f 6e 65 |buttons-|captione|
|00002430| 64 2d 70 29 29 5d 20 28 | 22 44 65 66 61 75 6c 74 |d-p))] (|"Default|
|00002440| 20 4c 6f 63 61 74 69 6f | 6e 22 20 5b 22 54 6f 70 | Locatio|n" ["Top|
|00002450| 22 20 28 6d 65 6e 75 62 | 61 72 2d 63 68 61 6e 67 |" (menub|ar-chang|
|00002460| 65 2d 64 65 66 61 75 6c | 74 2d 74 6f 6f 6c 62 61 |e-defaul|t-toolba|
|00002470| 72 2d 70 6f 73 69 74 69 | 6f 6e 20 27 74 6f 70 20 |r-positi|on 'top |
|00002480| 6e 69 6c 29 20 3a 73 74 | 79 6c 65 20 72 61 64 69 |nil) :st|yle radi|
|00002490| 6f 20 3a 73 65 6c 65 63 | 74 65 64 20 28 65 71 20 |o :selec|ted (eq |
|000024a0| 28 64 65 66 61 75 6c 74 | 2d 74 6f 6f 6c 62 61 72 |(default|-toolbar|
|000024b0| 2d 70 6f 73 69 74 69 6f | 6e 29 20 27 74 6f 70 29 |-positio|n) 'top)|
|000024c0| 5d 20 5b 22 42 6f 74 74 | 6f 6d 22 20 28 6d 65 6e |] ["Bott|om" (men|
|000024d0| 75 62 61 72 2d 63 68 61 | 6e 67 65 2d 64 65 66 61 |ubar-cha|nge-defa|
|000024e0| 75 6c 74 2d 74 6f 6f 6c | 62 61 72 2d 70 6f 73 69 |ult-tool|bar-posi|
|000024f0| 74 69 6f 6e 20 27 62 6f | 74 74 6f 6d 20 6e 69 6c |tion 'bo|ttom nil|
|00002500| 29 20 3a 73 74 79 6c 65 | 20 72 61 64 69 6f 20 3a |) :style| radio :|
|00002510| 73 65 6c 65 63 74 65 64 | 20 28 65 71 20 28 64 65 |selected| (eq (de|
|00002520| 66 61 75 6c 74 2d 74 6f | 6f 6c 62 61 72 2d 70 6f |fault-to|olbar-po|
|00002530| 73 69 74 69 6f 6e 29 20 | 27 62 6f 74 74 6f 6d 29 |sition) |'bottom)|
|00002540| 5d 20 5b 22 4c 65 66 74 | 22 20 28 6d 65 6e 75 62 |] ["Left|" (menub|
|00002550| 61 72 2d 63 68 61 6e 67 | 65 2d 64 65 66 61 75 6c |ar-chang|e-defaul|
|00002560| 74 2d 74 6f 6f 6c 62 61 | 72 2d 70 6f 73 69 74 69 |t-toolba|r-positi|
|00002570| 6f 6e 20 27 6c 65 66 74 | 20 6e 69 6c 29 20 3a 73 |on 'left| nil) :s|
|00002580| 74 79 6c 65 20 72 61 64 | 69 6f 20 3a 73 65 6c 65 |tyle rad|io :sele|
|00002590| 63 74 65 64 20 28 65 71 | 20 28 64 65 66 61 75 6c |cted (eq| (defaul|
|000025a0| 74 2d 74 6f 6f 6c 62 61 | 72 2d 70 6f 73 69 74 69 |t-toolba|r-positi|
|000025b0| 6f 6e 29 20 27 6c 65 66 | 74 29 5d 20 5b 22 52 69 |on) 'lef|t)] ["Ri|
|000025c0| 67 68 74 22 20 28 6d 65 | 6e 75 62 61 72 2d 63 68 |ght" (me|nubar-ch|
|000025d0| 61 6e 67 65 2d 64 65 66 | 61 75 6c 74 2d 74 6f 6f |ange-def|ault-too|
|000025e0| 6c 62 61 72 2d 70 6f 73 | 69 74 69 6f 6e 20 27 72 |lbar-pos|ition 'r|
|000025f0| 69 67 68 74 20 6e 69 6c | 29 20 3a 73 74 79 6c 65 |ight nil|) :style|
|00002600| 20 72 61 64 69 6f 20 3a | 73 65 6c 65 63 74 65 64 | radio :|selected|
|00002610| 20 28 65 71 20 28 64 65 | 66 61 75 6c 74 2d 74 6f | (eq (de|fault-to|
|00002620| 6f 6c 62 61 72 2d 70 6f | 73 69 74 69 6f 6e 29 20 |olbar-po|sition) |
|00002630| 27 72 69 67 68 74 29 5d | 29 29 20 22 2d 2d 2d 2d |'right)]|)) "----|
|00002640| 2d 22 20 5b 22 45 64 69 | 74 20 46 61 63 65 73 2e |-" ["Edi|t Faces.|
|00002650| 2e 2e 22 20 65 64 69 74 | 2d 66 61 63 65 73 20 74 |.." edit|-faces t|
|00002660| 5d 20 28 22 46 6f 6e 74 | 22 20 3a 66 69 6c 74 65 |] ("Font|" :filte|
|00002670| 72 20 66 6f 6e 74 2d 6d | 65 6e 75 2d 66 61 6d 69 |r font-m|enu-fami|
|00002680| 6c 79 2d 63 6f 6e 73 74 | 72 75 63 74 6f 72 29 20 |ly-const|ructor) |
|00002690| 28 22 53 69 7a 65 22 20 | 3a 66 69 6c 74 65 72 20 |("Size" |:filter |
|000026a0| 66 6f 6e 74 2d 6d 65 6e | 75 2d 73 69 7a 65 2d 63 |font-men|u-size-c|
|000026b0| 6f 6e 73 74 72 75 63 74 | 6f 72 29 20 28 22 57 65 |onstruct|or) ("We|
|000026c0| 69 67 68 74 22 20 3a 66 | 69 6c 74 65 72 20 66 6f |ight" :f|ilter fo|
|000026d0| 6e 74 2d 6d 65 6e 75 2d | 77 65 69 67 68 74 2d 63 |nt-menu-|weight-c|
|000026e0| 6f 6e 73 74 72 75 63 74 | 6f 72 29 20 22 2d 2d 2d |onstruct|or) "---|
|000026f0| 2d 2d 22 20 5b 22 53 61 | 76 65 20 4f 70 74 69 6f |--" ["Sa|ve Optio|
|00002700| 6e 73 22 20 73 61 76 65 | 2d 6f 70 74 69 6f 6e 73 |ns" save|-options|
|00002710| 2d 6d 65 6e 75 2d 73 65 | 74 74 69 6e 67 73 20 74 |-menu-se|ttings t|
|00002720| 5d 29 20 28 22 42 75 66 | 66 65 72 73 22 20 3a 66 |]) ("Buf|fers" :f|
|00002730| 69 6c 74 65 72 20 62 75 | 66 66 65 72 73 2d 6d 65 |ilter bu|ffers-me|
|00002740| 6e 75 2d 66 69 6c 74 65 | 72 20 5b 22 4c 69 73 74 |nu-filte|r ["List|
|00002750| 20 41 6c 6c 20 42 75 66 | 66 65 72 73 22 20 6c 69 | All Buf|fers" li|
|00002760| 73 74 2d 62 75 66 66 65 | 72 73 20 74 5d 20 22 2d |st-buffe|rs t] "-|
|00002770| 2d 22 29 20 28 22 54 6f | 6f 6c 73 22 20 5b 22 47 |-") ("To|ols" ["G|
|00002780| 72 65 70 2e 2e 2e 22 20 | 67 72 65 70 20 74 5d 20 |rep..." |grep t] |
|00002790| 5b 22 43 6f 6d 70 69 6c | 65 2e 2e 2e 22 20 63 6f |["Compil|e..." co|
|000027a0| 6d 70 69 6c 65 20 74 5d | 20 5b 22 53 68 65 6c 6c |mpile t]| ["Shell|
|000027b0| 20 43 6f 6d 6d 61 6e 64 | 2e 2e 2e 22 20 73 68 65 | Command|..." she|
|000027c0| 6c 6c 2d 63 6f 6d 6d 61 | 6e 64 20 74 5d 20 5b 22 |ll-comma|nd t] ["|
|000027d0| 53 68 65 6c 6c 20 43 6f | 6d 6d 61 6e 64 20 6f 6e |Shell Co|mmand on|
|000027e0| 20 52 65 67 69 6f 6e 2e | 2e 2e 22 20 73 68 65 6c | Region.|.." shel|
|000027f0| 6c 2d 63 6f 6d 6d 61 6e | 64 2d 6f 6e 2d 72 65 67 |l-comman|d-on-reg|
|00002800| 69 6f 6e 20 28 72 65 67 | 69 6f 6e 2d 65 78 69 73 |ion (reg|ion-exis|
|00002810| 74 73 2d 70 29 5d 20 5b | 22 44 65 62 75 67 20 28 |ts-p)] [|"Debug (|
|00002820| 47 44 42 29 2e 2e 2e 22 | 20 67 64 62 20 74 5d 20 |GDB)..."| gdb t] |
|00002830| 5b 22 44 65 62 75 67 20 | 28 44 42 58 29 2e 2e 2e |["Debug |(DBX)...|
|00002840| 22 20 64 62 78 20 74 5d | 20 22 2d 2d 2d 2d 2d 22 |" dbx t]| "-----"|
|00002850| 20 5b 22 4f 4f 2d 42 72 | 6f 77 73 65 72 2e 2e 2e | ["OO-Br|owser...|
|00002860| 22 20 6f 6f 62 72 20 74 | 5d 20 28 22 54 61 67 73 |" oobr t|] ("Tags|
|00002870| 22 20 5b 22 46 69 6e 64 | 2e 2e 2e 22 20 66 69 6e |" ["Find|..." fin|
|00002880| 64 2d 74 61 67 20 74 5d | 20 5b 22 46 69 6e 64 20 |d-tag t]| ["Find |
|00002890| 4f 74 68 65 72 20 57 69 | 6e 64 6f 77 2e 2e 2e 22 |Other Wi|ndow..."|
|000028a0| 20 66 69 6e 64 2d 74 61 | 67 2d 6f 74 68 65 72 2d | find-ta|g-other-|
|000028b0| 77 69 6e 64 6f 77 20 74 | 5d 20 5b 22 54 61 67 73 |window t|] ["Tags|
|000028c0| 20 53 65 61 72 63 68 2e | 2e 2e 22 20 74 61 67 73 | Search.|.." tags|
|000028d0| 2d 73 65 61 72 63 68 20 | 74 5d 20 5b 22 54 61 67 |-search |t] ["Tag|
|000028e0| 73 20 52 65 70 6c 61 63 | 65 2e 2e 2e 22 20 74 61 |s Replac|e..." ta|
|000028f0| 67 73 2d 71 75 65 72 79 | 2d 72 65 70 6c 61 63 65 |gs-query|-replace|
|00002900| 20 74 5d 20 22 2d 2d 2d | 2d 2d 22 20 5b 22 43 6f | t] "---|--" ["Co|
|00002910| 6e 74 69 6e 75 65 22 20 | 74 61 67 73 2d 6c 6f 6f |ntinue" |tags-loo|
|00002920| 70 2d 63 6f 6e 74 69 6e | 75 65 20 74 5d 20 5b 22 |p-contin|ue t] ["|
|00002930| 50 6f 70 20 73 74 61 63 | 6b 22 20 70 6f 70 2d 74 |Pop stac|k" pop-t|
|00002940| 61 67 2d 6d 61 72 6b 20 | 74 5d 20 5b 22 41 70 72 |ag-mark |t] ["Apr|
|00002950| 6f 70 6f 73 2e 2e 2e 22 | 20 74 61 67 73 2d 61 70 |opos..."| tags-ap|
|00002960| 72 6f 70 6f 73 20 74 5d | 29 29 20 6e 69 6c 20 28 |ropos t]|)) nil (|
|00002970| 22 48 65 6c 70 22 20 5b | 22 41 62 6f 75 74 20 58 |"Help" [|"About X|
|00002980| 45 6d 61 63 73 2e 2e 2e | 22 20 61 62 6f 75 74 2d |Emacs...|" about-|
|00002990| 78 65 6d 61 63 73 20 74 | 5d 20 22 2d 2d 2d 2d 2d |xemacs t|] "-----|
|000029a0| 22 20 5b 22 58 45 6d 61 | 63 73 20 57 57 57 20 50 |" ["XEma|cs WWW P|
|000029b0| 61 67 65 22 20 78 65 6d | 61 63 73 2d 77 77 77 2d |age" xem|acs-www-|
|000029c0| 70 61 67 65 20 74 5d 20 | 5b 22 4e 65 77 65 73 74 |page t] |["Newest|
|000029d0| 20 58 45 6d 61 63 73 20 | 46 41 51 20 76 69 61 20 | XEmacs |FAQ via |
|000029e0| 57 57 57 22 20 78 65 6d | 61 63 73 2d 77 77 77 2d |WWW" xem|acs-www-|
|000029f0| 66 61 71 20 74 5d 20 5b | 22 58 45 6d 61 63 73 20 |faq t] [|"XEmacs |
|00002a00| 46 41 51 20 28 6c 6f 63 | 61 6c 29 22 20 78 65 6d |FAQ (loc|al)" xem|
|00002a10| 61 63 73 2d 6c 6f 63 61 | 6c 2d 66 61 71 20 74 5d |acs-loca|l-faq t]|
|00002a20| 20 5b 22 58 45 6d 61 63 | 73 20 54 75 74 6f 72 69 | ["XEmac|s Tutori|
|00002a30| 61 6c 22 20 68 65 6c 70 | 2d 77 69 74 68 2d 74 75 |al" help|-with-tu|
|00002a40| 74 6f 72 69 61 6c 20 74 | 5d 20 5b 22 58 45 6d 61 |torial t|] ["XEma|
|00002a50| 63 73 20 4e 65 77 73 22 | 20 76 69 65 77 2d 65 6d |cs News"| view-em|
|00002a60| 61 63 73 2d 6e 65 77 73 | 20 74 5d 20 22 2d 2d 2d |acs-news| t] "---|
|00002a70| 2d 2d 22 20 5b 22 49 6e | 66 6f 20 28 44 65 74 61 |--" ["In|fo (Deta|
|00002a80| 69 6c 65 64 20 44 6f 63 | 73 29 22 20 69 6e 66 6f |iled Doc|s)" info|
|00002a90| 20 74 5d 20 28 22 4c 6f | 6f 6b 75 70 20 69 6e 20 | t] ("Lo|okup in |
|00002aa0| 49 6e 66 6f 22 20 5b 22 | 4b 65 79 2f 4d 6f 75 73 |Info" ["|Key/Mous|
|00002ab0| 65 20 42 69 6e 64 69 6e | 67 2e 2e 2e 22 20 49 6e |e Bindin|g..." In|
|00002ac0| 66 6f 2d 67 6f 74 6f 2d | 65 6d 61 63 73 2d 6b 65 |fo-goto-|emacs-ke|
|00002ad0| 79 2d 63 6f 6d 6d 61 6e | 64 2d 6e 6f 64 65 20 74 |y-comman|d-node t|
|00002ae0| 5d 20 5b 22 43 6f 6d 6d | 61 6e 64 2e 2e 2e 22 20 |] ["Comm|and..." |
|00002af0| 49 6e 66 6f 2d 67 6f 74 | 6f 2d 65 6d 61 63 73 2d |Info-got|o-emacs-|
|00002b00| 63 6f 6d 6d 61 6e 64 2d | 6e 6f 64 65 20 74 5d 20 |command-|node t] |
|00002b10| 5b 22 45 6c 69 73 70 20 | 46 75 6e 63 74 69 6f 6e |["Elisp |Function|
|00002b20| 2e 2e 2e 22 20 49 6e 66 | 6f 2d 65 6c 69 73 70 2d |..." Inf|o-elisp-|
|00002b30| 72 65 66 20 74 5d 20 5b | 22 54 6f 70 69 63 2e 2e |ref t] [|"Topic..|
|00002b40| 2e 22 20 49 6e 66 6f 2d | 71 75 65 72 79 20 74 5d |." Info-|query t]|
|00002b50| 29 20 5b 22 50 61 63 6b | 61 67 65 20 42 72 6f 77 |) ["Pack|age Brow|
|00002b60| 73 65 72 22 20 66 69 6e | 64 65 72 2d 62 79 2d 6b |ser" fin|der-by-k|
|00002b70| 65 79 77 6f 72 64 20 74 | 5d 20 5b 22 44 65 73 63 |eyword t|] ["Desc|
|00002b80| 72 69 62 65 20 4d 6f 64 | 65 22 20 64 65 73 63 72 |ribe Mod|e" descr|
|00002b90| 69 62 65 2d 6d 6f 64 65 | 20 74 5d 20 5b 22 41 70 |ibe-mode| t] ["Ap|
|00002ba0| 72 6f 70 6f 73 2e 2e 2e | 22 20 68 79 70 65 72 2d |ropos...|" hyper-|
|00002bb0| 61 70 72 6f 70 6f 73 20 | 74 5d 20 5b 22 53 75 70 |apropos |t] ["Sup|
|00002bc0| 65 72 20 41 70 72 6f 70 | 6f 73 2e 2e 2e 22 20 73 |er Aprop|os..." s|
|00002bd0| 75 70 65 72 2d 61 70 72 | 6f 70 6f 73 20 74 5d 20 |uper-apr|opos t] |
|00002be0| 22 2d 2d 2d 2d 2d 22 20 | 5b 22 44 65 73 63 72 69 |"-----" |["Descri|
|00002bf0| 62 65 20 4b 65 79 2f 4d | 6f 75 73 65 2e 2e 2e 22 |be Key/M|ouse..."|
|00002c00| 20 64 65 73 63 72 69 62 | 65 2d 6b 65 79 20 74 5d | describ|e-key t]|
|00002c10| 20 5b 22 4c 69 73 74 20 | 4b 65 79 20 42 69 6e 64 | ["List |Key Bind|
|00002c20| 69 6e 67 73 22 20 64 65 | 73 63 72 69 62 65 2d 62 |ings" de|scribe-b|
|00002c30| 69 6e 64 69 6e 67 73 20 | 74 5d 20 5b 22 4c 69 73 |indings |t] ["Lis|
|00002c40| 74 20 4d 6f 75 73 65 20 | 42 69 6e 64 69 6e 67 73 |t Mouse |Bindings|
|00002c50| 22 20 64 65 73 63 72 69 | 62 65 2d 70 6f 69 6e 74 |" descri|be-point|
|00002c60| 65 72 20 74 5d 20 22 2d | 2d 2d 2d 2d 22 20 5b 22 |er t] "-|----" ["|
|00002c70| 44 65 73 63 72 69 62 65 | 20 46 75 6e 63 74 69 6f |Describe| Functio|
|00002c80| 6e 2e 2e 2e 22 20 64 65 | 73 63 72 69 62 65 2d 66 |n..." de|scribe-f|
|00002c90| 75 6e 63 74 69 6f 6e 20 | 74 5d 20 5b 22 44 65 73 |unction |t] ["Des|
|00002ca0| 63 72 69 62 65 20 56 61 | 72 69 61 62 6c 65 2e 2e |cribe Va|riable..|
|00002cb0| 2e 22 20 64 65 73 63 72 | 69 62 65 2d 76 61 72 69 |." descr|ibe-vari|
|00002cc0| 61 62 6c 65 20 74 5d 20 | 5b 22 57 68 65 72 65 20 |able t] |["Where |
|00002cd0| 49 73 20 43 6f 6d 6d 61 | 6e 64 2e 2e 2e 22 20 77 |Is Comma|nd..." w|
|00002ce0| 68 65 72 65 2d 69 73 20 | 74 5d 20 22 2d 2d 2d 2d |here-is |t] "----|
|00002cf0| 2d 22 20 5b 22 55 6e 69 | 78 20 4d 61 6e 75 61 6c |-" ["Uni|x Manual|
|00002d00| 2e 2e 2e 22 20 6d 61 6e | 75 61 6c 2d 65 6e 74 72 |..." man|ual-entr|
|00002d10| 79 20 74 5d 20 28 22 4d | 69 73 63 22 20 5b 22 44 |y t] ("M|isc" ["D|
|00002d20| 65 73 63 72 69 62 65 20 | 4e 6f 20 57 61 72 72 61 |escribe |No Warra|
|00002d30| 6e 74 79 22 20 64 65 73 | 63 72 69 62 65 2d 6e 6f |nty" des|cribe-no|
|00002d40| 2d 77 61 72 72 61 6e 74 | 79 20 74 5d 20 5b 22 44 |-warrant|y t] ["D|
|00002d50| 65 73 63 72 69 62 65 20 | 58 45 6d 61 63 73 20 4c |escribe |XEmacs L|
|00002d60| 69 63 65 6e 73 65 22 20 | 64 65 73 63 72 69 62 65 |icense" |describe|
|00002d70| 2d 63 6f 70 79 69 6e 67 | 20 74 5d 20 5b 22 47 65 |-copying| t] ["Ge|
|00002d80| 74 74 69 6e 67 20 74 68 | 65 20 4c 61 74 65 73 74 |tting th|e Latest|
|00002d90| 20 56 65 72 73 69 6f 6e | 22 20 64 65 73 63 72 69 | Version|" descri|
|00002da0| 62 65 2d 64 69 73 74 72 | 69 62 75 74 69 6f 6e 20 |be-distr|ibution |
|00002db0| 74 5d 29 29 29 20 64 65 | 66 61 75 6c 74 2d 6d 65 |t]))) de|fault-me|
|00002dc0| 6e 75 62 61 72 20 6d 65 | 6e 75 62 61 72 2d 63 68 |nubar me|nubar-ch|
|00002dd0| 61 6e 67 65 2d 64 65 66 | 61 75 6c 74 2d 74 6f 6f |ange-def|ault-too|
|00002de0| 6c 62 61 72 2d 70 6f 73 | 69 74 69 6f 6e 20 23 5b |lbar-pos|ition #[|
|00002df0| 28 6e 65 77 2d 6c 6f 63 | 61 74 69 6f 6e 20 26 6f |(new-loc|ation &o|
|00002e00| 70 74 69 6f 6e 61 6c 20 | 66 6f 72 63 65 29 20 22 |ptional |force) "|
|00002e10| 08 c1 3d ab 83 c2 aa 81 | c3 08 c4 3d ab 83 c2 aa |..=.....|...=....|
|00002e20| 81 c3 08 c5 3d ab 83 c2 | aa 81 c3 08 c6 3d ab 83 |....=...|.....=..|
|00002e30| c2 aa 81 c3 1e 07 1e 08 | 1e 09 1e 5c 6e 08 cb 3d |........|...\n..=|
|00002e40| ac 84 cc 08 21 88 0e 0d | ac 84 ce 20 ad 9b cf 0e |....!...|... ....|
|00002e50| 10 0e 5c 6e 5c 22 88 cf | 0e 11 0e 09 5c 22 88 cf |..\n\"..|....\"..|
|00002e60| 0e 12 0e 08 5c 22 88 cf | 0e 13 0e 07 5c 22 2c 87 |....\"..|....\",.|
|00002e70| 22 20 5b 6e 65 77 2d 6c | 6f 63 61 74 69 6f 6e 20 |" [new-l|ocation |
|00002e80| 74 6f 70 20 33 37 20 30 | 20 62 6f 74 74 6f 6d 20 |top 37 0| bottom |
|00002e90| 6c 65 66 74 20 72 69 67 | 68 74 20 72 69 67 68 74 |left rig|ht right|
|00002ea0| 2d 77 69 64 74 68 20 6c | 65 66 74 2d 77 69 64 74 |-width l|eft-widt|
|00002eb0| 68 20 62 6f 74 74 6f 6d | 2d 68 65 69 67 68 74 20 |h bottom|-height |
|00002ec0| 74 6f 70 2d 68 65 69 67 | 68 74 20 6e 6f 6e 65 20 |top-heig|ht none |
|00002ed0| 73 65 74 2d 64 65 66 61 | 75 6c 74 2d 74 6f 6f 6c |set-defa|ult-tool|
|00002ee0| 62 61 72 2d 70 6f 73 69 | 74 69 6f 6e 20 66 6f 72 |bar-posi|tion for|
|00002ef0| 63 65 20 6d 65 6e 75 62 | 61 72 2d 74 6f 6f 6c 62 |ce menub|ar-toolb|
|00002f00| 61 72 2d 76 69 73 69 62 | 6c 65 2d 70 20 73 65 74 |ar-visib|le-p set|
|00002f10| 2d 73 70 65 63 69 66 69 | 65 72 20 74 6f 70 2d 74 |-specifi|er top-t|
|00002f20| 6f 6f 6c 62 61 72 2d 68 | 65 69 67 68 74 20 62 6f |oolbar-h|eight bo|
|00002f30| 74 74 6f 6d 2d 74 6f 6f | 6c 62 61 72 2d 68 65 69 |ttom-too|lbar-hei|
|00002f40| 67 68 74 20 6c 65 66 74 | 2d 74 6f 6f 6c 62 61 72 |ght left|-toolbar|
|00002f50| 2d 77 69 64 74 68 20 72 | 69 67 68 74 2d 74 6f 6f |-width r|ight-too|
|00002f60| 6c 62 61 72 2d 77 69 64 | 74 68 5d 20 35 5d 20 6d |lbar-wid|th] 5] m|
|00002f70| 65 6e 75 62 61 72 2d 74 | 6f 6f 6c 62 61 72 2d 76 |enubar-t|oolbar-v|
|00002f80| 69 73 69 62 6c 65 2d 70 | 20 23 5b 6e 69 6c 20 22 |isible-p| #[nil "|
|00002f90| c0 c1 21 3f 3f ad a0 c2 | 0b 21 c4 3d ad 95 c2 0d |..!??...|.!.=....|
|00002fa0| 21 c4 3d ad 8e c2 0e 06 | 21 c4 3d ad 86 c2 0e 07 |!.=.....|!.=.....|
|00002fb0| 21 c4 3d 3f ad 81 c8 87 | 22 20 5b 66 65 61 74 75 |!.=?....|" [featu|
|00002fc0| 72 65 70 20 74 6f 6f 6c | 62 61 72 20 73 70 65 63 |rep tool|bar spec|
|00002fd0| 69 66 69 65 72 2d 69 6e | 73 74 61 6e 63 65 20 74 |ifier-in|stance t|
|00002fe0| 6f 70 2d 74 6f 6f 6c 62 | 61 72 2d 68 65 69 67 68 |op-toolb|ar-heigh|
|00002ff0| 74 20 30 20 62 6f 74 74 | 6f 6d 2d 74 6f 6f 6c 62 |t 0 bott|om-toolb|
|00003000| 61 72 2d 68 65 69 67 68 | 74 20 6c 65 66 74 2d 74 |ar-heigh|t left-t|
|00003010| 6f 6f 6c 62 61 72 2d 77 | 69 64 74 68 20 72 69 67 |oolbar-w|idth rig|
|00003020| 68 74 2d 74 6f 6f 6c 62 | 61 72 2d 77 69 64 74 68 |ht-toolb|ar-width|
|00003030| 20 74 5d 20 32 5d 20 6d | 65 6e 75 62 61 72 2d 74 | t] 2] m|enubar-t|
|00003040| 6f 67 67 6c 65 2d 74 6f | 6f 6c 62 61 72 2d 76 69 |oggle-to|olbar-vi|
|00003050| 73 69 62 69 6c 69 74 79 | 20 23 5b 6e 69 6c 20 22 |sibility| #[nil "|
|00003060| c0 c1 21 ad 8e c2 20 ac | 86 c3 c4 20 c5 5c 22 87 |..!... .|... .\".|
|00003070| c3 c6 c5 5c 22 87 22 20 | 5b 66 65 61 74 75 72 65 |...\"." |[feature|
|00003080| 70 20 74 6f 6f 6c 62 61 | 72 20 6d 65 6e 75 62 61 |p toolba|r menuba|
|00003090| 72 2d 74 6f 6f 6c 62 61 | 72 2d 76 69 73 69 62 6c |r-toolba|r-visibl|
|000030a0| 65 2d 70 20 6d 65 6e 75 | 62 61 72 2d 63 68 61 6e |e-p menu|bar-chan|
|000030b0| 67 65 2d 64 65 66 61 75 | 6c 74 2d 74 6f 6f 6c 62 |ge-defau|lt-toolb|
|000030c0| 61 72 2d 70 6f 73 69 74 | 69 6f 6e 20 64 65 66 61 |ar-posit|ion defa|
|000030d0| 75 6c 74 2d 74 6f 6f 6c | 62 61 72 2d 70 6f 73 69 |ult-tool|bar-posi|
|000030e0| 74 69 6f 6e 20 74 20 6e | 6f 6e 65 5d 20 33 5d 20 |tion t n|one] 3] |
|000030f0| 6d 61 79 62 65 2d 61 64 | 64 2d 69 6e 69 74 2d 62 |maybe-ad|d-init-b|
|00003100| 75 74 74 6f 6e 20 23 5b | 6e 69 6c 20 22 08 3f ad |utton #[|nil ".?.|
|00003110| 85 c1 c2 c3 c4 23 87 22 | 20 5b 69 6e 69 74 2d 66 |.....#."| [init-f|
|00003120| 69 6c 65 2d 75 73 65 72 | 20 61 64 64 2d 6d 65 6e |ile-user| add-men|
|00003130| 75 2d 62 75 74 74 6f 6e | 20 6e 69 6c 20 5b 22 4c |u-button| nil ["L|
|00003140| 6f 61 64 20 2e 65 6d 61 | 63 73 22 20 28 70 72 6f |oad .ema|cs" (pro|
|00003150| 67 6e 20 28 64 65 6c 65 | 74 65 2d 6d 65 6e 75 2d |gn (dele|te-menu-|
|00003160| 69 74 65 6d 20 27 28 22 | 4c 6f 61 64 20 2e 65 6d |item '("|Load .em|
|00003170| 61 63 73 22 29 29 20 28 | 6c 6f 61 64 2d 75 73 65 |acs")) (|load-use|
|00003180| 72 2d 69 6e 69 74 2d 66 | 69 6c 65 20 28 75 73 65 |r-init-f|ile (use|
|00003190| 72 2d 6c 6f 67 69 6e 2d | 6e 61 6d 65 29 29 29 20 |r-login-|name))) |
|000031a0| 74 5d 20 22 48 65 6c 70 | 22 5d 20 34 5d 20 61 64 |t] "Help|"] 4] ad|
|000031b0| 64 2d 68 6f 6f 6b 20 62 | 65 66 6f 72 65 2d 69 6e |d-hook b|efore-in|
|000031c0| 69 74 2d 68 6f 6f 6b 20 | 62 6f 75 6e 64 70 20 70 |it-hook |boundp p|
|000031d0| 75 74 2d 62 75 66 66 65 | 72 2d 6e 61 6d 65 73 2d |ut-buffe|r-names-|
|000031e0| 69 6e 2d 66 69 6c 65 2d | 6d 65 6e 75 20 74 5d 20 |in-file-|menu t] |
|000031f0| 33 29 0a 28 66 73 65 74 | 20 27 66 69 6c 65 2d 6d |3).(fset| 'file-m|
|00003200| 65 6e 75 2d 66 69 6c 74 | 65 72 20 23 5b 28 6d 65 |enu-filt|er #[(me|
|00003210| 6e 75 2d 69 74 65 6d 73 | 29 20 22 c0 20 19 5c 6e |nu-items|) ". .\n|
|00003220| 1b c4 1d c4 1e 06 5c 6e | 40 5c 6e 41 12 89 16 06 |......\n|@\nA....|
|00003230| ab d1 c7 0e 06 21 ab 70 | 0e 06 c8 48 15 0e 09 ab |.....!.p|...H....|
|00003240| 92 0d ca 9d ab 8d cb 0e | 06 47 59 ab 86 0e 06 cc |........|.GY.....|
|00003250| 09 49 88 cd 0d 98 ab 87 | 0e 06 ce cf 20 49 88 d0 |.I......|.... I..|
|00003260| 0d 98 ab 8d 0e 06 ce 0e | 11 ae 82 0e 12 3f 3f 49 |........|.....??I|
|00003270| 88 0d d3 98 ab 32 0e 06 | ce d4 20 d5 20 3d 3f 49 |.....2..|.. . =?I|
|00003280| 88 aa 25 0b 2c 87 22 20 | 5b 62 75 66 66 65 72 2d |..%.,." |[buffer-|
|00003290| 6e 61 6d 65 20 62 75 66 | 6e 61 6d 65 20 6d 65 6e |name buf|name men|
|000032a0| 75 2d 69 74 65 6d 73 20 | 72 65 73 75 6c 74 20 6e |u-items |result n|
|000032b0| 69 6c 20 6e 61 6d 65 20 | 69 74 65 6d 20 76 65 63 |il name |item vec|
|000032c0| 74 6f 72 70 20 30 20 70 | 75 74 2d 62 75 66 66 65 |torp 0 p|ut-buffe|
|000032d0| 72 2d 6e 61 6d 65 73 2d | 69 6e 2d 66 69 6c 65 2d |r-names-|in-file-|
|000032e0| 6d 65 6e 75 20 28 22 53 | 61 76 65 22 20 22 52 65 |menu ("S|ave" "Re|
|000032f0| 76 65 72 74 20 42 75 66 | 66 65 72 22 20 22 50 72 |vert Buf|fer" "Pr|
|00003300| 69 6e 74 20 42 75 66 66 | 65 72 22 20 22 50 72 65 |int Buff|er" "Pre|
|00003310| 74 74 79 2d 50 72 69 6e | 74 20 42 75 66 66 65 72 |tty-Prin|t Buffer|
|00003320| 22 20 22 44 65 6c 65 74 | 65 20 42 75 66 66 65 72 |" "Delet|e Buffer|
|00003330| 22 29 20 34 20 33 20 22 | 53 61 76 65 22 20 32 20 |") 4 3 "|Save" 2 |
|00003340| 62 75 66 66 65 72 2d 6d | 6f 64 69 66 69 65 64 2d |buffer-m|odified-|
|00003350| 70 20 22 52 65 76 65 72 | 74 20 42 75 66 66 65 72 |p "Rever|t Buffer|
|00003360| 22 20 62 75 66 66 65 72 | 2d 66 69 6c 65 2d 6e 61 |" buffer|-file-na|
|00003370| 6d 65 20 72 65 76 65 72 | 74 2d 62 75 66 66 65 72 |me rever|t-buffer|
|00003380| 2d 66 75 6e 63 74 69 6f | 6e 20 22 44 65 6c 65 74 |-functio|n "Delet|
|00003390| 65 20 46 72 61 6d 65 22 | 20 6e 65 78 74 2d 66 72 |e Frame"| next-fr|
|000033a0| 61 6d 65 20 73 65 6c 65 | 63 74 65 64 2d 66 72 61 |ame sele|cted-fra|
|000033b0| 6d 65 5d 20 34 20 22 5c | 0a 49 6e 63 72 65 6d 65 |me] 4 "\|.Increme|
|000033c0| 6e 74 61 6c 6c 79 20 75 | 70 64 61 74 65 20 74 68 |ntally u|pdate th|
|000033d0| 65 20 66 69 6c 65 20 6d | 65 6e 75 2e 0a 54 68 69 |e file m|enu..Thi|
|000033e0| 73 20 66 75 6e 63 74 69 | 6f 6e 20 63 68 61 6e 67 |s functi|on chang|
|000033f0| 65 73 20 74 68 65 20 61 | 72 67 75 6d 65 6e 74 73 |es the a|rguments|
|00003400| 20 61 6e 64 20 73 65 6e | 73 69 74 69 76 69 74 79 | and sen|sitivity|
|00003410| 20 6f 66 20 74 68 65 73 | 65 20 46 69 6c 65 20 6d | of thes|e File m|
|00003420| 65 6e 75 20 69 74 65 6d | 73 3a 0a 0a 20 20 44 65 |enu item|s:.. De|
|00003430| 6c 65 74 65 20 42 75 66 | 66 65 72 20 20 68 61 73 |lete Buf|fer has|
|00003440| 20 74 68 65 20 6e 61 6d | 65 20 6f 66 20 74 68 65 | the nam|e of the|
|00003450| 20 63 75 72 72 65 6e 74 | 20 62 75 66 66 65 72 20 | current| buffer |
|00003460| 61 70 70 65 6e 64 65 64 | 20 74 6f 20 69 74 2e 0a |appended| to it..|
|00003470| 20 20 50 72 69 6e 74 20 | 42 75 66 66 65 72 20 20 | Print |Buffer |
|00003480| 20 68 61 73 20 74 68 65 | 20 6e 61 6d 65 20 6f 66 | has the| name of|
|00003490| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 62 75 66 | the cur|rent buf|
|000034a0| 66 65 72 20 61 70 70 65 | 6e 64 65 64 20 74 6f 20 |fer appe|nded to |
|000034b0| 69 74 2e 0a 20 20 50 72 | 65 74 74 79 2d 50 72 69 |it.. Pr|etty-Pri|
|000034c0| 6e 74 20 42 75 66 66 65 | 72 0a 09 09 20 68 61 73 |nt Buffe|r... has|
|000034d0| 20 74 68 65 20 6e 61 6d | 65 20 6f 66 20 74 68 65 | the nam|e of the|
|000034e0| 20 63 75 72 72 65 6e 74 | 20 62 75 66 66 65 72 20 | current| buffer |
|000034f0| 61 70 70 65 6e 64 65 64 | 20 74 6f 20 69 74 2e 0a |appended| to it..|
|00003500| 20 20 53 61 76 65 20 20 | 20 20 20 20 20 20 20 20 | Save | |
|00003510| 20 68 61 73 20 74 68 65 | 20 6e 61 6d 65 20 6f 66 | has the| name of|
|00003520| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 62 75 66 | the cur|rent buf|
|00003530| 66 65 72 20 61 70 70 65 | 6e 64 65 64 20 74 6f 20 |fer appe|nded to |
|00003540| 69 74 2c 20 61 6e 64 20 | 69 73 0a 20 20 20 20 20 |it, and |is. |
|00003550| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 6e 73 | | sens|
|00003560| 69 74 69 76 65 20 6f 6e | 6c 79 20 77 68 65 6e 20 |itive on|ly when |
|00003570| 74 68 65 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |the curr|ent buff|
|00003580| 65 72 20 69 73 20 6d 6f | 64 69 66 69 65 64 2e 0a |er is mo|dified..|
|00003590| 20 20 52 65 76 65 72 74 | 20 42 75 66 66 65 72 20 | Revert| Buffer |
|000035a0| 20 68 61 73 20 74 68 65 | 20 6e 61 6d 65 20 6f 66 | has the| name of|
|000035b0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 62 75 66 | the cur|rent buf|
|000035c0| 66 65 72 20 61 70 70 65 | 6e 64 65 64 20 74 6f 20 |fer appe|nded to |
|000035d0| 69 74 2c 20 61 6e 64 20 | 69 73 0a 20 20 20 20 20 |it, and |is. |
|000035e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 65 6e 73 | | sens|
|000035f0| 69 74 69 76 65 20 6f 6e | 6c 79 20 77 68 65 6e 20 |itive on|ly when |
|00003600| 74 68 65 20 63 75 72 72 | 65 6e 74 20 62 75 66 66 |the curr|ent buff|
|00003610| 65 72 20 68 61 73 20 61 | 20 66 69 6c 65 2e 0a 20 |er has a| file.. |
|00003620| 20 44 65 6c 65 74 65 20 | 46 72 61 6d 65 20 20 20 | Delete |Frame |
|00003630| 73 65 6e 73 69 74 69 76 | 65 20 6f 6e 6c 79 20 77 |sensitiv|e only w|
|00003640| 68 65 6e 20 74 68 65 72 | 65 20 69 73 20 6d 6f 72 |hen ther|e is mor|
|00003650| 65 20 74 68 61 6e 20 6f | 6e 65 20 66 72 61 6d 65 |e than o|ne frame|
|00003660| 2e 0a 0a 54 68 65 20 6e | 61 6d 65 20 6f 66 20 74 |...The n|ame of t|
|00003670| 68 65 20 63 75 72 72 65 | 6e 74 20 62 75 66 66 65 |he curre|nt buffe|
|00003680| 72 20 69 73 20 6f 6e 6c | 79 20 61 70 70 65 6e 64 |r is onl|y append|
|00003690| 65 64 20 74 6f 20 74 68 | 65 20 6d 65 6e 75 20 69 |ed to th|e menu i|
|000036a0| 74 65 6d 73 20 69 66 0a | 60 70 75 74 2d 62 75 66 |tems if.|`put-buf|
|000036b0| 66 65 72 2d 6e 61 6d 65 | 73 2d 69 6e 2d 66 69 6c |fer-name|s-in-fil|
|000036c0| 65 2d 6d 65 6e 75 27 20 | 69 73 20 6e 6f 6e 2d 6e |e-menu' |is non-n|
|000036d0| 69 6c 2e 20 20 54 68 69 | 73 20 62 65 68 61 76 69 |il. Thi|s behavi|
|000036e0| 6f 72 20 69 73 20 74 68 | 65 20 64 65 66 61 75 6c |or is th|e defaul|
|000036f0| 74 2e 22 5d 29 0a 28 66 | 73 65 74 20 27 65 64 69 |t."]).(f|set 'edi|
|00003700| 74 2d 6d 65 6e 75 2d 66 | 69 6c 74 65 72 20 23 5b |t-menu-f|ilter #[|
|00003710| 28 6d 65 6e 75 2d 69 74 | 65 6d 73 29 20 22 c0 19 |(menu-it|ems) "..|
|00003720| c0 1a 0b 1c c5 c6 20 21 | c7 3d 89 1e 08 ad 82 c9 |...... !|.=......|
|00003730| 20 1e 5c 6e 0e 08 ad 83 | cb cc 21 1e 0d c0 1e 0e | .\n....|..!.....|
|00003740| c0 1e 0f 0b 40 0b 41 13 | 89 11 ab e8 d0 09 21 ab |....@.A.|......!.|
|00003750| 72 09 d1 48 89 12 d2 9d | ab 86 09 d3 0e 5c 6e 49 |r..H....|.....\nI|
|00003760| 88 5c 6e d4 98 ab 86 09 | d3 0e 0d 49 88 5c 6e d5 |.\n.....|...I.\n.|
|00003770| 9d ab 53 0e 16 d7 3d ab | 90 d8 16 0e d9 da 21 ad |..S...=.|......!.|
|00003780| 82 0e 1a 3f 3f 16 0f aa | 99 db 16 0e 0e 1c dd 3d |...??...|.......=|
|00003790| 3f ad 8d 0e 1c ae 87 d9 | da 21 ad 82 0e 1a 3f 3f |?.......|.!....??|
|000037a0| 16 0f 0e 1e ab 83 c0 16 | 0f 09 d1 0e 0e 49 88 09 |........|.....I..|
|000037b0| d3 0e 0f 49 88 aa 0f 0c | 2e 08 87 22 20 5b 6e 69 |...I....|..." [ni|
|000037c0| 6c 20 69 74 65 6d 20 6e | 61 6d 65 20 6d 65 6e 75 |l item n|ame menu|
|000037d0| 2d 69 74 65 6d 73 20 72 | 65 73 75 6c 74 20 64 65 |-items r|esult de|
|000037e0| 76 69 63 65 2d 74 79 70 | 65 20 73 65 6c 65 63 74 |vice-typ|e select|
|000037f0| 65 64 2d 64 65 76 69 63 | 65 20 78 20 78 2d 64 65 |ed-devic|e x x-de|
|00003800| 76 20 78 2d 73 65 6c 65 | 63 74 69 6f 6e 2d 6f 77 |v x-sele|ction-ow|
|00003810| 6e 65 72 2d 70 20 65 6d | 61 63 73 2d 6f 77 6e 73 |ner-p em|acs-owns|
|00003820| 2d 73 65 6c 65 63 74 69 | 6f 6e 2d 70 20 78 2d 73 |-selecti|on-p x-s|
|00003830| 65 6c 65 63 74 69 6f 6e | 2d 65 78 69 73 74 73 2d |election|-exists-|
|00003840| 70 20 43 4c 49 50 42 4f | 41 52 44 20 63 6c 69 70 |p CLIPBO|ARD clip|
|00003850| 62 6f 61 72 64 2d 65 78 | 69 73 74 73 2d 70 20 75 |board-ex|ists-p u|
|00003860| 6e 64 6f 2d 6e 61 6d 65 | 20 75 6e 64 6f 2d 73 74 |ndo-name| undo-st|
|00003870| 61 74 65 20 76 65 63 74 | 6f 72 70 20 30 20 28 22 |ate vect|orp 0 ("|
|00003880| 43 75 74 22 20 22 43 6f | 70 79 22 20 22 43 6c 65 |Cut" "Co|py" "Cle|
|00003890| 61 72 22 29 20 32 20 22 | 50 61 73 74 65 22 20 28 |ar") 2 "|Paste" (|
|000038a0| 22 55 6e 64 6f 22 20 22 | 55 6e 64 6f 20 4d 6f 72 |"Undo" "|Undo Mor|
|000038b0| 65 22 29 20 6c 61 73 74 | 2d 63 6f 6d 6d 61 6e 64 |e") last|-command|
|000038c0| 20 75 6e 64 6f 20 22 55 | 6e 64 6f 20 4d 6f 72 65 | undo "U|ndo More|
|000038d0| 22 20 62 6f 75 6e 64 70 | 20 70 65 6e 64 69 6e 67 |" boundp| pending|
|000038e0| 2d 75 6e 64 6f 2d 6c 69 | 73 74 20 22 55 6e 64 6f |-undo-li|st "Undo|
|000038f0| 22 20 62 75 66 66 65 72 | 2d 75 6e 64 6f 2d 6c 69 |" buffer|-undo-li|
|00003900| 73 74 20 74 20 62 75 66 | 66 65 72 2d 72 65 61 64 |st t buf|fer-read|
|00003910| 2d 6f 6e 6c 79 5d 20 34 | 20 22 5c 0a 46 6f 72 20 |-only] 4| "\.For |
|00003920| 75 73 65 20 61 73 20 61 | 6e 20 69 6e 63 72 65 6d |use as a|n increm|
|00003930| 65 6e 74 61 6c 20 6d 65 | 6e 75 20 63 6f 6e 73 74 |ental me|nu const|
|00003940| 72 75 63 74 69 6f 6e 20 | 66 69 6c 74 65 72 2e 0a |ruction |filter..|
|00003950| 54 68 69 73 20 66 75 6e | 63 74 69 6f 6e 20 63 68 |This fun|ction ch|
|00003960| 61 6e 67 65 73 20 74 68 | 65 20 73 65 6e 73 69 74 |anges th|e sensit|
|00003970| 69 76 69 74 79 20 6f 66 | 20 74 68 65 73 65 20 45 |ivity of| these E|
|00003980| 64 69 74 20 6d 65 6e 75 | 20 69 74 65 6d 73 3a 0a |dit menu| items:.|
|00003990| 0a 20 20 43 75 74 20 20 | 20 20 73 65 6e 73 69 74 |. Cut | sensit|
|000039a0| 69 76 65 20 6f 6e 6c 79 | 20 77 68 65 6e 20 65 6d |ive only| when em|
|000039b0| 61 63 73 20 6f 77 6e 73 | 20 74 68 65 20 70 72 69 |acs owns| the pri|
|000039c0| 6d 61 72 79 20 58 20 53 | 65 6c 65 63 74 69 6f 6e |mary X S|election|
|000039d0| 2e 0a 20 20 43 6f 70 79 | 20 20 20 73 65 6e 73 69 |.. Copy| sensi|
|000039e0| 74 69 76 65 20 6f 6e 6c | 79 20 77 68 65 6e 20 65 |tive onl|y when e|
|000039f0| 6d 61 63 73 20 6f 77 6e | 73 20 74 68 65 20 70 72 |macs own|s the pr|
|00003a00| 69 6d 61 72 79 20 58 20 | 53 65 6c 65 63 74 69 6f |imary X |Selectio|
|00003a10| 6e 2e 0a 20 20 43 6c 65 | 61 72 20 20 73 65 6e 73 |n.. Cle|ar sens|
|00003a20| 69 74 69 76 65 20 6f 6e | 6c 79 20 77 68 65 6e 20 |itive on|ly when |
|00003a30| 65 6d 61 63 73 20 6f 77 | 6e 73 20 74 68 65 20 70 |emacs ow|ns the p|
|00003a40| 72 69 6d 61 72 79 20 58 | 20 53 65 6c 65 63 74 69 |rimary X| Selecti|
|00003a50| 6f 6e 2e 0a 20 20 50 61 | 73 74 65 20 20 73 65 6e |on.. Pa|ste sen|
|00003a60| 73 69 74 69 76 65 20 6f | 6e 6c 79 20 77 68 65 6e |sitive o|nly when|
|00003a70| 20 74 68 65 72 65 20 69 | 73 20 61 6e 20 6f 77 6e | there i|s an own|
|00003a80| 65 72 20 66 6f 72 20 74 | 68 65 20 58 20 43 6c 69 |er for t|he X Cli|
|00003a90| 70 62 6f 61 72 64 20 53 | 65 6c 65 63 74 69 6f 6e |pboard S|election|
|00003aa0| 2e 0a 20 20 55 6e 64 6f | 20 20 20 73 65 6e 73 69 |.. Undo| sensi|
|00003ab0| 74 69 76 65 20 6f 6e 6c | 79 20 77 68 65 6e 20 74 |tive onl|y when t|
|00003ac0| 68 65 72 65 20 69 73 20 | 75 6e 64 6f 20 69 6e 66 |here is |undo inf|
|00003ad0| 6f 72 6d 61 74 69 6f 6e | 2e 0a 20 20 20 20 20 20 |ormation|.. |
|00003ae0| 20 20 20 57 68 69 6c 65 | 20 69 6e 20 74 68 65 20 | While| in the |
|00003af0| 6d 69 64 73 74 20 6f 66 | 20 61 6e 20 75 6e 64 6f |midst of| an undo|
|00003b00| 2c 20 74 68 69 73 20 69 | 73 20 63 68 61 6e 67 65 |, this i|s change|
|00003b10| 64 20 74 6f 20 5c 22 55 | 6e 64 6f 20 4d 6f 72 65 |d to \"U|ndo More|
|00003b20| 5c 22 2e 22 5d 29 0a 28 | 66 73 65 74 20 27 73 6c |\"."]).(|fset 'sl|
|00003b30| 6f 77 2d 66 6f 72 6d 61 | 74 2d 62 75 66 66 65 72 |ow-forma|t-buffer|
|00003b40| 73 2d 6d 65 6e 75 2d 6c | 69 6e 65 20 23 5b 28 62 |s-menu-l|ine #[(b|
|00003b50| 75 66 66 65 72 29 20 22 | c0 c1 c2 0b 21 5c 22 3f |uffer) "|....!\"?|
|00003b60| ad a6 8a 0b 71 88 c4 20 | 1d c6 c7 c8 20 ab 83 c9 |....q.. |.... ...|
|00003b70| aa 81 ca 0e 0b ab 83 cc | aa 81 ca c2 20 0d 0e 0d |........|.... ...|
|00003b80| ce 20 ae 81 cf 26 07 2a | 87 22 20 5b 73 74 72 69 |. ...&.*|." [stri|
|00003b90| 6e 67 2d 6d 61 74 63 68 | 20 22 5c 5c 60 20 22 20 |ng-match| "\\` " |
|00003ba0| 62 75 66 66 65 72 2d 6e | 61 6d 65 20 62 75 66 66 |buffer-n|ame buff|
|00003bb0| 65 72 20 62 75 66 66 65 | 72 2d 73 69 7a 65 20 73 |er buffe|r-size s|
|00003bc0| 69 7a 65 20 66 6f 72 6d | 61 74 20 22 25 73 25 73 |ize form|at "%s%s|
|00003bd0| 20 25 2d 31 39 73 20 25 | 36 73 20 25 2d 31 35 73 | %-19s %|6s %-15s|
|00003be0| 20 25 73 22 20 62 75 66 | 66 65 72 2d 6d 6f 64 69 | %s" buf|fer-modi|
|00003bf0| 66 69 65 64 2d 70 20 22 | 2a 22 20 22 20 22 20 62 |fied-p "|*" " " b|
|00003c00| 75 66 66 65 72 2d 72 65 | 61 64 2d 6f 6e 6c 79 20 |uffer-re|ad-only |
|00003c10| 22 25 22 20 6d 6f 64 65 | 2d 6e 61 6d 65 20 62 75 |"%" mode|-name bu|
|00003c20| 66 66 65 72 2d 66 69 6c | 65 2d 6e 61 6d 65 20 22 |ffer-fil|e-name "|
|00003c30| 22 5d 20 38 20 22 5c 0a | 52 65 74 75 72 6e 73 20 |"] 8 "\.|Returns |
|00003c40| 61 20 73 74 72 69 6e 67 | 20 74 6f 20 72 65 70 72 |a string| to repr|
|00003c50| 65 73 65 6e 74 20 74 68 | 65 20 67 69 76 65 6e 20 |esent th|e given |
|00003c60| 62 75 66 66 65 72 20 69 | 6e 20 74 68 65 20 42 75 |buffer i|n the Bu|
|00003c70| 66 66 65 72 20 6d 65 6e | 75 2e 0a 6e 69 6c 20 6d |ffer men|u..nil m|
|00003c80| 65 61 6e 73 20 74 68 65 | 20 62 75 66 66 65 72 20 |eans the| buffer |
|00003c90| 73 68 6f 75 6c 64 6e 27 | 74 20 62 65 20 6c 69 73 |shouldn'|t be lis|
|00003ca0| 74 65 64 2e 20 20 59 6f | 75 20 63 61 6e 20 72 65 |ted. Yo|u can re|
|00003cb0| 64 65 66 69 6e 65 20 74 | 68 69 73 2e 22 5d 29 0a |define t|his."]).|
|00003cc0| 28 66 73 65 74 20 27 66 | 6f 72 6d 61 74 2d 62 75 |(fset 'f|ormat-bu|
|00003cd0| 66 66 65 72 73 2d 6d 65 | 6e 75 2d 6c 69 6e 65 20 |ffers-me|nu-line |
|00003ce0| 23 5b 28 62 75 66 66 65 | 72 29 20 22 c0 c1 c2 0b |#[(buffe|r) "....|
|00003cf0| 21 89 13 5c 22 3f ad 81 | 0b 87 22 20 5b 73 74 72 |!..\"?..|.." [str|
|00003d00| 69 6e 67 2d 6d 61 74 63 | 68 20 22 5c 5c 60 20 22 |ing-matc|h "\\` "|
|00003d10| 20 62 75 66 66 65 72 2d | 6e 61 6d 65 20 62 75 66 | buffer-|name buf|
|00003d20| 66 65 72 5d 20 34 20 22 | 5c 0a 52 65 74 75 72 6e |fer] 4 "|\.Return|
|00003d30| 73 20 61 20 73 74 72 69 | 6e 67 20 74 6f 20 72 65 |s a stri|ng to re|
|00003d40| 70 72 65 73 65 6e 74 20 | 74 68 65 20 67 69 76 65 |present |the give|
|00003d50| 6e 20 62 75 66 66 65 72 | 20 69 6e 20 74 68 65 20 |n buffer| in the |
|00003d60| 42 75 66 66 65 72 20 6d | 65 6e 75 2e 0a 6e 69 6c |Buffer m|enu..nil|
|00003d70| 20 6d 65 61 6e 73 20 74 | 68 65 20 62 75 66 66 65 | means t|he buffe|
|00003d80| 72 20 73 68 6f 75 6c 64 | 6e 27 74 20 62 65 20 6c |r should|n't be l|
|00003d90| 69 73 74 65 64 2e 20 20 | 59 6f 75 20 63 61 6e 20 |isted. |You can |
|00003da0| 72 65 64 65 66 69 6e 65 | 20 74 68 69 73 2e 22 5d |redefine| this."]|
|00003db0| 29 0a 28 64 65 66 76 61 | 72 20 62 75 66 66 65 72 |).(defva|r buffer|
|00003dc0| 73 2d 6d 65 6e 75 2d 6d | 61 78 2d 73 69 7a 65 20 |s-menu-m|ax-size |
|00003dd0| 32 30 20 22 5c 0a 2a 4d | 61 78 69 6d 75 6d 20 6e |20 "\.*M|aximum n|
|00003de0| 75 6d 62 65 72 20 6f 66 | 20 65 6e 74 72 69 65 73 |umber of| entries|
|00003df0| 20 77 68 69 63 68 20 6d | 61 79 20 61 70 70 65 61 | which m|ay appea|
|00003e00| 72 20 6f 6e 20 74 68 65 | 20 5c 22 42 75 66 66 65 |r on the| \"Buffe|
|00003e10| 72 73 5c 22 20 6d 65 6e | 75 2e 0a 49 66 20 74 68 |rs\" men|u..If th|
|00003e20| 69 73 20 69 73 20 31 30 | 2c 20 74 68 65 6e 20 6f |is is 10|, then o|
|00003e30| 6e 6c 79 20 74 68 65 20 | 74 65 6e 20 6d 6f 73 74 |nly the |ten most|
|00003e40| 2d 72 65 63 65 6e 74 6c | 79 2d 73 65 6c 65 63 74 |-recentl|y-select|
|00003e50| 65 64 20 62 75 66 66 65 | 72 73 20 77 69 6c 6c 20 |ed buffe|rs will |
|00003e60| 62 65 0a 73 68 6f 77 6e | 2e 20 20 49 66 20 74 68 |be.shown|. If th|
|00003e70| 69 73 20 69 73 20 6e 69 | 6c 2c 20 74 68 65 6e 20 |is is ni|l, then |
|00003e80| 61 6c 6c 20 62 75 66 66 | 65 72 73 20 77 69 6c 6c |all buff|ers will|
|00003e90| 20 62 65 20 73 68 6f 77 | 6e 2e 20 20 53 65 74 74 | be show|n. Sett|
|00003ea0| 69 6e 67 20 74 68 69 73 | 20 74 6f 0a 61 20 6c 61 |ing this| to.a la|
|00003eb0| 72 67 65 20 6e 75 6d 62 | 65 72 20 6f 72 20 6e 69 |rge numb|er or ni|
|00003ec0| 6c 20 77 69 6c 6c 20 73 | 6c 6f 77 20 64 6f 77 6e |l will s|low down|
|00003ed0| 20 6d 65 6e 75 20 72 65 | 73 70 6f 6e 73 69 76 65 | menu re|sponsive|
|00003ee0| 6e 65 73 73 2e 22 29 0a | 28 64 65 66 76 61 72 20 |ness.").|(defvar |
|00003ef0| 63 6f 6d 70 6c 65 78 2d | 62 75 66 66 65 72 73 2d |complex-|buffers-|
|00003f00| 6d 65 6e 75 2d 70 20 6e | 69 6c 20 22 5c 0a 2a 49 |menu-p n|il "\.*I|
|00003f10| 66 20 74 72 75 65 2c 20 | 74 68 65 20 62 75 66 66 |f true, |the buff|
|00003f20| 65 72 73 20 6d 65 6e 75 | 20 77 69 6c 6c 20 63 6f |ers menu| will co|
|00003f30| 6e 74 61 69 6e 20 73 65 | 76 65 72 61 6c 20 63 6f |ntain se|veral co|
|00003f40| 6d 6d 61 6e 64 73 2c 20 | 61 73 20 73 75 62 6d 65 |mmands, |as subme|
|00003f50| 6e 75 73 0a 6f 66 20 65 | 61 63 68 20 62 75 66 66 |nus.of e|ach buff|
|00003f60| 65 72 20 6c 69 6e 65 2e | 20 20 49 66 20 74 68 69 |er line.| If thi|
|00003f70| 73 20 69 73 20 66 61 6c | 73 65 2c 20 74 68 65 6e |s is fal|se, then|
|00003f80| 20 74 68 65 72 65 20 77 | 69 6c 6c 20 62 65 20 6f | there w|ill be o|
|00003f90| 6e 6c 79 20 6f 6e 65 20 | 63 6f 6d 6d 61 6e 64 3a |nly one |command:|
|00003fa0| 0a 73 65 6c 65 63 74 20 | 74 68 61 74 20 62 75 66 |.select |that buf|
|00003fb0| 66 65 72 2e 22 29 0a 28 | 64 65 66 76 61 72 20 62 |fer.").(|defvar b|
|00003fc0| 75 66 66 65 72 73 2d 6d | 65 6e 75 2d 73 77 69 74 |uffers-m|enu-swit|
|00003fd0| 63 68 2d 74 6f 2d 62 75 | 66 66 65 72 2d 66 75 6e |ch-to-bu|ffer-fun|
|00003fe0| 63 74 69 6f 6e 20 27 73 | 77 69 74 63 68 2d 74 6f |ction 's|witch-to|
|00003ff0| 2d 62 75 66 66 65 72 20 | 22 5c 0a 2a 54 68 65 20 |-buffer |"\.*The |
|00004000| 66 75 6e 63 74 69 6f 6e | 20 74 6f 20 63 61 6c 6c |function| to call|
|00004010| 20 74 6f 20 73 65 6c 65 | 63 74 20 61 20 62 75 66 | to sele|ct a buf|
|00004020| 66 65 72 20 66 72 6f 6d | 20 74 68 65 20 62 75 66 |fer from| the buf|
|00004030| 66 65 72 73 20 6d 65 6e | 75 2e 0a 60 73 77 69 74 |fers men|u..`swit|
|00004040| 63 68 2d 74 6f 2d 62 75 | 66 66 65 72 27 20 69 73 |ch-to-bu|ffer' is|
|00004050| 20 61 20 67 6f 6f 64 20 | 63 68 6f 69 63 65 2c 20 | a good |choice, |
|00004060| 61 73 20 69 73 20 60 70 | 6f 70 2d 74 6f 2d 62 75 |as is `p|op-to-bu|
|00004070| 66 66 65 72 27 2e 22 29 | 0a 28 62 79 74 65 2d 63 |ffer'.")|.(byte-c|
|00004080| 6f 64 65 20 22 c0 c1 4d | 88 c2 c3 4d 88 c4 c5 4d |ode "..M|...M...M|
|00004090| 88 c4 c6 4e c7 3e ac 85 | c8 c9 c4 5c 22 88 ca c4 |...N.>..|...\"...|
|000040a0| c6 cb 23 87 22 20 5b 62 | 75 66 66 65 72 2d 6d 65 |..#." [b|uffer-me|
|000040b0| 6e 75 2d 73 61 76 65 2d | 62 75 66 66 65 72 20 23 |nu-save-|buffer #|
|000040c0| 5b 28 62 75 66 66 65 72 | 29 20 22 8a 08 71 88 c1 |[(buffer|) "..q..|
|000040d0| 20 29 87 22 20 5b 62 75 | 66 66 65 72 20 73 61 76 | )." [bu|ffer sav|
|000040e0| 65 2d 62 75 66 66 65 72 | 5d 20 31 5d 20 62 75 66 |e-buffer|] 1] buf|
|000040f0| 66 65 72 2d 6d 65 6e 75 | 2d 77 72 69 74 65 2d 66 |fer-menu|-write-f|
|00004100| 69 6c 65 20 23 5b 28 62 | 75 66 66 65 72 29 20 22 |ile #[(b|uffer) "|
|00004110| 8a 08 71 88 c1 c2 c3 c4 | c5 70 21 5c 22 21 21 29 |..q.....|.p!\"!!)|
|00004120| 87 22 20 5b 62 75 66 66 | 65 72 20 77 72 69 74 65 |." [buff|er write|
|00004130| 2d 66 69 6c 65 20 72 65 | 61 64 2d 66 69 6c 65 2d |-file re|ad-file-|
|00004140| 6e 61 6d 65 20 66 6f 72 | 6d 61 74 20 22 57 72 69 |name for|mat "Wri|
|00004150| 74 65 20 25 73 20 74 6f | 20 66 69 6c 65 3a 20 22 |te %s to| file: "|
|00004160| 20 62 75 66 66 65 72 2d | 6e 61 6d 65 5d 20 36 5d | buffer-|name] 6]|
|00004170| 20 62 75 69 6c 64 2d 62 | 75 66 66 65 72 73 2d 6d | build-b|uffers-m|
|00004180| 65 6e 75 2d 69 6e 74 65 | 72 6e 61 6c 20 23 5b 28 |enu-inte|rnal #[(|
|00004190| 62 75 66 66 65 72 73 29 | 20 22 c0 89 19 1a c3 0c |buffers)| "......|
|000041a0| ab 83 c5 aa 81 c6 0e 07 | 5c 22 2a 87 22 20 5b 6e |........|\"*." [n|
|000041b0| 69 6c 20 6c 69 6e 65 20 | 6e 61 6d 65 20 6d 61 70 |il line |name map|
|000041c0| 63 61 72 20 63 6f 6d 70 | 6c 65 78 2d 62 75 66 66 |car comp|lex-buff|
|000041d0| 65 72 73 2d 6d 65 6e 75 | 2d 70 20 23 5b 28 62 75 |ers-menu|-p #[(bu|
|000041e0| 66 66 65 72 29 20 22 c0 | 09 21 89 12 ad ca c3 c4 |ffer) ".|.!......|
|000041f0| 5c 6e c5 c6 0e 07 c8 09 | 21 89 16 09 44 ca 23 0e |\n......|!...D.#.|
|00004200| 07 cb 3d ad 8c c5 cc cd | c8 09 21 89 16 09 44 ca |..=.....|..!...D.|
|00004210| 23 ce 09 21 ab 8f cf 09 | 21 ab 8a c5 d0 d1 0e 09 |#..!....|!.......|
|00004220| 44 ca 23 aa 81 d2 c5 d3 | d4 0e 09 44 ca 23 c5 d5 |D.#.....|...D.#..|
|00004230| d6 0e 09 44 ca 23 af 06 | 5c 22 87 22 20 5b 66 6f |...D.#..|\"." [fo|
|00004240| 72 6d 61 74 2d 62 75 66 | 66 65 72 73 2d 6d 65 6e |rmat-buf|fers-men|
|00004250| 75 2d 6c 69 6e 65 20 62 | 75 66 66 65 72 20 6c 69 |u-line b|uffer li|
|00004260| 6e 65 20 64 65 6c 71 20 | 6e 69 6c 20 76 65 63 74 |ne delq |nil vect|
|00004270| 6f 72 20 22 53 77 69 74 | 63 68 20 74 6f 20 42 75 |or "Swit|ch to Bu|
|00004280| 66 66 65 72 22 20 62 75 | 66 66 65 72 73 2d 6d 65 |ffer" bu|ffers-me|
|00004290| 6e 75 2d 73 77 69 74 63 | 68 2d 74 6f 2d 62 75 66 |nu-switc|h-to-buf|
|000042a0| 66 65 72 2d 66 75 6e 63 | 74 69 6f 6e 20 62 75 66 |fer-func|tion buf|
|000042b0| 66 65 72 2d 6e 61 6d 65 | 20 6e 61 6d 65 20 74 20 |fer-name| name t |
|000042c0| 73 77 69 74 63 68 2d 74 | 6f 2d 62 75 66 66 65 72 |switch-t|o-buffer|
|000042d0| 20 22 53 77 69 74 63 68 | 20 74 6f 20 42 75 66 66 | "Switch| to Buff|
|000042e0| 65 72 2c 20 4f 74 68 65 | 72 20 46 72 61 6d 65 22 |er, Othe|r Frame"|
|000042f0| 20 73 77 69 74 63 68 2d | 74 6f 2d 62 75 66 66 65 | switch-|to-buffe|
|00004300| 72 2d 6f 74 68 65 72 2d | 66 72 61 6d 65 20 62 75 |r-other-|frame bu|
|00004310| 66 66 65 72 2d 6d 6f 64 | 69 66 69 65 64 2d 70 20 |ffer-mod|ified-p |
|00004320| 62 75 66 66 65 72 2d 66 | 69 6c 65 2d 6e 61 6d 65 |buffer-f|ile-name|
|00004330| 20 22 53 61 76 65 20 42 | 75 66 66 65 72 22 20 62 | "Save B|uffer" b|
|00004340| 75 66 66 65 72 2d 6d 65 | 6e 75 2d 73 61 76 65 2d |uffer-me|nu-save-|
|00004350| 62 75 66 66 65 72 20 5b | 22 53 61 76 65 20 42 75 |buffer [|"Save Bu|
|00004360| 66 66 65 72 22 20 6e 69 | 6c 20 6e 69 6c 5d 20 22 |ffer" ni|l nil] "|
|00004370| 53 61 76 65 20 41 73 2e | 2e 2e 22 20 62 75 66 66 |Save As.|.." buff|
|00004380| 65 72 2d 6d 65 6e 75 2d | 77 72 69 74 65 2d 66 69 |er-menu-|write-fi|
|00004390| 6c 65 20 22 44 65 6c 65 | 74 65 20 42 75 66 66 65 |le "Dele|te Buffe|
|000043a0| 72 22 20 6b 69 6c 6c 2d | 62 75 66 66 65 72 5d 20 |r" kill-|buffer] |
|000043b0| 31 31 5d 20 23 5b 28 62 | 75 66 66 65 72 29 20 22 |11] #[(b|uffer) "|
|000043c0| c0 09 21 89 12 ad 89 c3 | 5c 6e 0c c5 09 21 44 c6 |..!.....|\n...!D.|
|000043d0| 23 87 22 20 5b 66 6f 72 | 6d 61 74 2d 62 75 66 66 |#." [for|mat-buff|
|000043e0| 65 72 73 2d 6d 65 6e 75 | 2d 6c 69 6e 65 20 62 75 |ers-menu|-line bu|
|000043f0| 66 66 65 72 20 6c 69 6e | 65 20 76 65 63 74 6f 72 |ffer lin|e vector|
|00004400| 20 62 75 66 66 65 72 73 | 2d 6d 65 6e 75 2d 73 77 | buffers|-menu-sw|
|00004410| 69 74 63 68 2d 74 6f 2d | 62 75 66 66 65 72 2d 66 |itch-to-|buffer-f|
|00004420| 75 6e 63 74 69 6f 6e 20 | 62 75 66 66 65 72 2d 6e |unction |buffer-n|
|00004430| 61 6d 65 20 74 5d 20 35 | 5d 20 62 75 66 66 65 72 |ame t] 5|] buffer|
|00004440| 73 5d 20 33 5d 20 62 79 | 74 65 2d 6f 70 74 69 6d |s] 3] by|te-optim|
|00004450| 69 7a 65 72 20 28 6e 69 | 6c 20 62 79 74 65 2d 63 |izer (ni|l byte-c|
|00004460| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00004470| 70 61 6e 64 29 20 65 72 | 72 6f 72 20 22 25 73 20 |pand) er|ror "%s |
|00004480| 61 6c 72 65 61 64 79 20 | 68 61 73 20 61 20 62 79 |already |has a by|
|00004490| 74 65 2d 6f 70 74 69 6d | 69 7a 65 72 2c 20 63 61 |te-optim|izer, ca|
|000044a0| 6e 27 74 20 6d 61 6b 65 | 20 69 74 20 69 6e 6c 69 |n't make| it inli|
|000044b0| 6e 65 22 20 70 75 74 20 | 62 79 74 65 2d 63 6f 6d |ne" put |byte-com|
|000044c0| 70 69 6c 65 2d 69 6e 6c | 69 6e 65 2d 65 78 70 61 |pile-inl|ine-expa|
|000044d0| 6e 64 5d 20 34 29 0a 28 | 66 73 65 74 20 27 62 75 |nd] 4).(|fset 'bu|
|000044e0| 66 66 65 72 73 2d 6d 65 | 6e 75 2d 66 69 6c 74 65 |ffers-me|nu-filte|
|000044f0| 72 20 23 5b 28 6d 65 6e | 75 29 20 22 c0 20 19 5c |r #[(men|u) ". .\|
|00004500| 6e a8 ab 91 5c 6e c3 56 | ab 8c 09 47 5c 6e 56 ab |n...\n.V|...G\nV.|
|00004510| 86 5c 6e 09 9b c4 a1 88 | c5 c4 09 19 c4 89 1e 06 |.\n.....|........|
|00004520| 1e 07 c8 0e 09 ab 83 ca | aa 81 cb 09 5c 22 2b 5c |........|....\"+\|
|00004530| 22 11 cc 0e 0d 09 5c 22 | 29 87 22 20 5b 62 75 66 |".....\"|)." [buf|
|00004540| 66 65 72 2d 6c 69 73 74 | 20 62 75 66 66 65 72 73 |fer-list| buffers|
|00004550| 20 62 75 66 66 65 72 73 | 2d 6d 65 6e 75 2d 6d 61 | buffers|-menu-ma|
|00004560| 78 2d 73 69 7a 65 20 31 | 20 6e 69 6c 20 64 65 6c |x-size 1| nil del|
|00004570| 71 20 6c 69 6e 65 20 6e | 61 6d 65 20 6d 61 70 63 |q line n|ame mapc|
|00004580| 61 72 20 63 6f 6d 70 6c | 65 78 2d 62 75 66 66 65 |ar compl|ex-buffe|
|00004590| 72 73 2d 6d 65 6e 75 2d | 70 20 23 5b 28 62 75 66 |rs-menu-|p #[(buf|
|000045a0| 66 65 72 29 20 22 c0 09 | 21 89 12 ad ca c3 c4 5c |fer) "..|!......\|
|000045b0| 6e c5 c6 0e 07 c8 09 21 | 89 16 09 44 ca 23 0e 07 |n......!|...D.#..|
|000045c0| cb 3d ad 8c c5 cc cd c8 | 09 21 89 16 09 44 ca 23 |.=......|.!...D.#|
|000045d0| ce 09 21 ab 8f cf 09 21 | ab 8a c5 d0 d1 0e 09 44 |..!....!|.......D|
|000045e0| ca 23 aa 81 d2 c5 d3 d4 | 0e 09 44 ca 23 c5 d5 d6 |.#......|..D.#...|
|000045f0| 0e 09 44 ca 23 af 06 5c | 22 87 22 20 5b 66 6f 72 |..D.#..\|"." [for|
|00004600| 6d 61 74 2d 62 75 66 66 | 65 72 73 2d 6d 65 6e 75 |mat-buff|ers-menu|
|00004610| 2d 6c 69 6e 65 20 62 75 | 66 66 65 72 20 6c 69 6e |-line bu|ffer lin|
|00004620| 65 20 64 65 6c 71 20 6e | 69 6c 20 76 65 63 74 6f |e delq n|il vecto|
|00004630| 72 20 22 53 77 69 74 63 | 68 20 74 6f 20 42 75 66 |r "Switc|h to Buf|
|00004640| 66 65 72 22 20 62 75 66 | 66 65 72 73 2d 6d 65 6e |fer" buf|fers-men|
|00004650| 75 2d 73 77 69 74 63 68 | 2d 74 6f 2d 62 75 66 66 |u-switch|-to-buff|
|00004660| 65 72 2d 66 75 6e 63 74 | 69 6f 6e 20 62 75 66 66 |er-funct|ion buff|
|00004670| 65 72 2d 6e 61 6d 65 20 | 6e 61 6d 65 20 74 20 73 |er-name |name t s|
|00004680| 77 69 74 63 68 2d 74 6f | 2d 62 75 66 66 65 72 20 |witch-to|-buffer |
|00004690| 22 53 77 69 74 63 68 20 | 74 6f 20 42 75 66 66 65 |"Switch |to Buffe|
|000046a0| 72 2c 20 4f 74 68 65 72 | 20 46 72 61 6d 65 22 20 |r, Other| Frame" |
|000046b0| 73 77 69 74 63 68 2d 74 | 6f 2d 62 75 66 66 65 72 |switch-t|o-buffer|
|000046c0| 2d 6f 74 68 65 72 2d 66 | 72 61 6d 65 20 62 75 66 |-other-f|rame buf|
|000046d0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 62 |fer-modi|fied-p b|
|000046e0| 75 66 66 65 72 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |uffer-fi|le-name |
|000046f0| 22 53 61 76 65 20 42 75 | 66 66 65 72 22 20 62 75 |"Save Bu|ffer" bu|
|00004700| 66 66 65 72 2d 6d 65 6e | 75 2d 73 61 76 65 2d 62 |ffer-men|u-save-b|
|00004710| 75 66 66 65 72 20 5b 22 | 53 61 76 65 20 42 75 66 |uffer ["|Save Buf|
|00004720| 66 65 72 22 20 6e 69 6c | 20 6e 69 6c 5d 20 22 53 |fer" nil| nil] "S|
|00004730| 61 76 65 20 41 73 2e 2e | 2e 22 20 62 75 66 66 65 |ave As..|." buffe|
|00004740| 72 2d 6d 65 6e 75 2d 77 | 72 69 74 65 2d 66 69 6c |r-menu-w|rite-fil|
|00004750| 65 20 22 44 65 6c 65 74 | 65 20 42 75 66 66 65 72 |e "Delet|e Buffer|
|00004760| 22 20 6b 69 6c 6c 2d 62 | 75 66 66 65 72 5d 20 31 |" kill-b|uffer] 1|
|00004770| 31 5d 20 23 5b 28 62 75 | 66 66 65 72 29 20 22 c0 |1] #[(bu|ffer) ".|
|00004780| 09 21 89 12 ad 89 c3 5c | 6e 0c c5 09 21 44 c6 23 |.!.....\|n...!D.#|
|00004790| 87 22 20 5b 66 6f 72 6d | 61 74 2d 62 75 66 66 65 |." [form|at-buffe|
|000047a0| 72 73 2d 6d 65 6e 75 2d | 6c 69 6e 65 20 62 75 66 |rs-menu-|line buf|
|000047b0| 66 65 72 20 6c 69 6e 65 | 20 76 65 63 74 6f 72 20 |fer line| vector |
|000047c0| 62 75 66 66 65 72 73 2d | 6d 65 6e 75 2d 73 77 69 |buffers-|menu-swi|
|000047d0| 74 63 68 2d 74 6f 2d 62 | 75 66 66 65 72 2d 66 75 |tch-to-b|uffer-fu|
|000047e0| 6e 63 74 69 6f 6e 20 62 | 75 66 66 65 72 2d 6e 61 |nction b|uffer-na|
|000047f0| 6d 65 20 74 5d 20 35 5d | 20 61 70 70 65 6e 64 20 |me t] 5]| append |
|00004800| 6d 65 6e 75 5d 20 35 20 | 22 5c 0a 54 68 69 73 20 |menu] 5 |"\.This |
|00004810| 69 73 20 74 68 65 20 6d | 65 6e 75 20 66 69 6c 74 |is the m|enu filt|
|00004820| 65 72 20 66 6f 72 20 74 | 68 65 20 74 6f 70 2d 6c |er for t|he top-l|
|00004830| 65 76 65 6c 20 62 75 66 | 66 65 72 73 20 5c 22 42 |evel buf|fers \"B|
|00004840| 75 66 66 65 72 73 5c 22 | 20 6d 65 6e 75 2e 0a 49 |uffers\"| menu..I|
|00004850| 74 20 64 79 6e 61 6d 69 | 63 61 6c 6c 79 20 63 72 |t dynami|cally cr|
|00004860| 65 61 74 65 73 20 61 20 | 6c 69 73 74 20 6f 66 20 |eates a |list of |
|00004870| 62 75 66 66 65 72 73 20 | 74 6f 20 75 73 65 20 61 |buffers |to use a|
|00004880| 73 20 74 68 65 20 63 6f | 6e 74 65 6e 74 73 20 6f |s the co|ntents o|
|00004890| 66 20 74 68 65 20 6d 65 | 6e 75 2e 0a 4f 6e 6c 79 |f the me|nu..Only|
|000048a0| 20 74 68 65 20 6d 6f 73 | 74 2d 72 65 63 65 6e 74 | the mos|t-recent|
|000048b0| 6c 79 2d 75 73 65 64 20 | 66 65 77 20 62 75 66 66 |ly-used |few buff|
|000048c0| 65 72 73 20 77 69 6c 6c | 20 62 65 20 6c 69 73 74 |ers will| be list|
|000048d0| 65 64 20 6f 6e 20 74 68 | 65 20 6d 65 6e 75 2c 20 |ed on th|e menu, |
|000048e0| 66 6f 72 0a 65 66 66 69 | 63 69 65 6e 63 79 20 72 |for.effi|ciency r|
|000048f0| 65 61 73 6f 6e 73 2e 20 | 20 59 6f 75 20 63 61 6e |easons. | You can|
|00004900| 20 63 6f 6e 74 72 6f 6c | 20 68 6f 77 20 6d 61 6e | control| how man|
|00004910| 79 20 62 75 66 66 65 72 | 73 20 77 69 6c 6c 20 62 |y buffer|s will b|
|00004920| 65 20 73 68 6f 77 6e 20 | 62 79 0a 73 65 74 74 69 |e shown |by.setti|
|00004930| 6e 67 20 60 62 75 66 66 | 65 72 73 2d 6d 65 6e 75 |ng `buff|ers-menu|
|00004940| 2d 6d 61 78 2d 73 69 7a | 65 27 2e 20 20 59 6f 75 |-max-siz|e'. You|
|00004950| 20 63 61 6e 20 63 6f 6e | 74 72 6f 6c 20 74 68 65 | can con|trol the|
|00004960| 20 74 65 78 74 20 6f 66 | 20 74 68 65 20 6d 65 6e | text of| the men|
|00004970| 75 0a 69 74 65 6d 73 20 | 62 79 20 72 65 64 65 66 |u.items |by redef|
|00004980| 69 6e 69 6e 67 20 74 68 | 65 20 66 75 6e 63 74 69 |ining th|e functi|
|00004990| 6f 6e 20 60 66 6f 72 6d | 61 74 2d 62 75 66 66 65 |on `form|at-buffe|
|000049a0| 72 73 2d 6d 65 6e 75 2d | 6c 69 6e 65 27 2e 22 5d |rs-menu-|line'."]|
|000049b0| 29 0a 28 64 65 66 63 6f | 6e 73 74 20 6f 70 74 69 |).(defco|nst opti|
|000049c0| 6f 6e 73 2d 6d 65 6e 75 | 2d 73 61 76 65 64 2d 66 |ons-menu|-saved-f|
|000049d0| 6f 72 6d 73 20 28 70 75 | 72 65 63 6f 70 79 20 27 |orms (pu|recopy '|
|000049e0| 28 6f 76 65 72 77 72 69 | 74 65 2d 6d 6f 64 65 20 |(overwri|te-mode |
|000049f0| 74 65 61 63 68 2d 65 78 | 74 65 6e 64 65 64 2d 63 |teach-ex|tended-c|
|00004a00| 6f 6d 6d 61 6e 64 73 2d | 70 20 62 61 72 2d 63 75 |ommands-|p bar-cu|
|00004a10| 72 73 6f 72 20 64 65 62 | 75 67 2d 6f 6e 2d 65 72 |rsor deb|ug-on-er|
|00004a20| 72 6f 72 20 64 65 62 75 | 67 2d 6f 6e 2d 71 75 69 |ror debu|g-on-qui|
|00004a30| 74 20 67 65 74 2d 66 72 | 61 6d 65 2d 66 6f 72 2d |t get-fr|ame-for-|
|00004a40| 62 75 66 66 65 72 2d 64 | 65 66 61 75 6c 74 2d 69 |buffer-d|efault-i|
|00004a50| 6e 73 74 61 6e 63 65 2d | 6c 69 6d 69 74 20 74 65 |nstance-|limit te|
|00004a60| 6d 70 2d 62 75 66 66 65 | 72 2d 73 68 6f 77 2d 66 |mp-buffe|r-show-f|
|00004a70| 75 6e 63 74 69 6f 6e 20 | 63 6f 6d 70 6c 65 78 2d |unction |complex-|
|00004a80| 62 75 66 66 65 72 73 2d | 6d 65 6e 75 2d 70 20 66 |buffers-|menu-p f|
|00004a90| 6f 6e 74 2d 6d 65 6e 75 | 2d 69 67 6e 6f 72 65 2d |ont-menu|-ignore-|
|00004aa0| 73 63 61 6c 65 64 2d 66 | 6f 6e 74 73 20 66 6f 6e |scaled-f|onts fon|
|00004ab0| 74 2d 6d 65 6e 75 2d 74 | 68 69 73 2d 66 72 61 6d |t-menu-t|his-fram|
|00004ac0| 65 2d 6f 6e 6c 79 2d 70 | 20 62 75 66 66 65 72 73 |e-only-p| buffers|
|00004ad0| 2d 6d 65 6e 75 2d 6d 61 | 78 2d 73 69 7a 65 20 63 |-menu-ma|x-size c|
|00004ae0| 61 73 65 2d 66 6f 6c 64 | 2d 73 65 61 72 63 68 20 |ase-fold|-search |
|00004af0| 63 61 73 65 2d 72 65 70 | 6c 61 63 65 20 7a 6d 61 |case-rep|lace zma|
|00004b00| 63 73 2d 72 65 67 69 6f | 6e 73 20 74 72 75 6e 63 |cs-regio|ns trunc|
|00004b10| 61 74 65 2d 6c 69 6e 65 | 73 20 6d 6f 75 73 65 2d |ate-line|s mouse-|
|00004b20| 79 61 6e 6b 2d 61 74 2d | 70 6f 69 6e 74 20 28 62 |yank-at-|point (b|
|00004b30| 61 63 6b 71 75 6f 74 65 | 20 28 73 65 74 2d 64 65 |ackquote| (set-de|
|00004b40| 66 61 75 6c 74 2d 74 6f | 6f 6c 62 61 72 2d 70 6f |fault-to|olbar-po|
|00004b50| 73 69 74 69 6f 6e 20 27 | 28 5c 2c 20 28 64 65 66 |sition '|(\, (def|
|00004b60| 61 75 6c 74 2d 74 6f 6f | 6c 62 61 72 2d 70 6f 73 |ault-too|lbar-pos|
|00004b70| 69 74 69 6f 6e 29 29 29 | 29 20 28 62 61 63 6b 71 |ition)))|) (backq|
|00004b80| 75 6f 74 65 20 28 61 64 | 64 2d 73 70 65 63 2d 6c |uote (ad|d-spec-l|
|00004b90| 69 73 74 2d 74 6f 2d 73 | 70 65 63 69 66 69 65 72 |ist-to-s|pecifier|
|00004ba0| 20 74 6f 70 2d 74 6f 6f | 6c 62 61 72 2d 68 65 69 | top-too|lbar-hei|
|00004bb0| 67 68 74 20 27 28 5c 2c | 20 28 73 70 65 63 69 66 |ght '(\,| (specif|
|00004bc0| 69 65 72 2d 73 70 65 63 | 2d 6c 69 73 74 20 74 6f |ier-spec|-list to|
|00004bd0| 70 2d 74 6f 6f 6c 62 61 | 72 2d 68 65 69 67 68 74 |p-toolba|r-height|
|00004be0| 20 27 67 6c 6f 62 61 6c | 29 29 29 29 20 28 62 61 | 'global|)))) (ba|
|00004bf0| 63 6b 71 75 6f 74 65 20 | 28 61 64 64 2d 73 70 65 |ckquote |(add-spe|
|00004c00| 63 2d 6c 69 73 74 2d 74 | 6f 2d 73 70 65 63 69 66 |c-list-t|o-specif|
|00004c10| 69 65 72 20 62 6f 74 74 | 6f 6d 2d 74 6f 6f 6c 62 |ier bott|om-toolb|
|00004c20| 61 72 2d 68 65 69 67 68 | 74 20 27 28 5c 2c 20 28 |ar-heigh|t '(\, (|
|00004c30| 73 70 65 63 69 66 69 65 | 72 2d 73 70 65 63 2d 6c |specifie|r-spec-l|
|00004c40| 69 73 74 20 62 6f 74 74 | 6f 6d 2d 74 6f 6f 6c 62 |ist bott|om-toolb|
|00004c50| 61 72 2d 68 65 69 67 68 | 74 20 27 67 6c 6f 62 61 |ar-heigh|t 'globa|
|00004c60| 6c 29 29 29 29 20 28 62 | 61 63 6b 71 75 6f 74 65 |l)))) (b|ackquote|
|00004c70| 20 28 61 64 64 2d 73 70 | 65 63 2d 6c 69 73 74 2d | (add-sp|ec-list-|
|00004c80| 74 6f 2d 73 70 65 63 69 | 66 69 65 72 20 6c 65 66 |to-speci|fier lef|
|00004c90| 74 2d 74 6f 6f 6c 62 61 | 72 2d 77 69 64 74 68 20 |t-toolba|r-width |
|00004ca0| 27 28 5c 2c 20 28 73 70 | 65 63 69 66 69 65 72 2d |'(\, (sp|ecifier-|
|00004cb0| 73 70 65 63 2d 6c 69 73 | 74 20 6c 65 66 74 2d 74 |spec-lis|t left-t|
|00004cc0| 6f 6f 6c 62 61 72 2d 77 | 69 64 74 68 20 27 67 6c |oolbar-w|idth 'gl|
|00004cd0| 6f 62 61 6c 29 29 29 29 | 20 28 62 61 63 6b 71 75 |obal))))| (backqu|
|00004ce0| 6f 74 65 20 28 61 64 64 | 2d 73 70 65 63 2d 6c 69 |ote (add|-spec-li|
|00004cf0| 73 74 2d 74 6f 2d 73 70 | 65 63 69 66 69 65 72 20 |st-to-sp|ecifier |
|00004d00| 72 69 67 68 74 2d 74 6f | 6f 6c 62 61 72 2d 77 69 |right-to|olbar-wi|
|00004d10| 64 74 68 20 27 28 5c 2c | 20 28 73 70 65 63 69 66 |dth '(\,| (specif|
|00004d20| 69 65 72 2d 73 70 65 63 | 2d 6c 69 73 74 20 72 69 |ier-spec|-list ri|
|00004d30| 67 68 74 2d 74 6f 6f 6c | 62 61 72 2d 77 69 64 74 |ght-tool|bar-widt|
|00004d40| 68 20 27 67 6c 6f 62 61 | 6c 29 29 29 29 20 28 62 |h 'globa|l)))) (b|
|00004d50| 61 63 6b 71 75 6f 74 65 | 20 28 61 64 64 2d 73 70 |ackquote| (add-sp|
|00004d60| 65 63 2d 6c 69 73 74 2d | 74 6f 2d 73 70 65 63 69 |ec-list-|to-speci|
|00004d70| 66 69 65 72 20 73 63 72 | 6f 6c 6c 62 61 72 2d 77 |fier scr|ollbar-w|
|00004d80| 69 64 74 68 20 27 28 5c | 2c 20 28 73 70 65 63 69 |idth '(\|, (speci|
|00004d90| 66 69 65 72 2d 73 70 65 | 63 2d 6c 69 73 74 20 73 |fier-spe|c-list s|
|00004da0| 63 72 6f 6c 6c 62 61 72 | 2d 77 69 64 74 68 20 27 |crollbar|-width '|
|00004db0| 67 6c 6f 62 61 6c 29 29 | 29 29 20 28 62 61 63 6b |global))|)) (back|
|00004dc0| 71 75 6f 74 65 20 28 61 | 64 64 2d 73 70 65 63 2d |quote (a|dd-spec-|
|00004dd0| 6c 69 73 74 2d 74 6f 2d | 73 70 65 63 69 66 69 65 |list-to-|specifie|
|00004de0| 72 20 73 63 72 6f 6c 6c | 62 61 72 2d 68 65 69 67 |r scroll|bar-heig|
|00004df0| 68 74 20 27 28 5c 2c 20 | 28 73 70 65 63 69 66 69 |ht '(\, |(specifi|
|00004e00| 65 72 2d 73 70 65 63 2d | 6c 69 73 74 20 73 63 72 |er-spec-|list scr|
|00004e10| 6f 6c 6c 62 61 72 2d 68 | 65 69 67 68 74 20 27 67 |ollbar-h|eight 'g|
|00004e20| 6c 6f 62 61 6c 29 29 29 | 29 20 28 62 61 63 6b 71 |lobal)))|) (backq|
|00004e30| 75 6f 74 65 20 28 61 64 | 64 2d 73 70 65 63 2d 6c |uote (ad|d-spec-l|
|00004e40| 69 73 74 2d 74 6f 2d 73 | 70 65 63 69 66 69 65 72 |ist-to-s|pecifier|
|00004e50| 20 6d 6f 64 65 6c 69 6e | 65 2d 73 68 61 64 6f 77 | modelin|e-shadow|
|00004e60| 2d 74 68 69 63 6b 6e 65 | 73 73 20 27 28 5c 2c 20 |-thickne|ss '(\, |
|00004e70| 28 73 70 65 63 69 66 69 | 65 72 2d 73 70 65 63 2d |(specifi|er-spec-|
|00004e80| 6c 69 73 74 20 6d 6f 64 | 65 6c 69 6e 65 2d 73 68 |list mod|eline-sh|
|00004e90| 61 64 6f 77 2d 74 68 69 | 63 6b 6e 65 73 73 20 27 |adow-thi|ckness '|
|00004ea0| 67 6c 6f 62 61 6c 29 29 | 29 29 20 28 69 66 20 70 |global))|)) (if p|
|00004eb0| 61 72 65 6e 2d 6d 6f 64 | 65 20 28 62 61 63 6b 71 |aren-mod|e (backq|
|00004ec0| 75 6f 74 65 20 28 70 72 | 6f 67 6e 20 28 72 65 71 |uote (pr|ogn (req|
|00004ed0| 75 69 72 65 20 27 70 61 | 72 65 6e 29 20 28 70 61 |uire 'pa|ren) (pa|
|00004ee0| 72 65 6e 2d 73 65 74 2d | 6d 6f 64 65 20 27 28 5c |ren-set-|mode '(\|
|00004ef0| 2c 20 70 61 72 65 6e 2d | 6d 6f 64 65 29 29 29 29 |, paren-|mode))))|
|00004f00| 29 20 28 69 66 20 28 6d | 65 6d 71 20 27 70 65 6e |) (if (m|emq 'pen|
|00004f10| 64 69 6e 67 2d 64 65 6c | 65 74 65 2d 70 72 65 2d |ding-del|ete-pre-|
|00004f20| 68 6f 6f 6b 20 70 72 65 | 2d 63 6f 6d 6d 61 6e 64 |hook pre|-command|
|00004f30| 2d 68 6f 6f 6b 29 20 27 | 28 72 65 71 75 69 72 65 |-hook) '|(require|
|00004f40| 20 27 70 65 6e 64 69 6e | 67 2d 64 65 6c 29 29 20 | 'pendin|g-del)) |
|00004f50| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 61 75 74 6f 2d 66 |font-loc|k-auto-f|
|00004f60| 6f 6e 74 69 66 79 20 66 | 6f 6e 74 2d 6c 6f 63 6b |ontify f|ont-lock|
|00004f70| 2d 75 73 65 2d 66 6f 6e | 74 73 20 66 6f 6e 74 2d |-use-fon|ts font-|
|00004f80| 6c 6f 63 6b 2d 75 73 65 | 2d 63 6f 6c 6f 72 73 20 |lock-use|-colors |
|00004f90| 66 6f 6e 74 2d 6c 6f 63 | 6b 2d 75 73 65 2d 6d 61 |font-loc|k-use-ma|
|00004fa0| 78 69 6d 61 6c 2d 64 65 | 63 6f 72 61 74 69 6f 6e |ximal-de|coration|
|00004fb0| 20 66 6f 6e 74 2d 6c 6f | 63 6b 2d 6d 6f 64 65 2d | font-lo|ck-mode-|
|00004fc0| 65 6e 61 62 6c 65 2d 6c | 69 73 74 20 66 6f 6e 74 |enable-l|ist font|
|00004fd0| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 2d 64 69 73 61 62 |-lock-mo|de-disab|
|00004fe0| 6c 65 2d 6c 69 73 74 20 | 28 69 66 20 28 66 65 61 |le-list |(if (fea|
|00004ff0| 74 75 72 65 70 20 27 66 | 6f 6e 74 2d 6c 6f 63 6b |turep 'f|ont-lock|
|00005000| 29 20 27 28 72 65 71 75 | 69 72 65 20 27 66 6f 6e |) '(requ|ire 'fon|
|00005010| 74 2d 6c 6f 63 6b 29 29 | 20 28 69 66 20 28 66 65 |t-lock))| (if (fe|
|00005020| 61 74 75 72 65 70 20 27 | 66 61 73 74 2d 6c 6f 63 |aturep '|fast-loc|
|00005030| 6b 29 20 27 28 72 65 71 | 75 69 72 65 20 27 66 61 |k) '(req|uire 'fa|
|00005040| 73 74 2d 6c 6f 63 6b 29 | 29 20 28 69 66 20 28 61 |st-lock)|) (if (a|
|00005050| 6e 64 20 28 62 6f 75 6e | 64 70 20 27 66 6f 6e 74 |nd (boun|dp 'font|
|00005060| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 2d 68 6f 6f 6b 29 |-lock-mo|de-hook)|
|00005070| 20 28 6d 65 6d 71 20 27 | 74 75 72 6e 2d 6f 6e 2d | (memq '|turn-on-|
|00005080| 66 61 73 74 2d 6c 6f 63 | 6b 20 66 6f 6e 74 2d 6c |fast-loc|k font-l|
|00005090| 6f 63 6b 2d 6d 6f 64 65 | 2d 68 6f 6f 6b 29 29 20 |ock-mode|-hook)) |
|000050a0| 27 28 61 64 64 2d 68 6f | 6f 6b 20 27 66 6f 6e 74 |'(add-ho|ok 'font|
|000050b0| 2d 6c 6f 63 6b 2d 6d 6f | 64 65 2d 68 6f 6f 6b 20 |-lock-mo|de-hook |
|000050c0| 27 74 75 72 6e 2d 6f 6e | 2d 66 61 73 74 2d 6c 6f |'turn-on|-fast-lo|
|000050d0| 63 6b 29 20 27 28 72 65 | 6d 6f 76 65 2d 68 6f 6f |ck) '(re|move-hoo|
|000050e0| 6b 20 27 66 6f 6e 74 2d | 6c 6f 63 6b 2d 6d 6f 64 |k 'font-|lock-mod|
|000050f0| 65 2d 68 6f 6f 6b 20 27 | 74 75 72 6e 2d 6f 6e 2d |e-hook '|turn-on-|
|00005100| 66 61 73 74 2d 6c 6f 63 | 6b 29 29 20 28 63 6f 6e |fast-loc|k)) (con|
|00005110| 73 20 27 70 72 6f 67 6e | 20 28 61 70 70 6c 79 20 |s 'progn| (apply |
|00005120| 27 6e 63 6f 6e 63 20 28 | 6d 61 70 63 61 72 20 28 |'nconc (|mapcar (|
|00005130| 66 75 6e 63 74 69 6f 6e | 20 28 6c 61 6d 62 64 61 |function| (lambda|
|00005140| 20 28 66 61 63 65 29 20 | 28 63 6f 6e 73 20 28 62 | (face) |(cons (b|
|00005150| 61 63 6b 71 75 6f 74 65 | 20 28 6d 61 6b 65 2d 66 |ackquote| (make-f|
|00005160| 61 63 65 20 27 28 5c 2c | 20 66 61 63 65 29 29 29 |ace '(\,| face)))|
|00005170| 20 28 64 65 6c 71 20 6e | 69 6c 20 28 6d 61 70 63 | (delq n|il (mapc|
|00005180| 61 72 20 28 66 75 6e 63 | 74 69 6f 6e 20 28 6c 61 |ar (func|tion (la|
|00005190| 6d 62 64 61 20 28 70 72 | 6f 70 65 72 74 79 29 20 |mbda (pr|operty) |
|000051a0| 28 69 66 20 28 73 70 65 | 63 69 66 69 65 72 2d 73 |(if (spe|cifier-s|
|000051b0| 70 65 63 2d 6c 69 73 74 | 20 28 66 61 63 65 2d 70 |pec-list| (face-p|
|000051c0| 72 6f 70 65 72 74 79 20 | 66 61 63 65 20 70 72 6f |roperty |face pro|
|000051d0| 70 65 72 74 79 29 29 20 | 28 62 61 63 6b 71 75 6f |perty)) |(backquo|
|000051e0| 74 65 20 28 61 64 64 2d | 73 70 65 63 2d 6c 69 73 |te (add-|spec-lis|
|000051f0| 74 2d 74 6f 2d 73 70 65 | 63 69 66 69 65 72 20 28 |t-to-spe|cifier (|
|00005200| 66 61 63 65 2d 70 72 6f | 70 65 72 74 79 20 27 28 |face-pro|perty '(|
|00005210| 5c 2c 20 66 61 63 65 29 | 20 27 28 5c 2c 20 70 72 |\, face)| '(\, pr|
|00005220| 6f 70 65 72 74 79 29 29 | 20 27 28 5c 2c 20 28 73 |operty))| '(\, (s|
|00005230| 61 76 65 2d 6f 70 74 69 | 6f 6e 73 2d 73 70 65 63 |ave-opti|ons-spec|
|00005240| 69 66 69 65 72 2d 73 70 | 65 63 2d 6c 69 73 74 20 |ifier-sp|ec-list |
|00005250| 66 61 63 65 20 70 72 6f | 70 65 72 74 79 29 29 29 |face pro|perty)))|
|00005260| 29 29 29 29 20 62 75 69 | 6c 74 2d 69 6e 2d 66 61 |)))) bui|lt-in-fa|
|00005270| 63 65 2d 73 70 65 63 69 | 66 69 65 72 73 29 29 29 |ce-speci|fiers)))|
|00005280| 29 29 20 28 66 61 63 65 | 2d 6c 69 73 74 29 29 29 |)) (face|-list)))|
|00005290| 29 29 29 20 22 5c 0a 54 | 68 65 20 76 61 72 69 61 |))) "\.T|he varia|
|000052a0| 62 6c 65 73 20 74 6f 20 | 73 61 76 65 3b 20 6f 72 |bles to |save; or|
|000052b0| 20 66 6f 72 6d 73 20 74 | 6f 20 65 76 61 6c 75 61 | forms t|o evalua|
|000052c0| 74 65 20 74 6f 20 67 65 | 74 20 66 6f 72 6d 73 20 |te to ge|t forms |
|000052d0| 74 6f 20 77 72 69 74 65 | 20 6f 75 74 2e 22 29 0a |to write| out.").|
|000052e0| 28 66 73 65 74 20 27 73 | 61 76 65 2d 6f 70 74 69 |(fset 's|ave-opti|
|000052f0| 6f 6e 73 2d 73 70 65 63 | 69 66 69 65 72 2d 73 70 |ons-spec|ifier-sp|
|00005300| 65 63 2d 6c 69 73 74 20 | 23 5b 28 66 61 63 65 20 |ec-list |#[(face |
|00005310| 70 72 6f 70 65 72 74 79 | 29 20 22 08 c1 3d ac 8d |property|) "..=..|
|00005320| 08 c2 3d ac 88 c3 c4 0d | 08 5c 22 c6 5c 22 87 c3 |..=.....|.\".\"..|
|00005330| c4 0d 08 5c 22 c6 5c 22 | 89 1e 07 40 41 1e 08 c9 |...\".\"|...@A...|
|00005340| 1e 5c 6e 0e 08 ab b4 0e | 08 40 16 5c 6e 08 c1 3d |.\n.....|.@.\n..=|
|00005350| ab 92 cb 0e 5c 6e 41 21 | ab 9b 0e 5c 6e cc 0e 5c |....\nA!|...\n..\|
|00005360| 6e 41 21 a1 88 aa 90 cd | 0e 5c 6e 41 21 ab 89 0e |nA!.....|.\nA!...|
|00005370| 5c 6e ce 0e 5c 6e 41 21 | a1 88 0e 08 41 89 16 08 |\n..\nA!|....A...|
|00005380| ac 4c 0e 07 2b 87 22 20 | 5b 70 72 6f 70 65 72 74 |.L..+." |[propert|
|00005390| 79 20 66 6f 6e 74 20 63 | 6f 6c 6f 72 20 73 70 65 |y font c|olor spe|
|000053a0| 63 69 66 69 65 72 2d 73 | 70 65 63 2d 6c 69 73 74 |cifier-s|pec-list|
|000053b0| 20 66 61 63 65 2d 70 72 | 6f 70 65 72 74 79 20 66 | face-pr|operty f|
|000053c0| 61 63 65 20 67 6c 6f 62 | 61 6c 20 72 65 74 6c 69 |ace glob|al retli|
|000053d0| 73 74 20 65 6e 74 72 79 | 20 6e 69 6c 20 69 74 65 |st entry| nil ite|
|000053e0| 6d 20 66 6f 6e 74 2d 69 | 6e 73 74 61 6e 63 65 2d |m font-i|nstance-|
|000053f0| 70 20 66 6f 6e 74 2d 69 | 6e 73 74 61 6e 63 65 2d |p font-i|nstance-|
|00005400| 6e 61 6d 65 20 63 6f 6c | 6f 72 2d 69 6e 73 74 61 |name col|or-insta|
|00005410| 6e 63 65 2d 70 20 63 6f | 6c 6f 72 2d 69 6e 73 74 |nce-p co|lor-inst|
|00005420| 61 6e 63 65 2d 6e 61 6d | 65 5d 20 35 5d 29 0a 28 |ance-nam|e] 5]).(|
|00005430| 64 65 66 76 61 72 20 73 | 61 76 65 2d 6f 70 74 69 |defvar s|ave-opti|
|00005440| 6f 6e 73 2d 66 69 6c 65 | 20 28 63 6f 6e 63 61 74 |ons-file| (concat|
|00005450| 20 22 7e 22 20 69 6e 69 | 74 2d 66 69 6c 65 2d 75 | "~" ini|t-file-u|
|00005460| 73 65 72 20 22 2f 2e 65 | 6d 61 63 73 22 29 20 22 |ser "/.e|macs") "|
|00005470| 5c 0a 46 69 6c 65 20 74 | 6f 20 73 61 76 65 20 6f |\.File t|o save o|
|00005480| 70 74 69 6f 6e 73 20 69 | 6e 74 6f 2e 22 29 0a 28 |ptions i|nto.").(|
|00005490| 66 73 65 74 20 27 73 61 | 76 65 2d 6f 70 74 69 6f |fset 'sa|ve-optio|
|000054a0| 6e 73 2d 6d 65 6e 75 2d | 73 65 74 74 69 6e 67 73 |ns-menu-|settings|
|000054b0| 20 23 5b 6e 69 6c 20 22 | c0 c1 5c 6e 21 21 c3 1c | #[nil "|..\n!!..|
|000054c0| 1d 8a 0d 71 88 65 62 88 | c6 c7 c3 c8 23 ab 9b c9 |...q.eb.|....#...|
|000054d0| 94 89 1e 5c 6e 62 88 c6 | cb c3 cc 23 ac 84 cd ce |...\nb..|...#....|
|000054e0| 21 88 0e 5c 6e c9 95 7c | 88 29 aa 86 64 62 88 cf |!..\n..||.)..db..|
|000054f0| 63 88 d0 20 14 cc 89 0c | 1e 11 1e 12 1e 13 d4 d5 |c.. ....|........|
|00005500| 21 88 d4 d6 21 88 d4 d7 | 21 88 d4 d8 21 88 d4 d9 |!...!...|!...!...|
|00005510| 21 88 d4 da 21 88 d4 db | 21 88 dc dd 0e 1e 5c 22 |!...!...|!.....\"|
|00005520| 88 d4 df 21 88 d4 e0 21 | 88 d4 e1 21 88 2c 0c c3 |...!...!|...!.,..|
|00005530| 89 93 88 8a 0d 71 88 e2 | 20 2b 87 22 20 5b 66 69 |.....q..| +." [fi|
|00005540| 6e 64 2d 66 69 6c 65 2d | 6e 6f 73 65 6c 65 63 74 |nd-file-|noselect|
|00005550| 20 65 78 70 61 6e 64 2d | 66 69 6c 65 2d 6e 61 6d | expand-|file-nam|
|00005560| 65 20 73 61 76 65 2d 6f | 70 74 69 6f 6e 73 2d 66 |e save-o|ptions-f|
|00005570| 69 6c 65 20 6e 69 6c 20 | 6f 75 74 70 75 74 2d 6d |ile nil |output-m|
|00005580| 61 72 6b 65 72 20 6f 75 | 74 70 75 74 2d 62 75 66 |arker ou|tput-buf|
|00005590| 66 65 72 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |fer re-s|earch-fo|
|000055a0| 72 77 61 72 64 20 22 5e | 3b 3b 20 4f 70 74 69 6f |rward "^|;; Optio|
|000055b0| 6e 73 20 4d 65 6e 75 20 | 53 65 74 74 69 6e 67 73 |ns Menu |Settings|
|000055c0| 20 2a 5c 6e 22 20 6d 6f | 76 65 20 30 20 70 20 22 | *\n" mo|ve 0 p "|
|000055d0| 5e 3b 3b 20 45 6e 64 20 | 6f 66 20 4f 70 74 69 6f |^;; End |of Optio|
|000055e0| 6e 73 20 4d 65 6e 75 20 | 53 65 74 74 69 6e 67 73 |ns Menu |Settings|
|000055f0| 20 2a 5c 5c 28 5c 6e 5c | 5c 7c 5c 5c 27 5c 5c 29 | *\\(\n\|\|\\'\\)|
|00005600| 22 20 74 20 65 72 72 6f | 72 20 22 63 61 6e 27 74 |" t erro|r "can't|
|00005610| 20 66 69 6e 64 20 45 4e | 44 20 6f 66 20 73 61 76 | find EN|D of sav|
|00005620| 65 64 20 73 74 61 74 65 | 20 69 6e 20 2e 65 6d 61 |ed state| in .ema|
|00005630| 63 73 22 20 22 5c 6e 22 | 20 70 6f 69 6e 74 2d 6d |cs" "\n"| point-m|
|00005640| 61 72 6b 65 72 20 73 74 | 61 6e 64 61 72 64 2d 6f |arker st|andard-o|
|00005650| 75 74 70 75 74 20 70 72 | 69 6e 74 2d 65 73 63 61 |utput pr|int-esca|
|00005660| 70 65 2d 6e 65 77 6c 69 | 6e 65 73 20 70 72 69 6e |pe-newli|nes prin|
|00005670| 74 2d 72 65 61 64 61 62 | 6c 79 20 70 72 69 6e 63 |t-readab|ly princ|
|00005680| 20 22 3b 3b 20 4f 70 74 | 69 6f 6e 73 20 4d 65 6e | ";; Opt|ions Men|
|00005690| 75 20 53 65 74 74 69 6e | 67 73 5c 6e 22 20 22 3b |u Settin|gs\n" ";|
|000056a0| 3b 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |; ======|========|
|000056b0| 3d 3d 3d 3d 3d 3d 3d 5c | 6e 22 20 22 28 63 6f 6e |=======\|n" "(con|
|000056c0| 64 5c 6e 22 20 22 20 28 | 28 61 6e 64 20 28 73 74 |d\n" " (|(and (st|
|000056d0| 72 69 6e 67 2d 6d 61 74 | 63 68 20 5c 22 58 45 6d |ring-mat|ch \"XEm|
|000056e0| 61 63 73 5c 22 20 65 6d | 61 63 73 2d 76 65 72 73 |acs\" em|acs-vers|
|000056f0| 69 6f 6e 29 5c 6e 22 20 | 22 20 20 20 20 20 20 20 |ion)\n" |" |
|00005700| 28 62 6f 75 6e 64 70 20 | 27 65 6d 61 63 73 2d 6d |(boundp |'emacs-m|
|00005710| 61 6a 6f 72 2d 76 65 72 | 73 69 6f 6e 29 5c 6e 22 |ajor-ver|sion)\n"|
|00005720| 20 22 20 20 20 20 20 20 | 20 28 3d 20 65 6d 61 63 | " | (= emac|
|00005730| 73 2d 6d 61 6a 6f 72 2d | 76 65 72 73 69 6f 6e 20 |s-major-|version |
|00005740| 31 39 29 5c 6e 22 20 22 | 20 20 20 20 20 20 20 28 |19)\n" "| (|
|00005750| 3e 3d 20 65 6d 61 63 73 | 2d 6d 69 6e 6f 72 2d 76 |>= emacs|-minor-v|
|00005760| 65 72 73 69 6f 6e 20 31 | 32 29 29 5c 6e 22 20 6d |ersion 1|2))\n" m|
|00005770| 61 70 63 61 72 20 23 5b | 28 76 61 72 29 20 22 c0 |apcar #[|(var) ".|
|00005780| c1 21 88 5c 6e 39 ab 9b | c3 c4 5c 6e 89 4a 89 1d |.!.\n9..|..\n.J..|
|00005790| c6 3e ac 84 0d 39 ac 83 | 0d aa 83 c7 0d 44 29 45 |.>...9..|.....D)E|
|000057a0| 21 88 aa aa c8 5c 6e 21 | 89 12 a2 c9 3d ab 99 5c |!....\n!|....=..\|
|000057b0| 6e 41 89 12 ab 9a c3 5c | 6e 40 21 88 c0 ca 21 88 |nA.....\|n@!...!.|
|000057c0| 5c 6e 41 ab 6d c0 c1 21 | 88 aa 67 5c 6e ab 84 c3 |\nA.m..!|..g\n...|
|000057d0| 5c 6e 21 88 5c 6e ad 83 | c0 ca 21 87 22 20 5b 70 |\n!.\n..|..!." [p|
|000057e0| 72 69 6e 63 20 22 20 20 | 22 20 76 61 72 20 70 72 |rinc " |" var pr|
|000057f0| 69 6e 31 20 73 65 74 71 | 2d 64 65 66 61 75 6c 74 |in1 setq|-default|
|00005800| 20 76 61 6c 20 28 74 20 | 6e 69 6c 29 20 71 75 6f | val (t |nil) quo|
|00005810| 74 65 20 65 76 61 6c 20 | 70 72 6f 67 6e 20 22 5c |te eval |progn "\|
|00005820| 6e 22 5d 20 36 5d 20 6f | 70 74 69 6f 6e 73 2d 6d |n"] 6] o|ptions-m|
|00005830| 65 6e 75 2d 73 61 76 65 | 64 2d 66 6f 72 6d 73 20 |enu-save|d-forms |
|00005840| 22 20 20 29 29 5c 6e 22 | 20 22 3b 3b 20 3d 3d 3d |" ))\n"| ";; ===|
|00005850| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005860| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 5c 6e 22 20 22 3b 3b |========|=\n" ";;|
|00005870| 20 45 6e 64 20 6f 66 20 | 4f 70 74 69 6f 6e 73 20 | End of |Options |
|00005880| 4d 65 6e 75 20 53 65 74 | 74 69 6e 67 73 5c 6e 22 |Menu Set|tings\n"|
|00005890| 20 73 61 76 65 2d 62 75 | 66 66 65 72 5d 20 35 20 | save-bu|ffer] 5 |
|000058a0| 22 5c 0a 53 61 76 65 73 | 20 74 68 65 20 63 75 72 |"\.Saves| the cur|
|000058b0| 72 65 6e 74 20 73 65 74 | 74 69 6e 67 73 20 6f 66 |rent set|tings of|
|000058c0| 20 74 68 65 20 60 4f 70 | 74 69 6f 6e 73 27 20 6d | the `Op|tions' m|
|000058d0| 65 6e 75 20 74 6f 20 79 | 6f 75 72 20 60 2e 65 6d |enu to y|our `.em|
|000058e0| 61 63 73 27 20 66 69 6c | 65 2e 22 20 6e 69 6c 5d |acs' fil|e." nil]|
|000058f0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 09 |).(byte-|code "..|
|00005900| 21 88 c2 13 c0 87 22 20 | 5b 73 65 74 2d 6d 65 6e |!....." |[set-men|
|00005910| 75 62 61 72 20 64 65 66 | 61 75 6c 74 2d 6d 65 6e |ubar def|ault-men|
|00005920| 75 62 61 72 20 28 22 58 | 45 6d 61 63 73 20 43 6f |ubar ("X|Emacs Co|
|00005930| 6d 6d 61 6e 64 73 22 20 | 5b 22 55 6e 64 6f 22 20 |mmands" |["Undo" |
|00005940| 61 64 76 65 72 74 69 73 | 65 64 2d 75 6e 64 6f 20 |advertis|ed-undo |
|00005950| 74 5d 20 5b 22 43 75 74 | 22 20 78 2d 6b 69 6c 6c |t] ["Cut|" x-kill|
|00005960| 2d 70 72 69 6d 61 72 79 | 2d 73 65 6c 65 63 74 69 |-primary|-selecti|
|00005970| 6f 6e 20 74 5d 20 5b 22 | 43 6f 70 79 22 20 78 2d |on t] ["|Copy" x-|
|00005980| 63 6f 70 79 2d 70 72 69 | 6d 61 72 79 2d 73 65 6c |copy-pri|mary-sel|
|00005990| 65 63 74 69 6f 6e 20 74 | 5d 20 5b 22 50 61 73 74 |ection t|] ["Past|
|000059a0| 65 22 20 78 2d 79 61 6e | 6b 2d 63 6c 69 70 62 6f |e" x-yan|k-clipbo|
|000059b0| 61 72 64 2d 73 65 6c 65 | 63 74 69 6f 6e 20 74 5d |ard-sele|ction t]|
|000059c0| 20 22 2d 2d 2d 2d 2d 22 | 20 5b 22 53 65 6c 65 63 | "-----"| ["Selec|
|000059d0| 74 20 42 6c 6f 63 6b 22 | 20 6d 61 72 6b 2d 70 61 |t Block"| mark-pa|
|000059e0| 72 61 67 72 61 70 68 20 | 74 5d 20 5b 22 53 70 6c |ragraph |t] ["Spl|
|000059f0| 69 74 20 57 69 6e 64 6f | 77 22 20 28 73 70 6c 69 |it Windo|w" (spli|
|00005a00| 74 2d 77 69 6e 64 6f 77 | 29 20 74 5d 20 5b 22 55 |t-window|) t] ["U|
|00005a10| 6e 73 70 6c 69 74 20 57 | 69 6e 64 6f 77 22 20 64 |nsplit W|indow" d|
|00005a20| 65 6c 65 74 65 2d 6f 74 | 68 65 72 2d 77 69 6e 64 |elete-ot|her-wind|
|00005a30| 6f 77 73 20 74 5d 29 20 | 64 65 66 61 75 6c 74 2d |ows t]) |default-|
|00005a40| 70 6f 70 75 70 2d 6d 65 | 6e 75 5d 20 32 29 0a 28 |popup-me|nu] 2).(|
|00005a50| 64 65 66 76 61 72 20 67 | 6c 6f 62 61 6c 2d 70 6f |defvar g|lobal-po|
|00005a60| 70 75 70 2d 6d 65 6e 75 | 20 6e 69 6c 20 22 5c 0a |pup-menu| nil "\.|
|00005a70| 54 68 65 20 67 6c 6f 62 | 61 6c 20 70 6f 70 75 70 |The glob|al popup|
|00005a80| 20 6d 65 6e 75 2e 20 20 | 54 68 69 73 20 69 73 20 | menu. |This is |
|00005a90| 70 72 65 73 65 6e 74 20 | 69 6e 20 61 6c 6c 20 6d |present |in all m|
|00005aa0| 6f 64 65 73 2e 0a 53 65 | 65 20 74 68 65 20 66 75 |odes..Se|e the fu|
|00005ab0| 6e 63 74 69 6f 6e 20 60 | 70 6f 70 75 70 2d 6d 65 |nction `|popup-me|
|00005ac0| 6e 75 27 20 66 6f 72 20 | 61 20 64 65 73 63 72 69 |nu' for |a descri|
|00005ad0| 70 74 69 6f 6e 20 6f 66 | 20 6d 65 6e 75 20 73 79 |ption of| menu sy|
|00005ae0| 6e 74 61 78 2e 22 29 0a | 28 64 65 66 76 61 72 20 |ntax.").|(defvar |
|00005af0| 6d 6f 64 65 2d 70 6f 70 | 75 70 2d 6d 65 6e 75 20 |mode-pop|up-menu |
|00005b00| 6e 69 6c 20 22 5c 0a 54 | 68 65 20 6d 6f 64 65 2d |nil "\.T|he mode-|
|00005b10| 73 70 65 63 69 66 69 63 | 20 70 6f 70 75 70 20 6d |specific| popup m|
|00005b20| 65 6e 75 2e 20 20 41 75 | 74 6f 6d 61 74 69 63 61 |enu. Au|tomatica|
|00005b30| 6c 6c 79 20 62 75 66 66 | 65 72 20 6c 6f 63 61 6c |lly buff|er local|
|00005b40| 2e 0a 54 68 69 73 20 69 | 73 20 61 70 70 65 6e 64 |..This i|s append|
|00005b50| 65 64 20 74 6f 20 74 68 | 65 20 64 65 66 61 75 6c |ed to th|e defaul|
|00005b60| 74 20 69 74 65 6d 73 20 | 69 6e 20 60 67 6c 6f 62 |t items |in `glob|
|00005b70| 61 6c 2d 70 6f 70 75 70 | 2d 6d 65 6e 75 27 2e 0a |al-popup|-menu'..|
|00005b80| 53 65 65 20 74 68 65 20 | 66 75 6e 63 74 69 6f 6e |See the |function|
|00005b90| 20 60 70 6f 70 75 70 2d | 6d 65 6e 75 27 20 66 6f | `popup-|menu' fo|
|00005ba0| 72 20 61 20 64 65 73 63 | 72 69 70 74 69 6f 6e 20 |r a desc|ription |
|00005bb0| 6f 66 20 6d 65 6e 75 20 | 73 79 6e 74 61 78 2e 22 |of menu |syntax."|
|00005bc0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00005bd0| 21 88 c2 c1 0b 5c 22 87 | 22 20 5b 6d 61 6b 65 2d |!....\".|" [make-|
|00005be0| 76 61 72 69 61 62 6c 65 | 2d 62 75 66 66 65 72 2d |variable|-buffer-|
|00005bf0| 6c 6f 63 61 6c 20 6d 6f | 64 65 2d 70 6f 70 75 70 |local mo|de-popup|
|00005c00| 2d 6d 65 6e 75 20 73 65 | 74 2d 64 65 66 61 75 6c |-menu se|t-defaul|
|00005c10| 74 20 64 65 66 61 75 6c | 74 2d 70 6f 70 75 70 2d |t defaul|t-popup-|
|00005c20| 6d 65 6e 75 5d 20 33 29 | 0a 28 64 65 66 76 61 72 |menu] 3)|.(defvar|
|00005c30| 20 61 63 74 69 76 61 74 | 65 2d 70 6f 70 75 70 2d | activat|e-popup-|
|00005c40| 6d 65 6e 75 2d 68 6f 6f | 6b 20 6e 69 6c 20 22 5c |menu-hoo|k nil "\|
|00005c50| 0a 46 75 6e 63 74 69 6f | 6e 20 6f 72 20 66 75 6e |.Functio|n or fun|
|00005c60| 63 74 69 6f 6e 73 20 72 | 75 6e 20 62 65 66 6f 72 |ctions r|un befor|
|00005c70| 65 20 61 20 6d 6f 64 65 | 2d 73 70 65 63 69 66 69 |e a mode|-specifi|
|00005c80| 63 20 70 6f 70 75 70 20 | 6d 65 6e 75 20 69 73 20 |c popup |menu is |
|00005c90| 6d 61 64 65 20 76 69 73 | 69 62 6c 65 2e 0a 54 68 |made vis|ible..Th|
|00005ca0| 65 73 65 20 66 75 6e 63 | 74 69 6f 6e 73 20 61 72 |ese func|tions ar|
|00005cb0| 65 20 63 61 6c 6c 65 64 | 20 77 69 74 68 20 6e 6f |e called| with no|
|00005cc0| 20 61 72 67 75 6d 65 6e | 74 73 2c 20 61 6e 64 20 | argumen|ts, and |
|00005cd0| 73 68 6f 75 6c 64 20 69 | 6e 74 65 72 72 6f 67 61 |should i|nterroga|
|00005ce0| 74 65 20 61 6e 64 0a 6d | 6f 64 69 66 79 20 74 68 |te and.m|odify th|
|00005cf0| 65 20 76 61 6c 75 65 20 | 6f 66 20 60 67 6c 6f 62 |e value |of `glob|
|00005d00| 61 6c 2d 70 6f 70 75 70 | 2d 6d 65 6e 75 27 20 6f |al-popup|-menu' o|
|00005d10| 72 20 60 6d 6f 64 65 2d | 70 6f 70 75 70 2d 6d 65 |r `mode-|popup-me|
|00005d20| 6e 75 27 20 61 73 20 64 | 65 73 69 72 65 64 2e 0a |nu' as d|esired..|
|00005d30| 4e 6f 74 65 3a 20 74 68 | 69 73 20 68 6f 6f 6b 20 |Note: th|is hook |
|00005d40| 69 73 20 6f 6e 6c 79 20 | 72 75 6e 20 69 66 20 79 |is only |run if y|
|00005d50| 6f 75 20 75 73 65 20 60 | 70 6f 70 75 70 2d 6d 6f |ou use `|popup-mo|
|00005d60| 64 65 2d 6d 65 6e 75 27 | 20 66 6f 72 20 61 63 74 |de-menu'| for act|
|00005d70| 69 76 61 74 69 6e 67 20 | 74 68 65 0a 67 6c 6f 62 |ivating |the.glob|
|00005d80| 61 6c 20 61 6e 64 20 6d | 6f 64 65 2d 73 70 65 63 |al and m|ode-spec|
|00005d90| 69 66 69 63 20 63 6f 6d | 6d 61 6e 64 73 3b 20 69 |ific com|mands; i|
|00005da0| 66 20 79 6f 75 20 68 61 | 76 65 20 79 6f 75 72 20 |f you ha|ve your |
|00005db0| 6f 77 6e 20 62 69 6e 64 | 69 6e 67 20 66 6f 72 20 |own bind|ing for |
|00005dc0| 62 75 74 74 6f 6e 33 2c | 0a 74 68 69 73 20 68 6f |button3,|.this ho|
|00005dd0| 6f 6b 20 77 6f 6e 27 74 | 20 62 65 20 72 75 6e 2e |ok won't| be run.|
|00005de0| 22 29 0a 28 66 73 65 74 | 20 27 70 6f 70 75 70 2d |").(fset| 'popup-|
|00005df0| 6d 6f 64 65 2d 6d 65 6e | 75 20 23 5b 6e 69 6c 20 |mode-men|u #[nil |
|00005e00| 22 c0 c1 21 88 c2 0b ab | a4 0c ab a1 c5 0c 21 88 |"..!....|......!.|
|00005e10| 0c 40 0c 41 1e 06 1e 07 | c8 0b c9 0e 5c 6e ad 83 |.@.A....|....\n..|
|00005e20| 0e 07 43 0e 5c 6e ad 81 | cb 0e 06 25 2a aa 89 0c |..C.\n..|...%*...|
|00005e30| ae 86 0b ae 83 cc cd 21 | 21 87 22 20 5b 72 75 6e |.......!|!." [run|
|00005e40| 2d 68 6f 6f 6b 73 20 61 | 63 74 69 76 61 74 65 2d |-hooks a|ctivate-|
|00005e50| 70 6f 70 75 70 2d 6d 65 | 6e 75 2d 68 6f 6f 6b 20 |popup-me|nu-hook |
|00005e60| 70 6f 70 75 70 2d 6d 65 | 6e 75 20 67 6c 6f 62 61 |popup-me|nu globa|
|00005e70| 6c 2d 70 6f 70 75 70 2d | 6d 65 6e 75 20 6d 6f 64 |l-popup-|menu mod|
|00005e80| 65 2d 70 6f 70 75 70 2d | 6d 65 6e 75 20 63 68 65 |e-popup-|menu che|
|00005e90| 63 6b 2d 6d 65 6e 75 2d | 73 79 6e 74 61 78 20 69 |ck-menu-|syntax i|
|00005ea0| 74 65 6d 73 20 74 69 74 | 6c 65 20 61 70 70 65 6e |tems tit|le appen|
|00005eb0| 64 20 28 22 2d 2d 2d 22 | 20 22 2d 2d 2d 22 29 20 |d ("---"| "---") |
|00005ec0| 70 6f 70 75 70 2d 6d 65 | 6e 75 2d 74 69 74 6c 65 |popup-me|nu-title|
|00005ed0| 73 20 28 22 2d 2d 2d 22 | 20 22 2d 2d 2d 22 29 20 |s ("---"| "---") |
|00005ee0| 65 72 72 6f 72 20 22 4e | 6f 20 6d 65 6e 75 20 68 |error "N|o menu h|
|00005ef0| 65 72 65 2e 22 5d 20 37 | 20 22 5c 0a 50 6f 70 20 |ere."] 7| "\.Pop |
|00005f00| 75 70 20 61 20 6d 65 6e | 75 20 6f 66 20 67 6c 6f |up a men|u of glo|
|00005f10| 62 61 6c 20 61 6e 64 20 | 6d 6f 64 65 2d 73 70 65 |bal and |mode-spe|
|00005f20| 63 69 66 69 63 20 63 6f | 6d 6d 61 6e 64 73 2e 0a |cific co|mmands..|
|00005f30| 54 68 65 20 6d 65 6e 75 | 20 69 73 20 63 6f 6d 70 |The menu| is comp|
|00005f40| 75 74 65 64 20 62 79 20 | 63 6f 6d 62 69 6e 69 6e |uted by |combinin|
|00005f50| 67 20 60 67 6c 6f 62 61 | 6c 2d 70 6f 70 75 70 2d |g `globa|l-popup-|
|00005f60| 6d 65 6e 75 27 20 61 6e | 64 20 60 6d 6f 64 65 2d |menu' an|d `mode-|
|00005f70| 70 6f 70 75 70 2d 6d 65 | 6e 75 27 2e 22 20 22 40 |popup-me|nu'." "@|
|00005f80| 5f 22 5d 29 0a 28 66 73 | 65 74 20 27 70 6f 70 75 |_"]).(fs|et 'popu|
|00005f90| 70 2d 62 75 66 66 65 72 | 2d 6d 65 6e 75 20 23 5b |p-buffer|-menu #[|
|00005fa0| 28 65 76 65 6e 74 29 20 | 22 c0 09 21 ad 83 c2 09 |(event) |"..!....|
|00005fb0| 21 c3 1c 89 1d ac 84 c6 | c7 21 88 c8 0d 21 88 0e |!.......|.!...!..|
|00005fc0| 09 ab 86 ca cb 0e 09 5c | 22 14 0c ac 86 ca cb 0e |.......\|".......|
|00005fd0| 0c 5c 22 14 0c ac 84 c6 | cd 21 88 ce 0c 21 2a 87 |.\".....|.!...!*.|
|00005fe0| 22 20 5b 65 76 65 6e 74 | 2d 6f 76 65 72 2d 74 65 |" [event|-over-te|
|00005ff0| 78 74 2d 61 72 65 61 2d | 70 20 65 76 65 6e 74 20 |xt-area-|p event |
|00006000| 65 76 65 6e 74 2d 77 69 | 6e 64 6f 77 20 6e 69 6c |event-wi|ndow nil|
|00006010| 20 62 6d 65 6e 75 20 77 | 69 6e 64 6f 77 20 65 72 | bmenu w|indow er|
|00006020| 72 6f 72 20 22 50 6f 69 | 6e 74 65 72 20 6d 75 73 |ror "Poi|nter mus|
|00006030| 74 20 62 65 20 69 6e 20 | 61 20 6e 6f 72 6d 61 6c |t be in |a normal|
|00006040| 20 77 69 6e 64 6f 77 22 | 20 73 65 6c 65 63 74 2d | window"| select-|
|00006050| 77 69 6e 64 6f 77 20 63 | 75 72 72 65 6e 74 2d 6d |window c|urrent-m|
|00006060| 65 6e 75 62 61 72 20 61 | 73 73 6f 63 20 22 42 75 |enubar a|ssoc "Bu|
|00006070| 66 66 65 72 73 22 20 64 | 65 66 61 75 6c 74 2d 6d |ffers" d|efault-m|
|00006080| 65 6e 75 62 61 72 20 22 | 43 61 6e 27 74 20 66 69 |enubar "|Can't fi|
|00006090| 6e 64 20 74 68 65 20 42 | 75 66 66 65 72 73 20 6d |nd the B|uffers m|
|000060a0| 65 6e 75 22 20 70 6f 70 | 75 70 2d 6d 65 6e 75 5d |enu" pop|up-menu]|
|000060b0| 20 34 20 22 5c 0a 50 6f | 70 20 75 70 20 61 20 63 | 4 "\.Po|p up a c|
|000060c0| 6f 70 79 20 6f 66 20 74 | 68 65 20 42 75 66 66 65 |opy of t|he Buffe|
|000060d0| 72 73 20 6d 65 6e 75 20 | 28 66 72 6f 6d 20 74 68 |rs menu |(from th|
|000060e0| 65 20 6d 65 6e 75 62 61 | 72 29 20 77 68 65 72 65 |e menuba|r) where|
|000060f0| 20 74 68 65 20 6d 6f 75 | 73 65 20 69 73 20 63 6c | the mou|se is cl|
|00006100| 69 63 6b 65 64 2e 22 20 | 22 65 22 5d 29 0a 28 66 |icked." |"e"]).(f|
|00006110| 73 65 74 20 27 70 6f 70 | 75 70 2d 6d 65 6e 75 62 |set 'pop|up-menub|
|00006120| 61 72 2d 6d 65 6e 75 20 | 23 5b 28 65 76 65 6e 74 |ar-menu |#[(event|
|00006130| 29 20 22 c0 09 21 ad 83 | c2 09 21 c3 1c 89 1d ac |) "..!..|..!.....|
|00006140| 84 c6 c7 21 88 c8 0d 21 | 88 0e 09 ab 84 ca cb 21 |...!...!|.......!|
|00006150| 88 cc c3 cd 0e 09 ae 82 | 0e 0e 21 5c 22 14 cf d0 |........|..!\"...|
|00006160| 0c 42 21 2a 87 22 20 5b | 65 76 65 6e 74 2d 6f 76 |.B!*." [|event-ov|
|00006170| 65 72 2d 74 65 78 74 2d | 61 72 65 61 2d 70 20 65 |er-text-|area-p e|
|00006180| 76 65 6e 74 20 65 76 65 | 6e 74 2d 77 69 6e 64 6f |vent eve|nt-windo|
|00006190| 77 20 6e 69 6c 20 70 6f | 70 75 70 2d 6d 65 6e 75 |w nil po|pup-menu|
|000061a0| 62 61 72 20 77 69 6e 64 | 6f 77 20 65 72 72 6f 72 |bar wind|ow error|
|000061b0| 20 22 50 6f 69 6e 74 65 | 72 20 6d 75 73 74 20 62 | "Pointe|r must b|
|000061c0| 65 20 69 6e 20 61 20 6e | 6f 72 6d 61 6c 20 77 69 |e in a n|ormal wi|
|000061d0| 6e 64 6f 77 22 20 73 65 | 6c 65 63 74 2d 77 69 6e |ndow" se|lect-win|
|000061e0| 64 6f 77 20 63 75 72 72 | 65 6e 74 2d 6d 65 6e 75 |dow curr|ent-menu|
|000061f0| 62 61 72 20 72 75 6e 2d | 68 6f 6f 6b 73 20 61 63 |bar run-|hooks ac|
|00006200| 74 69 76 61 74 65 2d 6d | 65 6e 75 62 61 72 2d 68 |tivate-m|enubar-h|
|00006210| 6f 6f 6b 20 64 65 6c 65 | 74 65 20 63 6f 70 79 2d |ook dele|te copy-|
|00006220| 73 65 71 75 65 6e 63 65 | 20 64 65 66 61 75 6c 74 |sequence| default|
|00006230| 2d 6d 65 6e 75 62 61 72 | 20 70 6f 70 75 70 2d 6d |-menubar| popup-m|
|00006240| 65 6e 75 20 22 4d 65 6e | 75 62 61 72 20 4d 65 6e |enu "Men|ubar Men|
|00006250| 75 22 5d 20 35 20 22 5c | 0a 50 6f 70 20 75 70 20 |u"] 5 "\|.Pop up |
|00006260| 61 20 63 6f 70 79 20 6f | 66 20 6d 65 6e 75 20 74 |a copy o|f menu t|
|00006270| 68 61 74 20 61 6c 73 6f | 20 61 70 70 65 61 72 73 |hat also| appears|
|00006280| 20 69 6e 20 74 68 65 20 | 6d 65 6e 75 62 61 72 22 | in the |menubar"|
|00006290| 20 22 65 22 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 | "e"]).(|byte-cod|
|000062a0| 65 20 22 c0 c1 c2 5c 22 | 88 c0 c3 c4 5c 22 88 c0 |e "...\"|....\"..|
|000062b0| c5 c6 5c 22 88 c7 c8 21 | 87 22 20 5b 67 6c 6f 62 |..\"...!|." [glob|
|000062c0| 61 6c 2d 73 65 74 2d 6b | 65 79 20 62 75 74 74 6f |al-set-k|ey butto|
|000062d0| 6e 33 20 70 6f 70 75 70 | 2d 6d 6f 64 65 2d 6d 65 |n3 popup|-mode-me|
|000062e0| 6e 75 20 28 6d 65 74 61 | 20 63 6f 6e 74 72 6f 6c |nu (meta| control|
|000062f0| 20 62 75 74 74 6f 6e 33 | 29 20 70 6f 70 75 70 2d | button3|) popup-|
|00006300| 62 75 66 66 65 72 2d 6d | 65 6e 75 20 28 6d 65 74 |buffer-m|enu (met|
|00006310| 61 20 73 68 69 66 74 20 | 62 75 74 74 6f 6e 33 29 |a shift |button3)|
|00006320| 20 70 6f 70 75 70 2d 6d | 65 6e 75 62 61 72 2d 6d | popup-m|enubar-m|
|00006330| 65 6e 75 20 70 72 6f 76 | 69 64 65 20 78 2d 6d 65 |enu prov|ide x-me|
|00006340| 6e 75 62 61 72 5d 20 33 | 29 0a |nubar] 3|). |
+--------+-------------------------+-------------------------+--------+--------+
