Mercurial > vim

comparison runtime/menu.vim @ 819:23f82b5d2814 v7.0c10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
updated for version 7.0c10
author vimboss
date Wed, 05 Apr 2006 20:41:53 +0000
parents 82ef0c58b012
children 5117153003bd
comparison
equal deleted inserted replaced
818:1f929f3ca806 819:23f82b5d2814
1 " Vim support file to define the default menus 1 " Vim support file to define the default menus
2 " You can also use this as a start for your own set of menus. 2 " You can also use this as a start for your own set of menus.
3 " 3 "
4 " Maintainer: Bram Moolenaar <Bram@vim.org> 4 " Maintainer: Bram Moolenaar <Bram@vim.org>
5 " Last Change: 2006 Mar 09 5 " Last Change: 2006 Apr 02
6 6
7 " Note that ":an" (short for ":anoremenu") is often used to make a menu work 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. 8 " in all modes and avoid side effects from mappings defined by the user.
9 9
10 " Make sure the '<' and 'C' flags are not included in 'cpoptions', otherwise 10 " Make sure the '<' and 'C' flags are not included in 'cpoptions', otherwise
175 vnoremenu &Edit.Find\ and\ Rep&lace<Tab>:s :s/ 175 vnoremenu &Edit.Find\ and\ Rep&lace<Tab>:s :s/
176 endif 176 endif
177 177
178 an 20.425 &Edit.-SEP3- <Nop> 178 an 20.425 &Edit.-SEP3- <Nop>
179 an 20.430 &Edit.Settings\ &Window :options<CR> 179 an 20.430 &Edit.Settings\ &Window :options<CR>
180 an 20.435 &Edit.Startup\ &Settings :call <SID>EditVimrc()<CR>
181
182 fun! s:EditVimrc()
183 if $MYVIMRC != ''
184 let fname = "$MYVIMRC"
185 elseif has("win32") || has("dos32") || has("dos16") || has("os2")
186 if $HOME != ''
187 let fname = "$HOME/_vimrc"
188 else
189 let fname = "$VIM/_vimrc"
190 endif
191 elseif has("amiga")
192 let fname = "s:.vimrc"
193 else
194 let fname = "$HOME/.vimrc"
195 endif
196 if &mod
197 exe "split " . fname
198 else
199 exe "edit " . fname
200 endif
201 endfun
180 202
181 fun! s:FixFText() 203 fun! s:FixFText()
182 " Fix text in nameless register to be used with :promptfind. 204 " Fix text in nameless register to be used with :promptfind.
183 return substitute(@", "[\r\n]", '\\n', 'g') 205 return substitute(@", "[\r\n]", '\\n', 'g')
184 endfun 206 endfun