Mercurial > vim
annotate runtime/menu.vim @ 31888:b374dfaa8645 v9.0.1276
patch 9.0.1276: some mappings with Meta and Shift do not work
Commit: https://github.com/vim/vim/commit/4be18e77ff2d9a85d01e9d62335542755b26d5d5
Author: Bram Moolenaar <Bram@vim.org>
Date: Fri Feb 3 12:28:07 2023 +0000
patch 9.0.1276: some mappings with Meta and Shift do not work
Problem: Some mappings with Meta and Shift do not work.
Solution: Apply the Shift modifier to the key. (issue https://github.com/vim/vim/issues/11913)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Fri, 03 Feb 2023 13:30:05 +0100 |
parents | 15c80d8bc515 |
children | 2a17771529af |
rev | line source |
---|---|
7 | 1 " Vim support file to define the default menus |
2 " You can also use this as a start for your own set of menus. | |
3 " | |
4 " Maintainer: Bram Moolenaar <Bram@vim.org> | |
31383 | 5 " Last Change: 2022 Nov 27 |
7 | 6 |
7 " Note that ":an" (short for ":anoremenu") is often used to make a menu work | |
8 " in all modes and avoid side effects from mappings defined by the user. | |
9 | |
10 " Make sure the '<' and 'C' flags are not included in 'cpoptions', otherwise | |
11 " <CR> would not be recognized. See ":help 'cpoptions'". | |
12 let s:cpo_save = &cpo | |
13 set cpo&vim | |
14 | |
15 " Avoid installing the menus twice | |
16 if !exists("did_install_default_menus") | |
17 let did_install_default_menus = 1 | |
18 | |
19 | |
20 if exists("v:lang") || &langmenu != "" | |
21 " Try to find a menu translation file for the current language. | |
22 if &langmenu != "" | |
23 if &langmenu =~ "none" | |
24 let s:lang = "" | |
25 else | |
26 let s:lang = &langmenu | |
27 endif | |
28 else | |
29 let s:lang = v:lang | |
30 endif | |
31 " A language name must be at least two characters, don't accept "C" | |
18186 | 32 " Also skip "en_US" to avoid picking up "en_gb" translations. |
33 if strlen(s:lang) > 1 && s:lang !~? '^en_us' | |
7 | 34 " When the language does not include the charset add 'encoding' |
35 if s:lang =~ '^\a\a$\|^\a\a_\a\a$' | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
36 let s:lang = s:lang .. '.' .. &enc |
7 | 37 endif |
38 | |
39 " We always use a lowercase name. | |
40 " Change "iso-8859" to "iso_8859" and "iso8859" to "iso_8859", some | |
41 " systems appear to use this. | |
42 " Change spaces to underscores. | |
43 let s:lang = substitute(tolower(s:lang), '\.iso-', ".iso_", "") | |
44 let s:lang = substitute(s:lang, '\.iso8859', ".iso_8859", "") | |
45 let s:lang = substitute(s:lang, " ", "_", "g") | |
46 " Remove "@euro", otherwise "LC_ALL=de_DE@euro gvim" will show English menus | |
47 let s:lang = substitute(s:lang, "@euro", "", "") | |
48 " Change "iso_8859-1" and "iso_8859-15" to "latin1", we always use the | |
49 " same menu file for them. | |
50 let s:lang = substitute(s:lang, 'iso_8859-15\=$', "latin1", "") | |
51 menutrans clear | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
52 exe "runtime! lang/menu_" .. s:lang .. ".vim" |
7 | 53 |
54 if !exists("did_menu_trans") | |
55 " There is no exact match, try matching with a wildcard added | |
56 " (e.g. find menu_de_de.iso_8859-1.vim if s:lang == de_DE). | |
57 let s:lang = substitute(s:lang, '\.[^.]*', "", "") | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
58 exe "runtime! lang/menu_" .. s:lang .. "[^a-z]*vim" |
7 | 59 |
14385
696794fe4bce
patch 8.1.0207: need many menu translation files to cover regions
Christian Brabandt <cb@256bit.org>
parents:
14249
diff
changeset
|
60 if !exists("did_menu_trans") && s:lang =~ '_' |
696794fe4bce
patch 8.1.0207: need many menu translation files to cover regions
Christian Brabandt <cb@256bit.org>
parents:
14249
diff
changeset
|
61 " If the language includes a region try matching without that region. |
696794fe4bce
patch 8.1.0207: need many menu translation files to cover regions
Christian Brabandt <cb@256bit.org>
parents:
14249
diff
changeset
|
62 " (e.g. find menu_de.vim if s:lang == de_DE). |
696794fe4bce
patch 8.1.0207: need many menu translation files to cover regions
Christian Brabandt <cb@256bit.org>
parents:
14249
diff
changeset
|
63 let langonly = substitute(s:lang, '_.*', "", "") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
64 exe "runtime! lang/menu_" .. langonly .. "[^a-z]*vim" |
14385
696794fe4bce
patch 8.1.0207: need many menu translation files to cover regions
Christian Brabandt <cb@256bit.org>
parents:
14249
diff
changeset
|
65 endif |
696794fe4bce
patch 8.1.0207: need many menu translation files to cover regions
Christian Brabandt <cb@256bit.org>
parents:
14249
diff
changeset
|
66 |
205 | 67 if !exists("did_menu_trans") && strlen($LANG) > 1 && s:lang !~ '^en_us' |
7 | 68 " On windows locale names are complicated, try using $LANG, it might |
205 | 69 " have been set by set_init_1(). But don't do this for "en" or "en_us". |
148 | 70 " But don't match "slovak" when $LANG is "sl". |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
71 exe "runtime! lang/menu_" .. tolower($LANG) .. "[^a-z]*vim" |
7 | 72 endif |
73 endif | |
74 endif | |
75 endif | |
76 | |
77 | |
78 " Help menu | |
79 an 9999.10 &Help.&Overview<Tab><F1> :help<CR> | |
80 an 9999.20 &Help.&User\ Manual :help usr_toc<CR> | |
11062 | 81 an 9999.30 &Help.&How-To\ Links :help how-to<CR> |
7 | 82 an <silent> 9999.40 &Help.&Find\.\.\. :call <SID>Helpfind()<CR> |
83 an 9999.45 &Help.-sep1- <Nop> | |
84 an 9999.50 &Help.&Credits :help credits<CR> | |
85 an 9999.60 &Help.Co&pying :help copying<CR> | |
86 an 9999.70 &Help.&Sponsor/Register :help sponsor<CR> | |
87 an 9999.70 &Help.O&rphans :help kcc<CR> | |
88 an 9999.75 &Help.-sep2- <Nop> | |
89 an 9999.80 &Help.&Version :version<CR> | |
90 an 9999.90 &Help.&About :intro<CR> | |
91 | |
22439
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
92 if exists(':tlmenu') |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
93 tlnoremenu 9999.10 &Help.&Overview<Tab><F1> <C-W>:help<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
94 tlnoremenu 9999.20 &Help.&User\ Manual <C-W>:help usr_toc<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
95 tlnoremenu 9999.30 &Help.&How-To\ Links <C-W>:help how-to<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
96 tlnoremenu <silent> 9999.40 &Help.&Find\.\.\. <C-W>:call <SID>Helpfind()<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
97 tlnoremenu 9999.45 &Help.-sep1- <Nop> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
98 tlnoremenu 9999.50 &Help.&Credits <C-W>:help credits<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
99 tlnoremenu 9999.60 &Help.Co&pying <C-W>:help copying<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
100 tlnoremenu 9999.70 &Help.&Sponsor/Register <C-W>:help sponsor<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
101 tlnoremenu 9999.70 &Help.O&rphans <C-W>:help kcc<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
102 tlnoremenu 9999.75 &Help.-sep2- <Nop> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
103 tlnoremenu 9999.80 &Help.&Version <C-W>:version<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
104 tlnoremenu 9999.90 &Help.&About <C-W>:intro<CR> |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
105 endif |
445799159195
patch 8.2.1768: cannot use the help menu from a terminal window
Bram Moolenaar <Bram@vim.org>
parents:
20856
diff
changeset
|
106 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
107 def s:Helpfind() |
7 | 108 if !exists("g:menutrans_help_dialog") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
109 g:menutrans_help_dialog = "Enter a command or word to find help on:\n\nPrepend i_ for Input mode commands (e.g.: i_CTRL-X)\nPrepend c_ for command-line editing commands (e.g.: c_<Del>)\nPrepend ' for an option name (e.g.: 'shiftwidth')" |
7 | 110 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
111 var h = inputdialog(g:menutrans_help_dialog) |
7 | 112 if h != "" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
113 v:errmsg = "" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
114 silent! exe "help " .. h |
7 | 115 if v:errmsg != "" |
116 echo v:errmsg | |
117 endif | |
118 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
119 enddef |
7 | 120 |
121 " File menu | |
122 an 10.310 &File.&Open\.\.\.<Tab>:e :browse confirm e<CR> | |
123 an 10.320 &File.Sp&lit-Open\.\.\.<Tab>:sp :browse sp<CR> | |
688 | 124 an 10.320 &File.Open\ Tab\.\.\.<Tab>:tabnew :browse tabnew<CR> |
7 | 125 an 10.325 &File.&New<Tab>:enew :confirm enew<CR> |
126 an <silent> 10.330 &File.&Close<Tab>:close | |
2729
12f838be9c59
Updated runtime file. Fix Italian translations.
Bram Moolenaar <bram@vim.org>
parents:
2325
diff
changeset
|
127 \ :if winheight(2) < 0 && tabpagewinnr(2) == 0 <Bar> |
7 | 128 \ confirm enew <Bar> |
129 \ else <Bar> | |
130 \ confirm close <Bar> | |
131 \ endif<CR> | |
30747
58592b6af4e2
patch 9.0.0708: :confirm does not work properly for a terminal buffer
Bram Moolenaar <Bram@vim.org>
parents:
28010
diff
changeset
|
132 tln <silent> 10.330 &File.&Close<Tab>:close |
58592b6af4e2
patch 9.0.0708: :confirm does not work properly for a terminal buffer
Bram Moolenaar <Bram@vim.org>
parents:
28010
diff
changeset
|
133 \ <C-W>:if winheight(2) < 0 && tabpagewinnr(2) == 0 <Bar> |
58592b6af4e2
patch 9.0.0708: :confirm does not work properly for a terminal buffer
Bram Moolenaar <Bram@vim.org>
parents:
28010
diff
changeset
|
134 \ confirm enew <Bar> |
58592b6af4e2
patch 9.0.0708: :confirm does not work properly for a terminal buffer
Bram Moolenaar <Bram@vim.org>
parents:
28010
diff
changeset
|
135 \ else <Bar> |
58592b6af4e2
patch 9.0.0708: :confirm does not work properly for a terminal buffer
Bram Moolenaar <Bram@vim.org>
parents:
28010
diff
changeset
|
136 \ confirm close <Bar> |
58592b6af4e2
patch 9.0.0708: :confirm does not work properly for a terminal buffer
Bram Moolenaar <Bram@vim.org>
parents:
28010
diff
changeset
|
137 \ endif<CR> |
7 | 138 an 10.335 &File.-SEP1- <Nop> |
139 an <silent> 10.340 &File.&Save<Tab>:w :if expand("%") == ""<Bar>browse confirm w<Bar>else<Bar>confirm w<Bar>endif<CR> | |
140 an 10.350 &File.Save\ &As\.\.\.<Tab>:sav :browse confirm saveas<CR> | |
141 | |
142 if has("diff") | |
143 an 10.400 &File.-SEP2- <Nop> | |
11062 | 144 an 10.410 &File.Split\ &Diff\ With\.\.\. :browse vert diffsplit<CR> |
7 | 145 an 10.420 &File.Split\ Patched\ &By\.\.\. :browse vert diffpatch<CR> |
146 endif | |
147 | |
148 if has("printer") | |
149 an 10.500 &File.-SEP3- <Nop> | |
150 an 10.510 &File.&Print :hardcopy<CR> | |
151 vunmenu &File.&Print | |
152 vnoremenu &File.&Print :hardcopy<CR> | |
153 elseif has("unix") | |
154 an 10.500 &File.-SEP3- <Nop> | |
155 an 10.510 &File.&Print :w !lpr<CR> | |
156 vunmenu &File.&Print | |
157 vnoremenu &File.&Print :w !lpr<CR> | |
158 endif | |
159 an 10.600 &File.-SEP4- <Nop> | |
160 an 10.610 &File.Sa&ve-Exit<Tab>:wqa :confirm wqa<CR> | |
161 an 10.620 &File.E&xit<Tab>:qa :confirm qa<CR> | |
162 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
163 def s:SelectAll() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
164 exe "norm! gg" .. (&slm == "" ? "VG" : "gH\<C-O>G") |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
165 enddef |
7 | 166 |
167 " Edit menu | |
168 an 20.310 &Edit.&Undo<Tab>u u | |
169 an 20.320 &Edit.&Redo<Tab>^R <C-R> | |
170 an 20.330 &Edit.Rep&eat<Tab>\. . | |
171 | |
172 an 20.335 &Edit.-SEP1- <Nop> | |
173 vnoremenu 20.340 &Edit.Cu&t<Tab>"+x "+x | |
174 vnoremenu 20.350 &Edit.&Copy<Tab>"+y "+y | |
175 cnoremenu 20.350 &Edit.&Copy<Tab>"+y <C-Y> | |
18594 | 176 if exists(':tlmenu') |
177 tlnoremenu 20.350 &Edit.&Copy<Tab>"+y <C-W>:<C-Y><CR> | |
178 endif | |
7 | 179 nnoremenu 20.360 &Edit.&Paste<Tab>"+gP "+gP |
180 cnoremenu &Edit.&Paste<Tab>"+gP <C-R>+ | |
14952
405309f9dd13
patch 8.1.0487: no menus specifically for the terminal window
Bram Moolenaar <Bram@vim.org>
parents:
14637
diff
changeset
|
181 if exists(':tlmenu') |
405309f9dd13
patch 8.1.0487: no menus specifically for the terminal window
Bram Moolenaar <Bram@vim.org>
parents:
14637
diff
changeset
|
182 tlnoremenu &Edit.&Paste<Tab>"+gP <C-W>"+ |
405309f9dd13
patch 8.1.0487: no menus specifically for the terminal window
Bram Moolenaar <Bram@vim.org>
parents:
14637
diff
changeset
|
183 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
184 exe 'vnoremenu <script> &Edit.&Paste<Tab>"+gP ' .. paste#paste_cmd['v'] |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
185 exe 'inoremenu <script> &Edit.&Paste<Tab>"+gP ' .. paste#paste_cmd['i'] |
7 | 186 nnoremenu 20.370 &Edit.Put\ &Before<Tab>[p [p |
187 inoremenu &Edit.Put\ &Before<Tab>[p <C-O>[p | |
188 nnoremenu 20.380 &Edit.Put\ &After<Tab>]p ]p | |
189 inoremenu &Edit.Put\ &After<Tab>]p <C-O>]p | |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
190 if has("win32") |
7 | 191 vnoremenu 20.390 &Edit.&Delete<Tab>x x |
192 endif | |
193 noremenu <script> <silent> 20.400 &Edit.&Select\ All<Tab>ggVG :<C-U>call <SID>SelectAll()<CR> | |
194 inoremenu <script> <silent> 20.400 &Edit.&Select\ All<Tab>ggVG <C-O>:call <SID>SelectAll()<CR> | |
195 cnoremenu <script> <silent> 20.400 &Edit.&Select\ All<Tab>ggVG <C-U>call <SID>SelectAll()<CR> | |
196 | |
197 an 20.405 &Edit.-SEP2- <Nop> | |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
198 if has("win32") || has("gui_gtk") || has("gui_kde") || has("gui_motif") |
7 | 199 an 20.410 &Edit.&Find\.\.\. :promptfind<CR> |
200 vunmenu &Edit.&Find\.\.\. | |
719 | 201 vnoremenu <silent> &Edit.&Find\.\.\. y:promptfind <C-R>=<SID>FixFText()<CR><CR> |
7 | 202 an 20.420 &Edit.Find\ and\ Rep&lace\.\.\. :promptrepl<CR> |
203 vunmenu &Edit.Find\ and\ Rep&lace\.\.\. | |
719 | 204 vnoremenu <silent> &Edit.Find\ and\ Rep&lace\.\.\. y:promptrepl <C-R>=<SID>FixFText()<CR><CR> |
7 | 205 else |
206 an 20.410 &Edit.&Find<Tab>/ / | |
207 an 20.420 &Edit.Find\ and\ Rep&lace<Tab>:%s :%s/ | |
208 vunmenu &Edit.Find\ and\ Rep&lace<Tab>:%s | |
209 vnoremenu &Edit.Find\ and\ Rep&lace<Tab>:s :s/ | |
210 endif | |
211 | |
212 an 20.425 &Edit.-SEP3- <Nop> | |
213 an 20.430 &Edit.Settings\ &Window :options<CR> | |
819 | 214 an 20.435 &Edit.Startup\ &Settings :call <SID>EditVimrc()<CR> |
215 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
216 def s:EditVimrc() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
217 var fname: string |
819 | 218 if $MYVIMRC != '' |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
219 fname = $MYVIMRC |
9555
9560a5b782ee
commit https://github.com/vim/vim/commit/42ebd066422d73cdb7bda6a1dc828a3dd022dec8
Christian Brabandt <cb@256bit.org>
parents:
5968
diff
changeset
|
220 elseif has("win32") |
819 | 221 if $HOME != '' |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
222 fname = $HOME .. "/_vimrc" |
819 | 223 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
224 fname = $VIM .. "/_vimrc" |
819 | 225 endif |
226 elseif has("amiga") | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
227 fname = "s:.vimrc" |
819 | 228 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
229 fname = $HOME .. "/.vimrc" |
819 | 230 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
231 fname = fnameescape(fname) |
819 | 232 if &mod |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
233 exe "split " .. fname |
819 | 234 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
235 exe "edit " .. fname |
819 | 236 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
237 enddef |
7 | 238 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
239 def s:FixFText(): string |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
240 # Fix text in nameless register to be used with :promptfind. |
719 | 241 return substitute(@", "[\r\n]", '\\n', 'g') |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
242 enddef |
482 | 243 |
7 | 244 " Edit/Global Settings |
245 an 20.440.100 &Edit.&Global\ Settings.Toggle\ Pattern\ &Highlight<Tab>:set\ hls! :set hls! hls?<CR> | |
11062 | 246 an 20.440.110 &Edit.&Global\ Settings.Toggle\ &Ignoring\ Case<Tab>:set\ ic! :set ic! ic?<CR> |
247 an 20.440.110 &Edit.&Global\ Settings.Toggle\ &Showing\ Matched\ Pairs<Tab>:set\ sm! :set sm! sm?<CR> | |
7 | 248 |
11062 | 249 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 1\ :set so=1<CR> |
250 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 2\ :set so=2<CR> | |
251 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 3\ :set so=3<CR> | |
252 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 4\ :set so=4<CR> | |
253 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 5\ :set so=5<CR> | |
254 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 7\ :set so=7<CR> | |
255 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 10\ :set so=10<CR> | |
256 an 20.440.120 &Edit.&Global\ Settings.&Context\ Lines.\ 100\ :set so=100<CR> | |
7 | 257 |
258 an 20.440.130.40 &Edit.&Global\ Settings.&Virtual\ Edit.Never :set ve=<CR> | |
259 an 20.440.130.50 &Edit.&Global\ Settings.&Virtual\ Edit.Block\ Selection :set ve=block<CR> | |
11062 | 260 an 20.440.130.60 &Edit.&Global\ Settings.&Virtual\ Edit.Insert\ Mode :set ve=insert<CR> |
7 | 261 an 20.440.130.70 &Edit.&Global\ Settings.&Virtual\ Edit.Block\ and\ Insert :set ve=block,insert<CR> |
262 an 20.440.130.80 &Edit.&Global\ Settings.&Virtual\ Edit.Always :set ve=all<CR> | |
263 an 20.440.140 &Edit.&Global\ Settings.Toggle\ Insert\ &Mode<Tab>:set\ im! :set im!<CR> | |
11062 | 264 an 20.440.145 &Edit.&Global\ Settings.Toggle\ Vi\ C&ompatibility<Tab>:set\ cp! :set cp!<CR> |
7 | 265 an <silent> 20.440.150 &Edit.&Global\ Settings.Search\ &Path\.\.\. :call <SID>SearchP()<CR> |
266 an <silent> 20.440.160 &Edit.&Global\ Settings.Ta&g\ Files\.\.\. :call <SID>TagFiles()<CR> | |
267 " | |
268 " GUI options | |
269 an 20.440.300 &Edit.&Global\ Settings.-SEP1- <Nop> | |
270 an <silent> 20.440.310 &Edit.&Global\ Settings.Toggle\ &Toolbar :call <SID>ToggleGuiOption("T")<CR> | |
271 an <silent> 20.440.320 &Edit.&Global\ Settings.Toggle\ &Bottom\ Scrollbar :call <SID>ToggleGuiOption("b")<CR> | |
272 an <silent> 20.440.330 &Edit.&Global\ Settings.Toggle\ &Left\ Scrollbar :call <SID>ToggleGuiOption("l")<CR> | |
273 an <silent> 20.440.340 &Edit.&Global\ Settings.Toggle\ &Right\ Scrollbar :call <SID>ToggleGuiOption("r")<CR> | |
274 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
275 def s:SearchP() |
7 | 276 if !exists("g:menutrans_path_dialog") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
277 g:menutrans_path_dialog = "Enter search path for files.\nSeparate directory names with a comma." |
7 | 278 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
279 var n = inputdialog(g:menutrans_path_dialog, substitute(&path, '\\ ', ' ', 'g')) |
7 | 280 if n != "" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
281 &path = substitute(n, ' ', '\\ ', 'g') |
7 | 282 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
283 enddef |
7 | 284 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
285 def s:TagFiles() |
7 | 286 if !exists("g:menutrans_tags_dialog") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
287 g:menutrans_tags_dialog = "Enter names of tag files.\nSeparate the names with a comma." |
7 | 288 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
289 var n = inputdialog(g:menutrans_tags_dialog, substitute(&tags, '\\ ', ' ', 'g')) |
7 | 290 if n != "" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
291 &tags = substitute(n, ' ', '\\ ', 'g') |
7 | 292 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
293 enddef |
7 | 294 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
295 def s:ToggleGuiOption(option: string) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
296 # If a:option is already set in guioptions, then we want to remove it |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
297 if match(&guioptions, "\\C" .. option) > -1 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
298 exec "set go-=" .. option |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
299 else |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
300 exec "set go+=" .. option |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
301 endif |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
302 enddef |
7 | 303 |
304 " Edit/File Settings | |
305 | |
306 " Boolean options | |
307 an 20.440.100 &Edit.F&ile\ Settings.Toggle\ Line\ &Numbering<Tab>:set\ nu! :set nu! nu?<CR> | |
11062 | 308 an 20.440.105 &Edit.F&ile\ Settings.Toggle\ Relati&ve\ Line\ Numbering<Tab>:set\ rnu! :set rnu! rnu?<CR> |
7 | 309 an 20.440.110 &Edit.F&ile\ Settings.Toggle\ &List\ Mode<Tab>:set\ list! :set list! list?<CR> |
11062 | 310 an 20.440.120 &Edit.F&ile\ Settings.Toggle\ Line\ &Wrapping<Tab>:set\ wrap! :set wrap! wrap?<CR> |
311 an 20.440.130 &Edit.F&ile\ Settings.Toggle\ W&rapping\ at\ Word<Tab>:set\ lbr! :set lbr! lbr?<CR> | |
312 an 20.440.160 &Edit.F&ile\ Settings.Toggle\ Tab\ &Expanding<Tab>:set\ et! :set et! et?<CR> | |
313 an 20.440.170 &Edit.F&ile\ Settings.Toggle\ &Auto\ Indenting<Tab>:set\ ai! :set ai! ai?<CR> | |
314 an 20.440.180 &Edit.F&ile\ Settings.Toggle\ &C-Style\ Indenting<Tab>:set\ cin! :set cin! cin?<CR> | |
7 | 315 |
316 " other options | |
317 an 20.440.600 &Edit.F&ile\ Settings.-SEP2- <Nop> | |
318 an 20.440.610.20 &Edit.F&ile\ Settings.&Shiftwidth.2 :set sw=2 sw?<CR> | |
319 an 20.440.610.30 &Edit.F&ile\ Settings.&Shiftwidth.3 :set sw=3 sw?<CR> | |
320 an 20.440.610.40 &Edit.F&ile\ Settings.&Shiftwidth.4 :set sw=4 sw?<CR> | |
321 an 20.440.610.50 &Edit.F&ile\ Settings.&Shiftwidth.5 :set sw=5 sw?<CR> | |
322 an 20.440.610.60 &Edit.F&ile\ Settings.&Shiftwidth.6 :set sw=6 sw?<CR> | |
323 an 20.440.610.80 &Edit.F&ile\ Settings.&Shiftwidth.8 :set sw=8 sw?<CR> | |
324 | |
325 an 20.440.620.20 &Edit.F&ile\ Settings.Soft\ &Tabstop.2 :set sts=2 sts?<CR> | |
326 an 20.440.620.30 &Edit.F&ile\ Settings.Soft\ &Tabstop.3 :set sts=3 sts?<CR> | |
327 an 20.440.620.40 &Edit.F&ile\ Settings.Soft\ &Tabstop.4 :set sts=4 sts?<CR> | |
328 an 20.440.620.50 &Edit.F&ile\ Settings.Soft\ &Tabstop.5 :set sts=5 sts?<CR> | |
329 an 20.440.620.60 &Edit.F&ile\ Settings.Soft\ &Tabstop.6 :set sts=6 sts?<CR> | |
330 an 20.440.620.80 &Edit.F&ile\ Settings.Soft\ &Tabstop.8 :set sts=8 sts?<CR> | |
331 | |
332 an <silent> 20.440.630 &Edit.F&ile\ Settings.Te&xt\ Width\.\.\. :call <SID>TextWidth()<CR> | |
333 an <silent> 20.440.640 &Edit.F&ile\ Settings.&File\ Format\.\.\. :call <SID>FileFormat()<CR> | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
334 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
335 def s:TextWidth() |
7 | 336 if !exists("g:menutrans_textwidth_dialog") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
337 g:menutrans_textwidth_dialog = "Enter new text width (0 to disable formatting): " |
7 | 338 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
339 var n = inputdialog(g:menutrans_textwidth_dialog, &tw .. '') |
7 | 340 if n != "" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
341 # Remove leading zeros to avoid it being used as an octal number. |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
342 # But keep a zero by itself. |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
343 var tw = substitute(n, "^0*", "", "") |
31251
e8ac01ad4be9
patch 9.0.0959: error when using the "File Settings / Text Width" menu
Bram Moolenaar <Bram@vim.org>
parents:
30747
diff
changeset
|
344 &tw = tw == '' ? 0 : str2nr(tw) |
7 | 345 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
346 enddef |
7 | 347 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
348 def s:FileFormat() |
7 | 349 if !exists("g:menutrans_fileformat_dialog") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
350 g:menutrans_fileformat_dialog = "Select format for writing the file" |
7 | 351 endif |
352 if !exists("g:menutrans_fileformat_choices") | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
353 g:menutrans_fileformat_choices = "&Unix\n&Dos\n&Mac\n&Cancel" |
7 | 354 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
355 var def_choice: number |
7 | 356 if &ff == "dos" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
357 def_choice = 2 |
7 | 358 elseif &ff == "mac" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
359 def_choice = 3 |
7 | 360 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
361 def_choice = 1 |
7 | 362 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
363 var n = confirm(g:menutrans_fileformat_dialog, g:menutrans_fileformat_choices, def_choice, "Question") |
7 | 364 if n == 1 |
365 set ff=unix | |
366 elseif n == 2 | |
367 set ff=dos | |
368 elseif n == 3 | |
369 set ff=mac | |
370 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
371 enddef |
7 | 372 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
373 let s:did_setup_color_schemes = 0 |
2325
f177a6431514
Better implementation of creating the Color Scheme menu. (Juergen Kraemer)
Bram Moolenaar <bram@vim.org>
parents:
2293
diff
changeset
|
374 |
7 | 375 " Setup the Edit.Color Scheme submenu |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
376 def s:SetupColorSchemes() |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
377 if s:did_setup_color_schemes |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
378 return |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
379 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
380 s:did_setup_color_schemes = 1 |
2325
f177a6431514
Better implementation of creating the Color Scheme menu. (Juergen Kraemer)
Bram Moolenaar <bram@vim.org>
parents:
2293
diff
changeset
|
381 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
382 var n = globpath(&runtimepath, "colors/*.vim", 1, 1) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
383 n += globpath(&packpath, "pack/*/start/*/colors/*.vim", 1, 1) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
384 n += globpath(&packpath, "pack/*/opt/*/colors/*.vim", 1, 1) |
2325
f177a6431514
Better implementation of creating the Color Scheme menu. (Juergen Kraemer)
Bram Moolenaar <bram@vim.org>
parents:
2293
diff
changeset
|
385 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
386 # Ignore case for VMS and windows, sort on name |
27859
3cb1a109e987
patch 8.2.4455: accepting one and zero for second sort() argument is strange
Bram Moolenaar <Bram@vim.org>
parents:
27623
diff
changeset
|
387 var names = sort(map(n, 'substitute(v:val, "\\c.*[/\\\\:\\]]\\([^/\\\\:]*\\)\\.vim", "\\1", "")'), 'i') |
2325
f177a6431514
Better implementation of creating the Color Scheme menu. (Juergen Kraemer)
Bram Moolenaar <bram@vim.org>
parents:
2293
diff
changeset
|
388 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
389 # define all the submenu entries |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
390 var idx = 100 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
391 for name in names |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
392 exe "an 20.450." .. idx .. ' &Edit.C&olor\ Scheme.' .. name .. " :colors " .. name .. "<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
393 idx += 10 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
394 endfor |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
395 silent! aunmenu &Edit.Show\ C&olor\ Schemes\ in\ Menu |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
396 enddef |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
397 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
398 if exists("do_no_lazyload_menus") |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
399 call s:SetupColorSchemes() |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
400 else |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
401 an <silent> 20.450 &Edit.Show\ C&olor\ Schemes\ in\ Menu :call <SID>SetupColorSchemes()<CR> |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
402 endif |
2325
f177a6431514
Better implementation of creating the Color Scheme menu. (Juergen Kraemer)
Bram Moolenaar <bram@vim.org>
parents:
2293
diff
changeset
|
403 |
7 | 404 |
405 " Setup the Edit.Keymap submenu | |
406 if has("keymap") | |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
407 let s:did_setup_keymaps = 0 |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
408 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
409 def s:SetupKeymaps() |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
410 if s:did_setup_keymaps |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
411 return |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
412 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
413 s:did_setup_keymaps = 1 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
414 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
415 var names = globpath(&runtimepath, "keymap/*.vim", 1, 1) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
416 if !empty(names) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
417 var idx = 100 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
418 an 20.460.90 &Edit.&Keymap.None :set keymap=<CR> |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
419 for name in names |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
420 # Ignore case for VMS and windows |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
421 var mapname = substitute(name, '\c.*[/\\:\]]\([^/\\:_]*\)\(_[0-9a-zA-Z-]*\)\=\.vim', '\1', '') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
422 exe "an 20.460." .. idx .. ' &Edit.&Keymap.' .. mapname .. " :set keymap=" .. mapname .. "<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
423 idx += 10 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
424 endfor |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
425 endif |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
426 silent! aunmenu &Edit.Show\ &Keymaps\ in\ Menu |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
427 enddef |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
428 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
429 if exists("do_no_lazyload_menus") |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
430 call s:SetupKeymaps() |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
431 else |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
432 an <silent> 20.460 &Edit.Show\ &Keymaps\ in\ Menu :call <SID>SetupKeymaps()<CR> |
7 | 433 endif |
434 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
435 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
436 if has("win32") || has("gui_motif") || has("gui_gtk") || has("gui_kde") || has("gui_photon") || has("gui_mac") |
7 | 437 an 20.470 &Edit.Select\ Fo&nt\.\.\. :set guifont=*<CR> |
438 endif | |
439 | |
440 " Programming menu | |
441 if !exists("g:ctags_command") | |
442 if has("vms") | |
1054 | 443 let g:ctags_command = "mc vim:ctags *.*" |
7 | 444 else |
445 let g:ctags_command = "ctags -R ." | |
446 endif | |
447 endif | |
448 | |
11062 | 449 an 40.300 &Tools.&Jump\ to\ This\ Tag<Tab>g^] g<C-]> |
450 vunmenu &Tools.&Jump\ to\ This\ Tag<Tab>g^] | |
451 vnoremenu &Tools.&Jump\ to\ This\ Tag<Tab>g^] g<C-]> | |
452 an 40.310 &Tools.Jump\ &Back<Tab>^T <C-T> | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
453 an 40.320 &Tools.Build\ &Tags\ File :exe "!" .. g:ctags_command<CR> |
7 | 454 |
314 | 455 if has("folding") || has("spell") |
456 an 40.330 &Tools.-SEP1- <Nop> | |
457 endif | |
458 | |
319 | 459 " Tools.Spelling Menu |
314 | 460 if has("spell") |
461 an 40.335.110 &Tools.&Spelling.&Spell\ Check\ On :set spell<CR> | |
462 an 40.335.120 &Tools.&Spelling.Spell\ Check\ &Off :set nospell<CR> | |
11062 | 463 an 40.335.130 &Tools.&Spelling.To\ &Next\ Error<Tab>]s ]s |
464 an 40.335.130 &Tools.&Spelling.To\ &Previous\ Error<Tab>[s [s | |
714 | 465 an 40.335.140 &Tools.&Spelling.Suggest\ &Corrections<Tab>z= z= |
11062 | 466 an 40.335.150 &Tools.&Spelling.&Repeat\ Correction<Tab>:spellrepall :spellrepall<CR> |
314 | 467 an 40.335.200 &Tools.&Spelling.-SEP1- <Nop> |
11062 | 468 an 40.335.210 &Tools.&Spelling.Set\ Language\ to\ "en" :set spl=en spell<CR> |
469 an 40.335.220 &Tools.&Spelling.Set\ Language\ to\ "en_au" :set spl=en_au spell<CR> | |
470 an 40.335.230 &Tools.&Spelling.Set\ Language\ to\ "en_ca" :set spl=en_ca spell<CR> | |
471 an 40.335.240 &Tools.&Spelling.Set\ Language\ to\ "en_gb" :set spl=en_gb spell<CR> | |
472 an 40.335.250 &Tools.&Spelling.Set\ Language\ to\ "en_nz" :set spl=en_nz spell<CR> | |
473 an 40.335.260 &Tools.&Spelling.Set\ Language\ to\ "en_us" :set spl=en_us spell<CR> | |
314 | 474 an <silent> 40.335.270 &Tools.&Spelling.&Find\ More\ Languages :call <SID>SpellLang()<CR> |
475 | |
20856 | 476 let s:undo_spelllang = ['aun &Tools.&Spelling.&Find\ More\ Languages'] |
31253
0257c9dedf56
patch 9.0.0960: error when using the "Spelling / Find More Languages" menu
Bram Moolenaar <Bram@vim.org>
parents:
31251
diff
changeset
|
477 def s:SpellLang(encChanged = false) |
20856 | 478 for cmd in s:undo_spelllang |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
479 exe "silent! " .. cmd |
452 | 480 endfor |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
481 s:undo_spelllang = [] |
452 | 482 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
483 var enc = &enc == "iso-8859-15" ? "latin1" : &enc |
452 | 484 |
31253
0257c9dedf56
patch 9.0.0960: error when using the "Spelling / Find More Languages" menu
Bram Moolenaar <Bram@vim.org>
parents:
31251
diff
changeset
|
485 # Reset g:menutrans_set_lang_to when called for the EncodingChanged event. |
0257c9dedf56
patch 9.0.0960: error when using the "Spelling / Find More Languages" menu
Bram Moolenaar <Bram@vim.org>
parents:
31251
diff
changeset
|
486 if !exists("g:menutrans_set_lang_to") || encChanged |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
487 g:menutrans_set_lang_to = 'Set Language to' |
3879 | 488 endif |
489 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
490 var found = 0 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
491 var _nm = '' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
492 var names = globpath(&runtimepath, "spell/*." .. enc .. ".spl", 1, 1) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
493 if !empty(names) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
494 var n = 300 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
495 for f in names |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
496 var nm = substitute(f, '.*spell[/\\]\(..\)\.[^/\\]*\.spl', '\1', "") |
452 | 497 if nm != "en" && nm !~ '/' |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
498 _nm = nm |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
499 found += 1 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
500 var menuname = '&Tools.&Spelling.' .. escape(g:menutrans_set_lang_to, "\\. \t|") .. '\ "' .. nm .. '"' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
501 exe 'an 40.335.' .. n .. ' ' .. menuname .. ' :set spl=' .. nm .. ' spell<CR>' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
502 s:undo_spelllang += ['aun ' .. menuname] |
314 | 503 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
504 n += 10 |
314 | 505 endfor |
506 endif | |
507 if found == 0 | |
508 echomsg "Could not find other spell files" | |
509 elseif found == 1 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
510 echomsg "Found spell file " .. _nm |
314 | 511 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
512 echomsg "Found " .. found .. " more spell files" |
314 | 513 endif |
31253
0257c9dedf56
patch 9.0.0960: error when using the "Spelling / Find More Languages" menu
Bram Moolenaar <Bram@vim.org>
parents:
31251
diff
changeset
|
514 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
515 # Need to redo this when 'encoding' is changed. |
452 | 516 augroup spellmenu |
31253
0257c9dedf56
patch 9.0.0960: error when using the "Spelling / Find More Languages" menu
Bram Moolenaar <Bram@vim.org>
parents:
31251
diff
changeset
|
517 au! EncodingChanged * call SpellLang(true) |
452 | 518 augroup END |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
519 enddef |
314 | 520 endif |
521 | |
7 | 522 " Tools.Fold Menu |
523 if has("folding") | |
524 " open close folds | |
11062 | 525 an 40.340.110 &Tools.&Folding.&Enable/Disable\ Folds<Tab>zi zi |
7 | 526 an 40.340.120 &Tools.&Folding.&View\ Cursor\ Line<Tab>zv zv |
11062 | 527 an 40.340.120 &Tools.&Folding.Vie&w\ Cursor\ Line\ Only<Tab>zMzx zMzx |
528 inoremenu 40.340.120 &Tools.&Folding.Vie&w\ Cursor\ Line\ Only<Tab>zMzx <C-O>zM<C-O>zx | |
529 an 40.340.130 &Tools.&Folding.C&lose\ More\ Folds<Tab>zm zm | |
530 an 40.340.140 &Tools.&Folding.&Close\ All\ Folds<Tab>zM zM | |
531 an 40.340.150 &Tools.&Folding.O&pen\ More\ Folds<Tab>zr zr | |
10895 | 532 an 40.340.160 &Tools.&Folding.&Open\ All\ Folds<Tab>zR zR |
7 | 533 " fold method |
534 an 40.340.200 &Tools.&Folding.-SEP1- <Nop> | |
535 an 40.340.210 &Tools.&Folding.Fold\ Met&hod.M&anual :set fdm=manual<CR> | |
536 an 40.340.210 &Tools.&Folding.Fold\ Met&hod.I&ndent :set fdm=indent<CR> | |
537 an 40.340.210 &Tools.&Folding.Fold\ Met&hod.E&xpression :set fdm=expr<CR> | |
538 an 40.340.210 &Tools.&Folding.Fold\ Met&hod.S&yntax :set fdm=syntax<CR> | |
539 an 40.340.210 &Tools.&Folding.Fold\ Met&hod.&Diff :set fdm=diff<CR> | |
540 an 40.340.210 &Tools.&Folding.Fold\ Met&hod.Ma&rker :set fdm=marker<CR> | |
541 " create and delete folds | |
542 vnoremenu 40.340.220 &Tools.&Folding.Create\ &Fold<Tab>zf zf | |
543 an 40.340.230 &Tools.&Folding.&Delete\ Fold<Tab>zd zd | |
544 an 40.340.240 &Tools.&Folding.Delete\ &All\ Folds<Tab>zD zD | |
545 " moving around in folds | |
546 an 40.340.300 &Tools.&Folding.-SEP2- <Nop> | |
11062 | 547 an 40.340.310.10 &Tools.&Folding.Fold\ Col&umn\ Width.\ &0\ :set fdc=0<CR> |
548 an 40.340.310.20 &Tools.&Folding.Fold\ Col&umn\ Width.\ &2\ :set fdc=2<CR> | |
549 an 40.340.310.30 &Tools.&Folding.Fold\ Col&umn\ Width.\ &3\ :set fdc=3<CR> | |
550 an 40.340.310.40 &Tools.&Folding.Fold\ Col&umn\ Width.\ &4\ :set fdc=4<CR> | |
551 an 40.340.310.50 &Tools.&Folding.Fold\ Col&umn\ Width.\ &5\ :set fdc=5<CR> | |
552 an 40.340.310.60 &Tools.&Folding.Fold\ Col&umn\ Width.\ &6\ :set fdc=6<CR> | |
553 an 40.340.310.70 &Tools.&Folding.Fold\ Col&umn\ Width.\ &7\ :set fdc=7<CR> | |
554 an 40.340.310.80 &Tools.&Folding.Fold\ Col&umn\ Width.\ &8\ :set fdc=8<CR> | |
7 | 555 endif " has folding |
556 | |
557 if has("diff") | |
558 an 40.350.100 &Tools.&Diff.&Update :diffupdate<CR> | |
559 an 40.350.110 &Tools.&Diff.&Get\ Block :diffget<CR> | |
560 vunmenu &Tools.&Diff.&Get\ Block | |
561 vnoremenu &Tools.&Diff.&Get\ Block :diffget<CR> | |
562 an 40.350.120 &Tools.&Diff.&Put\ Block :diffput<CR> | |
563 vunmenu &Tools.&Diff.&Put\ Block | |
564 vnoremenu &Tools.&Diff.&Put\ Block :diffput<CR> | |
565 endif | |
566 | |
567 an 40.358 &Tools.-SEP2- <Nop> | |
568 an 40.360 &Tools.&Make<Tab>:make :make<CR> | |
569 an 40.370 &Tools.&List\ Errors<Tab>:cl :cl<CR> | |
570 an 40.380 &Tools.L&ist\ Messages<Tab>:cl! :cl!<CR> | |
571 an 40.390 &Tools.&Next\ Error<Tab>:cn :cn<CR> | |
572 an 40.400 &Tools.&Previous\ Error<Tab>:cp :cp<CR> | |
573 an 40.410 &Tools.&Older\ List<Tab>:cold :colder<CR> | |
574 an 40.420 &Tools.N&ewer\ List<Tab>:cnew :cnewer<CR> | |
575 an 40.430.50 &Tools.Error\ &Window.&Update<Tab>:cwin :cwin<CR> | |
576 an 40.430.60 &Tools.Error\ &Window.&Open<Tab>:copen :copen<CR> | |
577 an 40.430.70 &Tools.Error\ &Window.&Close<Tab>:cclose :cclose<CR> | |
578 | |
579 an 40.520 &Tools.-SEP3- <Nop> | |
580 an <silent> 40.530 &Tools.&Convert\ to\ HEX<Tab>:%!xxd | |
581 \ :call <SID>XxdConv()<CR> | |
11062 | 582 an <silent> 40.540 &Tools.Conve&rt\ Back<Tab>:%!xxd\ -r |
7 | 583 \ :call <SID>XxdBack()<CR> |
584 | |
585 " Use a function to do the conversion, so that it also works with 'insertmode' | |
586 " set. | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
587 def s:XxdConv() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
588 var mod = &mod |
7 | 589 if has("vms") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
590 :%!mc vim:xxd |
7 | 591 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
592 s:XxdFind() |
28010 | 593 exe ':%!' .. g:xxdprogram |
7 | 594 endif |
28010 | 595 if getline(1) =~ "^00000000:" # only if it worked |
7 | 596 set ft=xxd |
597 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
598 &mod = mod |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
599 enddef |
7 | 600 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
601 def s:XxdBack() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
602 var mod = &mod |
7 | 603 if has("vms") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
604 :%!mc vim:xxd -r |
7 | 605 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
606 s:XxdFind() |
28010 | 607 exe ':%!' .. g:xxdprogram .. ' -r' |
7 | 608 endif |
609 set ft= | |
610 doautocmd filetypedetect BufReadPost | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
611 &mod = mod |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
612 enddef |
7 | 613 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
614 def s:XxdFind() |
7 | 615 if !exists("g:xxdprogram") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
616 # On the PC xxd may not be in the path but in the install directory |
9555
9560a5b782ee
commit https://github.com/vim/vim/commit/42ebd066422d73cdb7bda6a1dc828a3dd022dec8
Christian Brabandt <cb@256bit.org>
parents:
5968
diff
changeset
|
617 if has("win32") && !executable("xxd") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
618 g:xxdprogram = $VIMRUNTIME .. (&shellslash ? '/' : '\') .. "xxd.exe" |
18594 | 619 if g:xxdprogram =~ ' ' |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
620 g:xxdprogram = '"' .. g:xxdprogram .. '"' |
18594 | 621 endif |
7 | 622 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
623 g:xxdprogram = "xxd" |
7 | 624 endif |
625 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
626 enddef |
7 | 627 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
628 let s:did_setup_compilers = 0 |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
629 |
7 | 630 " Setup the Tools.Compiler submenu |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
631 def s:SetupCompilers() |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
632 if s:did_setup_compilers |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
633 return |
7 | 634 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
635 s:did_setup_compilers = 1 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
636 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
637 var names = globpath(&runtimepath, "compiler/*.vim", 1, 1) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
638 var idx = 100 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
639 for name in names |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
640 # Ignore case for VMS and windows |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
641 var cname = substitute(name, '\c.*[/\\:\]]\([^/\\:]*\)\.vim', '\1', '') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
642 exe "an 30.440." .. idx .. ' &Tools.Se&t\ Compiler.' .. cname .. " :compiler " .. cname .. "<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
643 idx += 10 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
644 endfor |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
645 silent! aunmenu &Tools.Show\ Compiler\ Se&ttings\ in\ Menu |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
646 enddef |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
647 |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
648 if exists("do_no_lazyload_menus") |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
649 call s:SetupCompilers() |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
650 else |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
651 an <silent> 30.440 &Tools.Show\ Compiler\ Se&ttings\ in\ Menu :call <SID>SetupCompilers()<CR> |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
652 endif |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
653 |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
654 " Load ColorScheme, Compiler Setting and Keymap menus when idle. |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
655 if !exists("do_no_lazyload_menus") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
656 def s:SetupLazyloadMenus() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
657 s:SetupColorSchemes() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
658 s:SetupCompilers() |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
659 if has("keymap") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
660 s:SetupKeymaps() |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
661 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
662 enddef |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
663 augroup SetupLazyloadMenus |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
664 au! |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
665 au CursorHold,CursorHoldI * call <SID>SetupLazyloadMenus() | au! SetupLazyloadMenus |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
666 augroup END |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
667 endif |
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
668 |
7 | 669 |
670 if !exists("no_buffers_menu") | |
671 | |
672 " Buffer list menu -- Setup functions & actions | |
673 | |
674 " wait with building the menu until after loading 'session' files. Makes | |
675 " startup faster. | |
676 let s:bmenu_wait = 1 | |
677 | |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
678 " Dictionary of buffer number to name. This helps prevent problems where a |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
679 " buffer as renamed and we didn't keep track of that. |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
680 let s:bmenu_items = {} |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
681 |
7 | 682 if !exists("bmenu_priority") |
683 let bmenu_priority = 60 | |
684 endif | |
685 | |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
686 " invoked from a BufCreate or BufFilePost autocommand |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
687 def s:BMAdd() |
7 | 688 if s:bmenu_wait == 0 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
689 # when adding too many buffers, redraw in short format |
7 | 690 if s:bmenu_count == &menuitems && s:bmenu_short == 0 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
691 s:BMShow() |
7 | 692 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
693 var name = expand("<afile>") |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
694 var num = str2nr(expand("<abuf>")) |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
695 if s:BMCanAdd(name, num) |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
696 s:BMFilename(name, num) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
697 s:bmenu_count += 1 |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
698 endif |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
699 endif |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
700 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
701 enddef |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
702 |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
703 " invoked from a BufDelete or BufFilePre autocommand |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
704 def s:BMRemove() |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
705 if s:bmenu_wait == 0 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
706 var bufnum = expand("<abuf>") |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
707 if s:bmenu_items->has_key(bufnum) |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
708 var menu_name = s:bmenu_items[bufnum] |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
709 exe 'silent! aun &Buffers.' .. menu_name |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
710 s:bmenu_count = s:bmenu_count - 1 |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
711 unlet s:bmenu_items[bufnum] |
7 | 712 endif |
713 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
714 enddef |
7 | 715 |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
716 " Return non-zero if buffer with number "name" / "num" is useful to add in the |
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
717 " buffer menu. |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
718 def s:BMCanAdd(name: string, num: number): bool |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
719 # no directory or unlisted buffer |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
720 if isdirectory(name) || !buflisted(num) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
721 return false |
26708 | 722 endif |
723 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
724 # no name with control characters |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
725 if name =~ '[\x01-\x1f]' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
726 return false |
7 | 727 endif |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
728 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
729 # no special buffer, such as terminal or popup |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
730 var buftype = getbufvar(num, '&buftype') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
731 if buftype != '' && buftype != 'nofile' && buftype != 'nowrite' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
732 return false |
7 | 733 endif |
734 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
735 # only existing buffers |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
736 return bufexists(num) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
737 enddef |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
738 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
739 " Create the buffer menu (delete an existing one first). |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
740 def s:BMShow() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
741 s:bmenu_wait = 1 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
742 s:bmenu_short = 1 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
743 s:bmenu_count = 0 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
744 s:bmenu_items = {} |
7 | 745 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
746 # Remove old menu, if it exists; keep one entry to avoid a torn off menu to |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
747 # disappear. Use try/catch to avoid setting v:errmsg |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
748 try |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
749 unmenu &Buffers |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
750 catch |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
751 endtry |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
752 exe 'noremenu ' .. g:bmenu_priority .. ".1 &Buffers.Dummy l" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
753 try |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
754 unmenu! &Buffers |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
755 catch |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
756 endtry |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
757 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
758 # create new menu |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
759 exe 'an <silent> ' .. g:bmenu_priority .. ".2 &Buffers.&Refresh\\ menu :call <SID>BMShow()<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
760 exe 'an ' .. g:bmenu_priority .. ".4 &Buffers.&Delete :confirm bd<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
761 exe 'an ' .. g:bmenu_priority .. ".6 &Buffers.&Alternate :confirm b #<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
762 exe 'an ' .. g:bmenu_priority .. ".7 &Buffers.&Next :confirm bnext<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
763 exe 'an ' .. g:bmenu_priority .. ".8 &Buffers.&Previous :confirm bprev<CR>" |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
764 exe 'an ' .. g:bmenu_priority .. ".9 &Buffers.-SEP- :" |
7 | 765 unmenu &Buffers.Dummy |
766 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
767 # figure out how many buffers there are |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
768 var buf = 1 |
7 | 769 while buf <= bufnr('$') |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
770 if s:BMCanAdd(bufname(buf), buf) |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
771 s:bmenu_count = s:bmenu_count + 1 |
7 | 772 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
773 buf += 1 |
7 | 774 endwhile |
775 if s:bmenu_count <= &menuitems | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
776 s:bmenu_short = 0 |
7 | 777 endif |
778 | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
779 # iterate through buffer list, adding each buffer to the menu: |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
780 buf = 1 |
7 | 781 while buf <= bufnr('$') |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
782 var name = bufname(buf) |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
783 if s:BMCanAdd(name, buf) |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
784 call s:BMFilename(name, buf) |
7 | 785 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
786 buf += 1 |
7 | 787 endwhile |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
788 s:bmenu_wait = 0 |
7 | 789 aug buffer_list |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
790 au! |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
791 au BufCreate,BufFilePost * call s:BMAdd() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
792 au BufDelete,BufFilePre * call s:BMRemove() |
7 | 793 aug END |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
794 enddef |
7 | 795 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
796 def s:BMHash(name: string): number |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
797 # Make name all upper case, so that chars are between 32 and 96 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
798 var nm = substitute(name, ".*", '\U\0', "") |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
799 var sp: number |
7 | 800 if has("ebcdic") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
801 # HACK: Replace all non alphabetics with 'Z' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
802 # Just to make it work for now. |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
803 nm = substitute(nm, "[^A-Z]", 'Z', "g") |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
804 sp = char2nr('A') - 1 |
7 | 805 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
806 sp = char2nr(' ') |
7 | 807 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
808 # convert first six chars into a number for sorting: |
7 | 809 return (char2nr(nm[0]) - sp) * 0x800000 + (char2nr(nm[1]) - sp) * 0x20000 + (char2nr(nm[2]) - sp) * 0x1000 + (char2nr(nm[3]) - sp) * 0x80 + (char2nr(nm[4]) - sp) * 0x20 + (char2nr(nm[5]) - sp) |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
810 enddef |
7 | 811 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
812 def s:BMHash2(name: string): string |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
813 var nm = substitute(name, ".", '\L\0', "") |
7 | 814 if nm[0] < 'a' || nm[0] > 'z' |
815 return '&others.' | |
816 elseif nm[0] <= 'd' | |
817 return '&abcd.' | |
818 elseif nm[0] <= 'h' | |
819 return '&efgh.' | |
820 elseif nm[0] <= 'l' | |
821 return '&ijkl.' | |
822 elseif nm[0] <= 'p' | |
823 return '&mnop.' | |
824 elseif nm[0] <= 't' | |
825 return '&qrst.' | |
826 else | |
827 return '&u-z.' | |
828 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
829 enddef |
7 | 830 |
19713
8514e8b7e661
patch 8.2.0413: buffer menu does not handle special buffers properly
Bram Moolenaar <Bram@vim.org>
parents:
18860
diff
changeset
|
831 " Insert a buffer name into the buffer menu. |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
832 def s:BMFilename(name: string, num: number) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
833 var munge = s:BMMunge(name, num) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
834 var hash = s:BMHash(munge) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
835 var cmd: string |
7 | 836 if s:bmenu_short == 0 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
837 s:bmenu_items[num] = munge |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
838 cmd = 'an ' .. g:bmenu_priority .. '.' .. hash .. ' &Buffers.' .. munge |
7 | 839 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
840 var menu_name = s:BMHash2(munge) .. munge |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
841 s:bmenu_items[num] = menu_name |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
842 cmd = 'an ' .. g:bmenu_priority .. '.' .. hash .. '.' .. hash .. ' &Buffers.' .. menu_name |
7 | 843 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
844 exe cmd .. ' :confirm b' .. num .. '<CR>' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
845 enddef |
7 | 846 |
847 " Truncate a long path to fit it in a menu item. | |
848 if !exists("g:bmenu_max_pathlen") | |
849 let g:bmenu_max_pathlen = 35 | |
850 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
851 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
852 def s:BMTruncName(fname: string): string |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
853 var name = fname |
7 | 854 if g:bmenu_max_pathlen < 5 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
855 name = "" |
7 | 856 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
857 var len = strlen(name) |
7 | 858 if len > g:bmenu_max_pathlen |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
859 var amountl = (g:bmenu_max_pathlen / 2) - 2 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
860 var amountr = g:bmenu_max_pathlen - amountl - 3 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
861 var pattern = '^\(.\{,' .. amountl .. '}\).\{-}\(.\{,' .. amountr .. '}\)$' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
862 var left = substitute(name, pattern, '\1', '') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
863 var right = substitute(name, pattern, '\2', '') |
7 | 864 if strlen(left) + strlen(right) < len |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
865 name = left .. '...' .. right |
7 | 866 endif |
867 endif | |
868 endif | |
869 return name | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
870 enddef |
7 | 871 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
872 def s:BMMunge(fname: string, bnum: number): string |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
873 var name = fname |
7 | 874 if name == '' |
875 if !exists("g:menutrans_no_file") | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
876 g:menutrans_no_file = "[No Name]" |
7 | 877 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
878 name = g:menutrans_no_file |
7 | 879 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
880 name = fnamemodify(name, ':p:~') |
7 | 881 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
882 # detach file name and separate it out: |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
883 var name2 = fnamemodify(name, ':t') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
884 if bnum >= 0 |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
885 name2 = name2 .. ' (' .. bnum .. ')' |
7 | 886 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
887 name = name2 .. "\t" .. s:BMTruncName(fnamemodify(name, ':h')) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
888 name = escape(name, "\\. \t|") |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
889 name = substitute(name, "&", "&&", "g") |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
890 name = substitute(name, "\n", "^@", "g") |
7 | 891 return name |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
892 enddef |
7 | 893 |
894 " When just starting Vim, load the buffer menu later | |
895 if has("vim_starting") | |
896 augroup LoadBufferMenu | |
897 au! VimEnter * if !exists("no_buffers_menu") | call <SID>BMShow() | endif | |
898 au VimEnter * au! LoadBufferMenu | |
899 augroup END | |
900 else | |
901 call <SID>BMShow() | |
902 endif | |
903 | |
904 endif " !exists("no_buffers_menu") | |
905 | |
906 " Window menu | |
907 an 70.300 &Window.&New<Tab>^Wn <C-W>n | |
908 an 70.310 &Window.S&plit<Tab>^Ws <C-W>s | |
909 an 70.320 &Window.Sp&lit\ To\ #<Tab>^W^^ <C-W><C-^> | |
910 an 70.330 &Window.Split\ &Vertically<Tab>^Wv <C-W>v | |
15729 | 911 an <silent> 70.332 &Window.Split\ File\ E&xplorer :call MenuExplOpen()<CR> |
912 if !exists("*MenuExplOpen") | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
913 def MenuExplOpen() |
15729 | 914 if @% == "" |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
915 :20vsp . |
15729 | 916 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
917 exe ":20vsp " .. fnameescape(expand("%:p:h")) |
15729 | 918 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
919 enddef |
7 | 920 endif |
921 an 70.335 &Window.-SEP1- <Nop> | |
922 an 70.340 &Window.&Close<Tab>^Wc :confirm close<CR> | |
923 an 70.345 &Window.Close\ &Other(s)<Tab>^Wo :confirm only<CR> | |
924 an 70.350 &Window.-SEP2- <Nop> | |
925 an 70.355 &Window.Move\ &To.&Top<Tab>^WK <C-W>K | |
926 an 70.355 &Window.Move\ &To.&Bottom<Tab>^WJ <C-W>J | |
11062 | 927 an 70.355 &Window.Move\ &To.&Left\ Side<Tab>^WH <C-W>H |
928 an 70.355 &Window.Move\ &To.&Right\ Side<Tab>^WL <C-W>L | |
7 | 929 an 70.360 &Window.Rotate\ &Up<Tab>^WR <C-W>R |
930 an 70.362 &Window.Rotate\ &Down<Tab>^Wr <C-W>r | |
931 an 70.365 &Window.-SEP3- <Nop> | |
932 an 70.370 &Window.&Equal\ Size<Tab>^W= <C-W>= | |
933 an 70.380 &Window.&Max\ Height<Tab>^W_ <C-W>_ | |
934 an 70.390 &Window.M&in\ Height<Tab>^W1_ <C-W>1_ | |
935 an 70.400 &Window.Max\ &Width<Tab>^W\| <C-W>\| | |
936 an 70.410 &Window.Min\ Widt&h<Tab>^W1\| <C-W>1\| | |
937 | |
938 " The popup menu | |
939 an 1.10 PopUp.&Undo u | |
940 an 1.15 PopUp.-SEP1- <Nop> | |
941 vnoremenu 1.20 PopUp.Cu&t "+x | |
942 vnoremenu 1.30 PopUp.&Copy "+y | |
943 cnoremenu 1.30 PopUp.&Copy <C-Y> | |
944 nnoremenu 1.40 PopUp.&Paste "+gP | |
945 cnoremenu 1.40 PopUp.&Paste <C-R>+ | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
946 exe 'vnoremenu <script> 1.40 PopUp.&Paste ' .. paste#paste_cmd['v'] |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
947 exe 'inoremenu <script> 1.40 PopUp.&Paste ' .. paste#paste_cmd['i'] |
7 | 948 vnoremenu 1.50 PopUp.&Delete x |
949 an 1.55 PopUp.-SEP2- <Nop> | |
950 vnoremenu 1.60 PopUp.Select\ Blockwise <C-V> | |
36 | 951 |
952 nnoremenu 1.70 PopUp.Select\ &Word vaw | |
953 onoremenu 1.70 PopUp.Select\ &Word aw | |
954 vnoremenu 1.70 PopUp.Select\ &Word <C-C>vaw | |
955 inoremenu 1.70 PopUp.Select\ &Word <C-O>vaw | |
956 cnoremenu 1.70 PopUp.Select\ &Word <C-C>vaw | |
957 | |
958 nnoremenu 1.73 PopUp.Select\ &Sentence vas | |
959 onoremenu 1.73 PopUp.Select\ &Sentence as | |
960 vnoremenu 1.73 PopUp.Select\ &Sentence <C-C>vas | |
961 inoremenu 1.73 PopUp.Select\ &Sentence <C-O>vas | |
962 cnoremenu 1.73 PopUp.Select\ &Sentence <C-C>vas | |
963 | |
964 nnoremenu 1.77 PopUp.Select\ Pa&ragraph vap | |
965 onoremenu 1.77 PopUp.Select\ Pa&ragraph ap | |
966 vnoremenu 1.77 PopUp.Select\ Pa&ragraph <C-C>vap | |
967 inoremenu 1.77 PopUp.Select\ Pa&ragraph <C-O>vap | |
968 cnoremenu 1.77 PopUp.Select\ Pa&ragraph <C-C>vap | |
969 | |
970 nnoremenu 1.80 PopUp.Select\ &Line V | |
971 onoremenu 1.80 PopUp.Select\ &Line <C-C>V | |
972 vnoremenu 1.80 PopUp.Select\ &Line <C-C>V | |
973 inoremenu 1.80 PopUp.Select\ &Line <C-O>V | |
974 cnoremenu 1.80 PopUp.Select\ &Line <C-C>V | |
975 | |
976 nnoremenu 1.90 PopUp.Select\ &Block <C-V> | |
977 onoremenu 1.90 PopUp.Select\ &Block <C-C><C-V> | |
978 vnoremenu 1.90 PopUp.Select\ &Block <C-C><C-V> | |
979 inoremenu 1.90 PopUp.Select\ &Block <C-O><C-V> | |
980 cnoremenu 1.90 PopUp.Select\ &Block <C-C><C-V> | |
981 | |
7 | 982 noremenu <script> <silent> 1.100 PopUp.Select\ &All :<C-U>call <SID>SelectAll()<CR> |
983 inoremenu <script> <silent> 1.100 PopUp.Select\ &All <C-O>:call <SID>SelectAll()<CR> | |
984 cnoremenu <script> <silent> 1.100 PopUp.Select\ &All <C-U>call <SID>SelectAll()<CR> | |
985 | |
435 | 986 if has("spell") |
987 " Spell suggestions in the popup menu. Note that this will slow down the | |
988 " appearance of the menu! | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
989 def s:SpellPopup() |
435 | 990 if exists("s:changeitem") && s:changeitem != '' |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
991 call s:SpellDel() |
435 | 992 endif |
980 | 993 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
994 # Return quickly if spell checking is not enabled. |
438 | 995 if !&spell || &spelllang == '' |
996 return | |
997 endif | |
435 | 998 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
999 var curcol = col('.') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1000 var w: string |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1001 var a: string |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1002 [w, a] = spellbadword() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1003 if col('.') > curcol # don't use word after the cursor |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1004 w = '' |
435 | 1005 endif |
1006 if w != '' | |
835 | 1007 if a == 'caps' |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1008 s:suglist = [substitute(w, '.*', '\u&', '')] |
835 | 1009 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1010 s:suglist = spellsuggest(w, 10) |
835 | 1011 endif |
2293
e0fabd886db6
Fix bug: spell menu moved cursor, causing Copy not to work. Spell replacement
Bram Moolenaar <bram@vim.org>
parents:
2178
diff
changeset
|
1012 if len(s:suglist) > 0 |
13960
bbff863d3cae
Updated runtime files.
Christian Brabandt <cb@256bit.org>
parents:
12804
diff
changeset
|
1013 if !exists("g:menutrans_spell_change_ARG_to") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1014 g:menutrans_spell_change_ARG_to = 'Change\ "%s"\ to' |
13960
bbff863d3cae
Updated runtime files.
Christian Brabandt <cb@256bit.org>
parents:
12804
diff
changeset
|
1015 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1016 s:changeitem = printf(g:menutrans_spell_change_ARG_to, escape(w, ' .')) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1017 s:fromword = w |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1018 var pri = 1 |
435 | 1019 for sug in s:suglist |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1020 exe 'anoremenu 1.5.' .. pri .. ' PopUp.' .. s:changeitem .. '.' .. escape(sug, ' .') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1021 \ .. ' :call <SID>SpellReplace(' .. pri .. ')<CR>' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1022 pri += 1 |
435 | 1023 endfor |
1024 | |
13960
bbff863d3cae
Updated runtime files.
Christian Brabandt <cb@256bit.org>
parents:
12804
diff
changeset
|
1025 if !exists("g:menutrans_spell_add_ARG_to_word_list") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1026 g:menutrans_spell_add_ARG_to_word_list = 'Add\ "%s"\ to\ Word\ List' |
13960
bbff863d3cae
Updated runtime files.
Christian Brabandt <cb@256bit.org>
parents:
12804
diff
changeset
|
1027 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1028 s:additem = printf(g:menutrans_spell_add_ARG_to_word_list, escape(w, ' .')) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1029 exe 'anoremenu 1.6 PopUp.' .. s:additem .. ' :spellgood ' .. w .. '<CR>' |
435 | 1030 |
13960
bbff863d3cae
Updated runtime files.
Christian Brabandt <cb@256bit.org>
parents:
12804
diff
changeset
|
1031 if !exists("g:menutrans_spell_ignore_ARG") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1032 g:menutrans_spell_ignore_ARG = 'Ignore\ "%s"' |
13960
bbff863d3cae
Updated runtime files.
Christian Brabandt <cb@256bit.org>
parents:
12804
diff
changeset
|
1033 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1034 s:ignoreitem = printf(g:menutrans_spell_ignore_ARG, escape(w, ' .')) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1035 exe 'anoremenu 1.7 PopUp.' .. s:ignoreitem .. ' :spellgood! ' .. w .. '<CR>' |
435 | 1036 |
980 | 1037 anoremenu 1.8 PopUp.-SpellSep- : |
435 | 1038 endif |
1039 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1040 call cursor(0, curcol) # put the cursor back where it was |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1041 enddef |
435 | 1042 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1043 def s:SpellReplace(n: number) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1044 var l = getline('.') |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1045 # Move the cursor to the start of the word. |
2293
e0fabd886db6
Fix bug: spell menu moved cursor, causing Copy not to work. Spell replacement
Bram Moolenaar <bram@vim.org>
parents:
2178
diff
changeset
|
1046 call spellbadword() |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1047 call setline('.', strpart(l, 0, col('.') - 1) .. s:suglist[n - 1] |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1048 \ .. strpart(l, col('.') + len(s:fromword) - 1)) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1049 enddef |
435 | 1050 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1051 def s:SpellDel() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1052 exe "aunmenu PopUp." .. s:changeitem |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1053 exe "aunmenu PopUp." .. s:additem |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1054 exe "aunmenu PopUp." .. s:ignoreitem |
435 | 1055 aunmenu PopUp.-SpellSep- |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1056 s:changeitem = '' |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1057 enddef |
435 | 1058 |
980 | 1059 augroup SpellPopupMenu |
1060 au! MenuPopup * call <SID>SpellPopup() | |
1061 augroup END | |
435 | 1062 endif |
7 | 1063 |
1064 " The GUI toolbar (for MS-Windows and GTK) | |
1065 if has("toolbar") | |
1066 an 1.10 ToolBar.Open :browse confirm e<CR> | |
1067 an <silent> 1.20 ToolBar.Save :if expand("%") == ""<Bar>browse confirm w<Bar>else<Bar>confirm w<Bar>endif<CR> | |
1068 an 1.30 ToolBar.SaveAll :browse confirm wa<CR> | |
1069 | |
1070 if has("printer") | |
1071 an 1.40 ToolBar.Print :hardcopy<CR> | |
1072 vunmenu ToolBar.Print | |
1073 vnoremenu ToolBar.Print :hardcopy<CR> | |
1074 elseif has("unix") | |
1075 an 1.40 ToolBar.Print :w !lpr<CR> | |
1076 vunmenu ToolBar.Print | |
1077 vnoremenu ToolBar.Print :w !lpr<CR> | |
1078 endif | |
1079 | |
1080 an 1.45 ToolBar.-sep1- <Nop> | |
1081 an 1.50 ToolBar.Undo u | |
1082 an 1.60 ToolBar.Redo <C-R> | |
1083 | |
1084 an 1.65 ToolBar.-sep2- <Nop> | |
1085 vnoremenu 1.70 ToolBar.Cut "+x | |
1086 vnoremenu 1.80 ToolBar.Copy "+y | |
1087 cnoremenu 1.80 ToolBar.Copy <C-Y> | |
1088 nnoremenu 1.90 ToolBar.Paste "+gP | |
1089 cnoremenu ToolBar.Paste <C-R>+ | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1090 exe 'vnoremenu <script> ToolBar.Paste ' .. paste#paste_cmd['v'] |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1091 exe 'inoremenu <script> ToolBar.Paste ' .. paste#paste_cmd['i'] |
7 | 1092 |
1093 if !has("gui_athena") | |
1094 an 1.95 ToolBar.-sep3- <Nop> | |
205 | 1095 an 1.100 ToolBar.Replace :promptrepl<CR> |
7 | 1096 vunmenu ToolBar.Replace |
719 | 1097 vnoremenu ToolBar.Replace y:promptrepl <C-R>=<SID>FixFText()<CR><CR> |
205 | 1098 an 1.110 ToolBar.FindNext n |
1099 an 1.120 ToolBar.FindPrev N | |
7 | 1100 endif |
1101 | |
1102 an 1.215 ToolBar.-sep5- <Nop> | |
1103 an <silent> 1.220 ToolBar.LoadSesn :call <SID>LoadVimSesn()<CR> | |
1104 an <silent> 1.230 ToolBar.SaveSesn :call <SID>SaveVimSesn()<CR> | |
1105 an 1.240 ToolBar.RunScript :browse so<CR> | |
1106 | |
1107 an 1.245 ToolBar.-sep6- <Nop> | |
1108 an 1.250 ToolBar.Make :make<CR> | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1109 an 1.270 ToolBar.RunCtags :exe "!" .. g:ctags_command<CR> |
7 | 1110 an 1.280 ToolBar.TagJump g<C-]> |
1111 | |
1112 an 1.295 ToolBar.-sep7- <Nop> | |
1113 an 1.300 ToolBar.Help :help<CR> | |
1114 an <silent> 1.310 ToolBar.FindHelp :call <SID>Helpfind()<CR> | |
1115 | |
1116 " Only set the tooltips here if not done in a language menu file | |
1117 if exists("*Do_toolbar_tmenu") | |
1118 call Do_toolbar_tmenu() | |
1119 else | |
1120 let did_toolbar_tmenu = 1 | |
1121 tmenu ToolBar.Open Open file | |
1122 tmenu ToolBar.Save Save current file | |
1123 tmenu ToolBar.SaveAll Save all files | |
1124 tmenu ToolBar.Print Print | |
1125 tmenu ToolBar.Undo Undo | |
1126 tmenu ToolBar.Redo Redo | |
1127 tmenu ToolBar.Cut Cut to clipboard | |
1128 tmenu ToolBar.Copy Copy to clipboard | |
1129 tmenu ToolBar.Paste Paste from Clipboard | |
1130 if !has("gui_athena") | |
2034 | 1131 tmenu ToolBar.Replace Find / Replace... |
7 | 1132 tmenu ToolBar.FindNext Find Next |
1133 tmenu ToolBar.FindPrev Find Previous | |
1134 endif | |
980 | 1135 tmenu ToolBar.LoadSesn Choose a session to load |
7 | 1136 tmenu ToolBar.SaveSesn Save current session |
980 | 1137 tmenu ToolBar.RunScript Choose a Vim Script to run |
205 | 1138 tmenu ToolBar.Make Make current project (:make) |
1139 tmenu ToolBar.RunCtags Build tags in current directory tree (!ctags -R .) | |
7 | 1140 tmenu ToolBar.TagJump Jump to tag under cursor |
1141 tmenu ToolBar.Help Vim Help | |
1142 tmenu ToolBar.FindHelp Search Vim Help | |
1143 endif | |
1144 | |
1145 " Select a session to load; default to current session name if present | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1146 def s:LoadVimSesn() |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1147 var name: string |
7 | 1148 if strlen(v:this_session) > 0 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1149 name = fnameescape(v:this_session) |
7 | 1150 else |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1151 name = "Session.vim" |
7 | 1152 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1153 execute "browse so " .. name |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1154 enddef |
7 | 1155 |
1156 " Select a session to save; default to current session name if present | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1157 def s:SaveVimSesn() |
7 | 1158 if strlen(v:this_session) == 0 |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1159 v:this_session = "Session.vim" |
7 | 1160 endif |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1161 execute "browse mksession! " .. fnameescape(v:this_session) |
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1162 enddef |
7 | 1163 |
1164 endif | |
1165 | |
1166 endif " !exists("did_install_default_menus") | |
1167 | |
1168 " Define these items always, so that syntax can be switched on when it wasn't. | |
1169 " But skip them when the Syntax menu was disabled by the user. | |
1170 if !exists("did_install_syntax_menu") | |
1171 an 50.212 &Syntax.&Manual :syn manual<CR> | |
1172 an 50.214 &Syntax.A&utomatic :syn on<CR> | |
11062 | 1173 an <silent> 50.216 &Syntax.On/Off\ for\ &This\ File :call <SID>SynOnOff()<CR> |
7 | 1174 if !exists("*s:SynOnOff") |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1175 def s:SynOnOff() |
7 | 1176 if has("syntax_items") |
1177 syn clear | |
1178 else | |
1179 if !exists("g:syntax_on") | |
1180 syn manual | |
1181 endif | |
1182 set syn=ON | |
1183 endif | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1184 enddef |
7 | 1185 endif |
1186 endif | |
1187 | |
1188 | |
1189 " Install the Syntax menu only when filetype.vim has been loaded or when | |
1190 " manual syntax highlighting is enabled. | |
1191 " Avoid installing the Syntax menu twice. | |
1192 if (exists("did_load_filetypes") || exists("syntax_on")) | |
1193 \ && !exists("did_install_syntax_menu") | |
1194 let did_install_syntax_menu = 1 | |
1195 | |
1196 " Skip setting up the individual syntax selection menus unless | |
1197 " do_syntax_sel_menu is defined (it takes quite a bit of time). | |
1198 if exists("do_syntax_sel_menu") | |
1199 runtime! synmenu.vim | |
1200 else | |
12804
6687b321fb91
patch 8.0.1279: initializing menus can be slow
Christian Brabandt <cb@256bit.org>
parents:
11062
diff
changeset
|
1201 an <silent> 50.10 &Syntax.&Show\ File\ Types\ in\ Menu :let do_syntax_sel_menu = 1<Bar>runtime! synmenu.vim<Bar>aunmenu &Syntax.&Show\ File\ Types\ in\ Menu<CR> |
7 | 1202 an 50.195 &Syntax.-SEP1- <Nop> |
1203 endif | |
1204 | |
1205 an 50.210 &Syntax.&Off :syn off<CR> | |
1206 an 50.700 &Syntax.-SEP3- <Nop> | |
11062 | 1207 an 50.710 &Syntax.Co&lor\ Test :sp $VIMRUNTIME/syntax/colortest.vim<Bar>so %<CR> |
1208 an 50.720 &Syntax.&Highlight\ Test :runtime syntax/hitest.vim<CR> | |
7 | 1209 an 50.730 &Syntax.&Convert\ to\ HTML :runtime syntax/2html.vim<CR> |
1210 | |
27623 | 1211 " Uncomment the next line to compile the functions early to find any mistakes |
1212 " defcompile | |
27538
f37561549ec2
Update runtime files; use compiled functions
Bram Moolenaar <Bram@vim.org>
parents:
26708
diff
changeset
|
1213 |
7 | 1214 endif " !exists("did_install_syntax_menu") |
1215 | |
1216 " Restore the previous value of 'cpoptions'. | |
1217 let &cpo = s:cpo_save | |
1218 unlet s:cpo_save | |
1219 | |
1220 " vim: set sw=2 : |