/usr/share/vim/cream/cream-menu.vim is in cream 0.43-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 | "
" Filename: cream-menu.vim
"
" Cream -- An easy-to-use configuration of the famous Vim text editor
" [ http://cream.sourceforge.net ] Copyright (C) 2001-2011 Steve Hall
"
" License:
" This program is free software; you can redistribute it and/or modify
" it under the terms of the GNU General Public License as published by
" the Free Software Foundation; either version 3 of the License, or
" (at your option) any later version.
" [ http://www.gnu.org/licenses/gpl.html ]
"
" This program is distributed in the hope that it will be useful, but
" WITHOUT ANY WARRANTY; without even the implied warranty of
" MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
" General Public License for more details.
"
" You should have received a copy of the GNU General Public License
" along with this program; if not, write to the Free Software
" Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
" 02111-1307, USA.
"
function! Cream_menu_translation()
" copied from vim's own menu.vim, with a little modification
if exists("v:lang") || &langmenu != ""
" Try to find a menu translation file for the current language.
if &langmenu != ""
if &langmenu =~ "none"
let s:lang = ""
else
let s:lang = &langmenu
endif
else
let s:lang = v:lang
endif
" A language name must be at least two characters, don't accept "C"
if strlen(s:lang) > 1
" When the language does not include the charset add 'encoding'
if s:lang =~ '^\a\a$\|^\a\a_\a\a$'
let s:lang = s:lang . '.' . &encoding
endif
" We always use a lowercase name.
" Change "iso-8859" to "iso_8859" and "iso8859" to "iso_8859", some
" systems appear to use this.
" Change spaces to underscores.
let s:lang = substitute(tolower(s:lang), '\.iso-', ".iso_", "")
let s:lang = substitute(s:lang, '\.iso8859', ".iso_8859", "")
let s:lang = substitute(s:lang, " ", "_", "g")
" Remove "@euro", otherwise "LC_ALL=de_DE@euro gvim" will show English menus
let s:lang = substitute(s:lang, "@euro", "", "")
" Change "iso_8859-1" and "iso_8859-15" to "latin1", we always use the
" same menu file for them.
let s:lang = substitute(s:lang, 'iso_8859-15\=$', "latin1", "")
menutrans clear
execute "runtime! cream/lang/menu_" . s:lang . ".vim"
if !exists("did_menu_trans")
" There is no exact match, try matching with a wildcard added
" (e.g. find menu_de_de.iso_8859-1.vim if s:lang == de_DE).
let s:lang = substitute(s:lang, '\.[^.]*', "", "")
execute "runtime! cream/lang/menu_" . s:lang . "*.vim"
if !exists("did_menu_trans") && strlen($LANG) > 1
" On windows locale names are complicated, try using $LANG, it might
" have been set by set_init_1().
execute "runtime! cream/lang/menu_" . tolower($LANG) . "*.vim"
endif
endif
endif
endif
endfunction
function! Cream_menus()
" Creates each menu loader and calls it
" remove existing menus
source $VIMRUNTIME/delmenu.vim
call Cream_menu_translation()
" TODO: We really shouldn't be tampering with this here...
" Make sure the '<' and 'C' flags are not included in 'cpoptions', otherwise
" <CR> would not be recognized. See ":help 'cpoptions'".
let cpo_save = &cpoptions
set cpoptions&vim
"+++ Cream: necessary for GTK (set also from vimrc, but not effective there)
set guioptions+=M
"+++
"+++ Cream: GTK loads menus, even if you ask it not to!
unmenu! *
unmenu *
"+++
" load Cream menus
call Cream_source($CREAM . "cream-menu-file.vim")
call Cream_source($CREAM . "cream-menu-edit.vim")
call Cream_source($CREAM . "cream-menu-insert.vim")
call Cream_source($CREAM . "cream-menu-format.vim")
call Cream_source($CREAM . "cream-menu-settings.vim")
call Cream_source($CREAM . "cream-menu-tools.vim")
call Cream_source($CREAM . "cream-menu-window.vim")
call Cream_source($CREAM . "cream-menu-window-buffer.vim")
call Cream_source($CREAM . "cream-menu-help.vim")
call Cream_source($CREAM . "cream-menu-window.vim")
call Cream_source($CREAM . "cream-menu-developer.vim")
call Cream_source($CREAM . "cream-menu-toolbar.vim")
call Cream_source($CREAM . "cream-menu-popup.vim")
" restore
let &cpo = cpo_save
endfunction
call Cream_menus()
|