1" 2" cream-menu-file.vim 3" 4" Cream -- An easy-to-use configuration of the famous Vim text editor 5" [ http://cream.sourceforge.net ] Copyright (C) 2001-2011 Steve Hall 6" 7" License: 8" This program is free software; you can redistribute it and/or modify 9" it under the terms of the GNU General Public License as published by 10" the Free Software Foundation; either version 3 of the License, or 11" (at your option) any later version. 12" [ http://www.gnu.org/licenses/gpl.html ] 13" 14" This program is distributed in the hope that it will be useful, but 15" WITHOUT ANY WARRANTY; without even the implied warranty of 16" MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 17" General Public License for more details. 18" 19" You should have received a copy of the GNU General Public License 20" along with this program; if not, write to the Free Software 21" Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 22" 02111-1307, USA. 23" 24" Note: Recent File menu is called at bottom. 25" 26 27function! Cream_menu_load_file() 28" This is functionalized so that buffers can restore it after deleting the File menu for each refresh. 29 30 anoremenu <silent> 10.101 &File.&New<Tab>Ctrl+N :call Cream_file_new()<CR> 31 anoremenu <silent> 10.102 &File.&Open\.\.\.<Tab>Ctrl+O :call Cream_file_open()<CR> 32 vmenu <silent> 10.103 &File.&Open\ (selection)<Tab>Ctrl+Enter :<C-u>call Cream_file_open_undercursor("v")<CR> 33 anoremenu <silent> 10.104 &File.&Open\ (Read-Only)\.\.\. :call Cream_file_open_readonly()<CR> 34 anoremenu <silent> 10.105 &File.&Close\ File<Tab>Ctrl+F4 :call Cream_close()<CR> 35 anoremenu <silent> 10.106 &File.C&lose\ All\ Files :call Cream_close_all()<CR> 36 37 anoremenu <silent> 10.107 &File.-SEP1- <Nul> 38 anoremenu <silent> 10.108 &File.&Save<Tab>Ctrl+S :call Cream_save()<CR> 39 anoremenu <silent> 10.109 &File.Save\ &As\.\.\. :call Cream_saveas()<CR> 40 anoremenu <silent> 10.110 &File.Sa&ve\ All\.\.\. :call Cream_saveall()<CR> 41 42 "if has("diff") 43 " anoremenu 10.400 &File.-SEP2- : 44 " anoremenu 10.410 &File.Split\ &Diff\ with\.\.\. :browse vert diffsplit<CR> 45 " anoremenu 10.420 &File.Split\ Patched\ &By\.\.\. :browse vert diffpatch<CR> 46 "endif 47 48 " support for :hardcopy exists 49 if has("printer") 50 51 " Print 52 anoremenu <silent> 10.500 &File.-SEP10500- <Nul> 53 imenu <silent> 10.510 &File.&Print\.\.\. <C-b>:call Cream_print("i")<CR> 54 vmenu <silent> 10.510 &File.&Print\.\.\. :<C-u>call Cream_print("v")<CR> 55 56 " Print setup {{{1 57 " &printoptions only supported in 6.2+ 58 if version >= 602 59 imenu <silent> 10.521 &File.Prin&t\ Setup.Paper\ Size.&Statement\ (5-1/2\ x\ 8-1/2) <C-b>:call Cream_print_set("i", "paper:statement")<CR> 60 vmenu <silent> 10.521 &File.Prin&t\ Setup.Paper\ Size.&Statement\ (5-1/2\ x\ 8-1/2) :<C-u>call Cream_print_set("v", "paper:statement")<CR> 61 imenu <silent> 10.522 &File.Prin&t\ Setup.Paper\ Size.&Letter\ (8-1/2\ x\ 11) <C-b>:call Cream_print_set("i", "paper:letter")<CR> 62 vmenu <silent> 10.522 &File.Prin&t\ Setup.Paper\ Size.&Letter\ (8-1/2\ x\ 11) :<C-u>call Cream_print_set("v", "paper:letter")<CR> 63 imenu <silent> 10.523 &File.Prin&t\ Setup.Paper\ Size.&Legal\ (11\ x\ 14) <C-b>:call Cream_print_set("i", "paper:letter")<CR> 64 vmenu <silent> 10.523 &File.Prin&t\ Setup.Paper\ Size.&Legal\ (11\ x\ 14) :<C-u>call Cream_print_set("v", "paper:letter")<CR> 65 imenu <silent> 10.524 &File.Prin&t\ Setup.Paper\ Size.&Ledger\ (17\ x\ 11) <C-b>:call Cream_print_set("i", "paper:ledger")<CR> 66 vmenu <silent> 10.524 &File.Prin&t\ Setup.Paper\ Size.&Ledger\ (17\ x\ 11) :<C-u>call Cream_print_set("v", "paper:ledger")<CR> 67 imenu <silent> 10.525 &File.Prin&t\ Setup.Paper\ Size.&A3 <C-b>:call Cream_print_set("i", "paper:A3")<CR> 68 vmenu <silent> 10.525 &File.Prin&t\ Setup.Paper\ Size.&A3 :<C-u>call Cream_print_set("v", "paper:A3")<CR> 69 imenu <silent> 10.526 &File.Prin&t\ Setup.Paper\ Size.&A4 <C-b>:call Cream_print_set("i", "paper:A4")<CR> 70 vmenu <silent> 10.526 &File.Prin&t\ Setup.Paper\ Size.&A4 :<C-u>call Cream_print_set("v", "paper:A4")<CR> 71 imenu <silent> 10.527 &File.Prin&t\ Setup.Paper\ Size.&A5 <C-b>:call Cream_print_set("i", "paper:A5")<CR> 72 vmenu <silent> 10.527 &File.Prin&t\ Setup.Paper\ Size.&A5 :<C-u>call Cream_print_set("v", "paper:A5")<CR> 73 imenu <silent> 10.528 &File.Prin&t\ Setup.Paper\ Size.&B4 <C-b>:call Cream_print_set("i", "paper:B4")<CR> 74 vmenu <silent> 10.528 &File.Prin&t\ Setup.Paper\ Size.&B4 :<C-u>call Cream_print_set("v", "paper:B4")<CR> 75 imenu <silent> 10.529 &File.Prin&t\ Setup.Paper\ Size.&B5 <C-b>:call Cream_print_set("i", "paper:B5")<CR> 76 vmenu <silent> 10.529 &File.Prin&t\ Setup.Paper\ Size.&B5 :<C-u>call Cream_print_set("v", "paper:B5")<CR> 77 78 imenu <silent> 10.541 &File.Prin&t\ Setup.Paper\ Orientation.&Portrait <C-b>:call Cream_print_set("i", "portrait:y")<CR> 79 vmenu <silent> 10.541 &File.Prin&t\ Setup.Paper\ Orientation.&Portrait :<C-u>call Cream_print_set("v", "portrait:y")<CR> 80 imenu <silent> 10.542 &File.Prin&t\ Setup.Paper\ Orientation.&Landscape <C-b>:call Cream_print_set("i", "portrait:n")<CR> 81 vmenu <silent> 10.542 &File.Prin&t\ Setup.Paper\ Orientation.&Landscape :<C-u>call Cream_print_set("v", "portrait:n")<CR> 82 83 imenu <silent> 10.553 &File.Prin&t\ Setup.Margins.&Top\.\.\. <C-b>:call Cream_print_set_margin_top("i")<CR> 84 vmenu <silent> 10.553 &File.Prin&t\ Setup.Margins.&Top\.\.\. :<C-u>call Cream_print_set_margin_top("v")<CR> 85 imenu <silent> 10.551 &File.Prin&t\ Setup.Margins.&Left\.\.\. <C-b>:call Cream_print_set_margin_left("i")<CR> 86 vmenu <silent> 10.551 &File.Prin&t\ Setup.Margins.&Left\.\.\. :<C-u>call Cream_print_set_margin_left("v")<CR> 87 imenu <silent> 10.552 &File.Prin&t\ Setup.Margins.&Right\.\.\. <C-b>:call Cream_print_set_margin_right("i")<CR> 88 vmenu <silent> 10.552 &File.Prin&t\ Setup.Margins.&Right\.\.\. :<C-u>call Cream_print_set_margin_right("v")<CR> 89 imenu <silent> 10.554 &File.Prin&t\ Setup.Margins.&Bottom\.\.\. <C-b>:call Cream_print_set_margin_bottom("i")<CR> 90 vmenu <silent> 10.554 &File.Prin&t\ Setup.Margins.&Bottom\.\.\. :<C-u>call Cream_print_set_margin_bottom("v")<CR> 91 92 93 imenu <silent> 10.561 &File.Prin&t\ Setup.Header.Height\.\.\. <C-b>:call Cream_print_set_header("i")<CR> 94 vmenu <silent> 10.561 &File.Prin&t\ Setup.Header.Height\.\.\. :<C-u>call Cream_print_set_header("v")<CR> 95 endif 96 97 imenu <silent> 10.562 &File.Prin&t\ Setup.Header.Text\.\.\. <C-b>:call Cream_print_set_headertext("i")<CR> 98 vmenu <silent> 10.562 &File.Prin&t\ Setup.Header.Text\.\.\. :<C-u>call Cream_print_set_headertext("v")<CR> 99 100 anoremenu <silent> 10.565 &File.Prin&t\ Setup.--Sep10565-- <Nul> 101 imenu <silent> 10.565 &File.Prin&t\ Setup.Syntax\ Highlighting\.\.\. <C-b>:call Cream_print_set_syntax("i")<CR> 102 vmenu <silent> 10.565 &File.Prin&t\ Setup.Syntax\ Highlighting\.\.\. :<C-u>call Cream_print_set_syntax("v")<CR> 103 104 imenu <silent> 10.566 &File.Prin&t\ Setup.Line\ Numbering\.\.\. <C-b>:call Cream_print_set_number("i")<CR> 105 vmenu <silent> 10.566 &File.Prin&t\ Setup.Line\ Numbering\.\.\. :<C-u>call Cream_print_set_number("v")<CR> 106 107 108 imenu <silent> 10.567 &File.Prin&t\ Setup.Wrap\ at\ Margins\.\.\. <C-b>:call Cream_print_set_wrap("i")<CR> 109 vmenu <silent> 10.567 &File.Prin&t\ Setup.Wrap\ at\ Margins\.\.\. :<C-u>call Cream_print_set_wrap("v")<CR> 110 111 anoremenu <silent> 10.600 &File.Prin&t\ Setup.--Sep600-- <Nul> 112 imenu <silent> 10.601 &File.Prin&t\ Setup.Font\.\.\. <C-b>:call Cream_print_set_font("i")<CR> 113 vmenu <silent> 10.602 &File.Prin&t\ Setup.Font\.\.\. :<C-u>call Cream_print_set_font("v")<CR> 114 115 116 " print encoding (10.600s) {{{2 117 " &printencoding only supported in Vim 6.2+ 118 if version >= 602 119 " (swiped from file encoding menu) 120 anoremenu <silent> 10.603 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UTF-8)<Tab>[utf-8\ --\ 32\ bit\ UTF-8\ encoded\ Unicode\ (ISO/IEC\ 10646-1)] :call Cream_print_set("i", "encoding", "utf-8")<CR> 121 anoremenu <silent> 10.604 &File.Prin&t\ Setup.&Encoding.Unicode.-Sep10604- <Nul> 122 anoremenu <silent> 10.605 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UCS-2)<Tab>[ucs-2\ --\ 16\ bit\ UCS-2\ encoded\ Unicode\ (ISO/IEC\ 10646-1)] :call Cream_print_set("i", "encoding", "ucs-2")<CR> 123 anoremenu <silent> 10.606 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UCS-2le)<Tab>[ucs-2le\ --\ like\ ucs-2,\ little\ endian] :call Cream_print_set("i", "encoding", "ucs-2le")<CR> 124 anoremenu <silent> 10.607 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UTF-16)<Tab>[utf-16\ --\ UCS-2\ extended\ with\ double-words\ for\ more\ characters] :call Cream_print_set("i", "encoding", "utf-16")<CR> 125 anoremenu <silent> 10.608 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UTF-16le)<Tab>[utf-16le\ --\ like\ UTF-16,\ little\ endian] :call Cream_print_set("i", "encoding", "utf-16le")<CR> 126 anoremenu <silent> 10.609 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UCS-4)<Tab>[ucs-4\ --\ 32\ bit\ UCS-4\ encoded\ Unicode\ (ISO/IEC\ 10646-1)] :call Cream_print_set("i", "encoding", "ucs-4")<CR> 127 anoremenu <silent> 10.610 &File.Prin&t\ Setup.&Encoding.Unicode.Unicode\ (UCS-4le)<Tab>[ucs-4le\ --\ like\ ucs-4,\ little\ endian] :call Cream_print_set("i", "encoding", "ucs-4le")<CR> 128 anoremenu <silent> 10.611 &File.Prin&t\ Setup.&Encoding.-Sep10611- <Nul> 129 anoremenu <silent> 10.612 &File.Prin&t\ Setup.&Encoding.Western\ European.Western\ (ISO-8859-1)<Tab>[latin1/ANSI\ --\ 8-bit\ characters] :call Cream_print_set("i", "encoding", "latin1")<CR> 130 anoremenu <silent> 10.613 &File.Prin&t\ Setup.&Encoding.Western\ European.Western\ (ISO-8859-15)<Tab>[iso-8859-15\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-15")<CR> 131 anoremenu <silent> 10.614 &File.Prin&t\ Setup.&Encoding.Western\ European.Western\ (Windows-1252)<Tab>[8bit-cp1252\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1252")<CR> 132 anoremenu <silent> 10.615 &File.Prin&t\ Setup.&Encoding.Western\ European.Celtic\ (ISO-8859-14)<Tab>[iso-8859-14\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-14")<CR> 133 anoremenu <silent> 10.616 &File.Prin&t\ Setup.&Encoding.Western\ European.Greek\ (ISO-8859-7)<Tab>[iso-8859-7\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-7")<CR> 134 anoremenu <silent> 10.617 &File.Prin&t\ Setup.&Encoding.Western\ European.Greek\ (Windows-1253)<Tab>[8bit-cp1253\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1253")<CR> 135 anoremenu <silent> 10.618 &File.Prin&t\ Setup.&Encoding.Western\ European.Nordic\ (ISO-8859-10)<Tab>[iso-8859-10\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-10")<CR> 136 anoremenu <silent> 10.619 &File.Prin&t\ Setup.&Encoding.Western\ European.South\ European\ (ISO-8859-3)<Tab>[iso-8859-3\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-3")<CR> 137 anoremenu <silent> 10.620 &File.Prin&t\ Setup.&Encoding.Eastern\ European.Baltic\ (ISO-8859-4)<Tab>[iso-8859-4\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-4")<CR> 138 anoremenu <silent> 10.621 &File.Prin&t\ Setup.&Encoding.Eastern\ European.Baltic\ (ISO-8859-13)<Tab>[iso-8859-13\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-13")<CR> 139 anoremenu <silent> 10.622 &File.Prin&t\ Setup.&Encoding.Western\ European.Baltic\ (Windows-1257)<Tab>[8bit-cp1257\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1257")<CR> 140 anoremenu <silent> 10.623 &File.Prin&t\ Setup.&Encoding.Western\ European.Central\ European\ (Windows-1250)<Tab>[8bit-cp1250\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1250")<CR> 141 anoremenu <silent> 10.624 &File.Prin&t\ Setup.&Encoding.Eastern\ European.Cyrillic\ (ISO-8859-5)<Tab>[iso-8859-5\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-5")<CR> 142 anoremenu <silent> 10.625 &File.Prin&t\ Setup.&Encoding.Eastern\ European.Cyrillic\ (KO18-R)<Tab>[koi8-r\ --\ Russian] :call Cream_print_set("i", "encoding", "koi8-r")<CR> 143 anoremenu <silent> 10.626 &File.Prin&t\ Setup.&Encoding.Western\ European.Cyrillic\ (Windows-1251)<Tab>[8bit-cp1251\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1251")<CR> 144 anoremenu <silent> 10.627 &File.Prin&t\ Setup.&Encoding.Eastern\ European.Cyrillic/Ukrainian\ (KO18-U)<Tab>[koi8-u\ --\ Ukrainian] :call Cream_print_set("i", "encoding", "koi8-u")<CR> 145 anoremenu <silent> 10.628 &File.Prin&t\ Setup.&Encoding.Eastern\ European.Romanian\ (ISO-8859-16)<Tab>[iso-8859-16\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-16")<CR> 146 anoremenu <silent> 10.629 &File.Prin&t\ Setup.&Encoding.East\ Asian.Simplified\ Chinese\ (ISO-2022-CN)<Tab>[chinese\ --\ simplified\ Chinese:\ on\ Unix\ "euc-cn",\ on\ MS-Windows\ cp936] :call Cream_print_set("i", "encoding", "chinese")<CR> 147 anoremenu <silent> 10.630 &File.Prin&t\ Setup.&Encoding.East\ Asian.Chinese\ Traditional\ (Big5)<Tab>[big5\ --\ traditional\ Chinese] :call Cream_print_set("i", "encoding", "big5")<CR> 148 anoremenu <silent> 10.631 &File.Prin&t\ Setup.&Encoding.East\ Asian.Chinese\ Traditional\ (EUC-TW)<Tab>[taiwan\ --\ on\ Unix\ "euc-tw",\ on\ MS-Windows\ cp950] :call Cream_print_set("i", "encoding", "taiwan")<CR> 149 anoremenu <silent> 10.632 &File.Prin&t\ Setup.&Encoding.East\ Asian.Japanese<Tab>[japan\ --\ on\ Unix\ "euc-jp",\ on\ MS-Windows\ cp932] :call Cream_print_set("i", "encoding", "japan")<CR> 150 anoremenu <silent> 10.633 &File.Prin&t\ Setup.&Encoding.East\ Asian.Korean<Tab>[korea\ --\ on\ Unix\ "euc-kr",\ on\ MS-Windows\ cp949] :call Cream_print_set("i", "encoding", "korea")<CR> 151 anoremenu <silent> 10.634 &File.Prin&t\ Setup.&Encoding.SE\ and\ SW\ Asian.Turkish\ (ISO-8859-9)<Tab>[iso-8859-6\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-9")<CR> 152 anoremenu <silent> 10.635 &File.Prin&t\ Setup.&Encoding.Western\ European.Turkish\ (Windows-1254)<Tab>[8bit-cp1254\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1254")<CR> 153 anoremenu <silent> 10.636 &File.Prin&t\ Setup.&Encoding.Western\ European.Vietnamese\ (Windows-1258)<Tab>[8bit-cp1258\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1258")<CR> 154 anoremenu <silent> 10.637 &File.Prin&t\ Setup.&Encoding.Middle\ Eastern.Arabic\ (ISO-8859-6)<Tab>[iso-8859-6\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-6")<CR> 155 anoremenu <silent> 10.638 &File.Prin&t\ Setup.&Encoding.Western\ European.Arabic\ (Windows-1256)<Tab>[8bit-cp1256\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1256")<CR> 156 anoremenu <silent> 10.639 &File.Prin&t\ Setup.&Encoding.Western\ European.Hebrew\ (Windows-1255)<Tab>[8bit-cp1255\ --\ MS-Windows\ double-byte\ codepage] :call Cream_print_set("i", "encoding", "8bit-cp1255")<CR> 157 anoremenu <silent> 10.640 &File.Prin&t\ Setup.&Encoding.Middle\ Eastern.Hebrew\ Visual\ (ISO-8859-8)<Tab>[iso-8859-8\ --\ ISO_8859\ variant] :call Cream_print_set("i", "encoding", "iso-8859-8")<CR> 158 endif 159 " 2}}} 160 161 imenu <silent> 10.650 &File.Prin&t\ Setup.Obey\ Formfeeds\.\.\. <C-b>:call Cream_print_set_formfeed("i")<CR> 162 vmenu <silent> 10.651 &File.Prin&t\ Setup.Obey\ Formfeeds\.\.\. :<C-u>call Cream_print_set_formfeed("v")<CR> 163 164 anoremenu <silent> 10.660 &File.Prin&t\ Setup.--Sep10660-- <Nul> 165 imenu <silent> 10.661 &File.Prin&t\ Setup.Collate\.\.\. <C-b>:call Cream_print_set_collate("i")<CR> 166 vmenu <silent> 10.662 &File.Prin&t\ Setup.Collate\.\.\. :<C-u>call Cream_print_set_collate("v")<CR> 167 168 imenu <silent> 10.670 &File.Prin&t\ Setup.Duplex\.\.\. <C-b>:call Cream_print_set_duplex("i")<CR> 169 vmenu <silent> 10.671 &File.Prin&t\ Setup.Duplex\.\.\. :<C-u>call Cream_print_set_duplex("v")<CR> 170 171 imenu <silent> 10.680 &File.Prin&t\ Setup.Job\ Split\ Copies\.\.\. <C-b>:call Cream_print_set_jobsplit("i")<CR> 172 vmenu <silent> 10.681 &File.Prin&t\ Setup.Job\ Split\ Copies\.\.\. :<C-u>call Cream_print_set_jobsplit("v")<CR> 173 174 anoremenu <silent> 10.690 &File.Prin&t\ Setup.--Sep10690-- <Nul> 175 " we don't need this functionality (READ :help 'printdevice) 176 "imenu <silent> 10.691 &File.Prin&t\ Setup.Device\.\.\. <C-b>:call Cream_print_set_device("i")<CR> 177 "vmenu <silent> 10.692 &File.Prin&t\ Setup.Device\.\.\. :<C-u>call Cream_print_set_device("v")<CR> 178 179 imenu <silent> 10.693 &File.Prin&t\ Setup.Printer\ Expression\.\.\. <C-b>:call Cream_print_set_expr("i")<CR> 180 vmenu <silent> 10.694 &File.Prin&t\ Setup.Printer\ Expression\.\.\. :<C-u>call Cream_print_set_expr("v")<CR> 181 182 183 " 1}}} 184 185 186 elseif has("unix") 187 anoremenu <silent> 10.500 &File.-SEP10500- <Nul> 188 anoremenu <silent> 10.510 &File.&Print\.\.\. :w !lpr<CR> 189 vunmenu <silent> &File.&Print\.\.\. 190 vmenu <silent> &File.&Print\.\.\. :w !lpr<CR> 191 elseif has("vms") 192 anoremenu <silent> 10.500 &File.-SEP10500- <Nul> 193 anoremenu <silent> 10.510 &File.&Print\.\.\. :call VMSPrint(":")<CR> 194 vunmenu <silent> &File.&Print\.\.\. 195 vmenu <silent> &File.&Print\.\.\. <Esc>:call VMSPrint(":'<,'>")<CR> 196 197 if !exists("*VMSPrint") 198 function VMSPrint(range) 199 let mod_save = &mode 200 let ttt = tempname() 201 execute a:range . "w! " . ttt 202 let &mode = mod_save 203 execute "!print/delete " . ttt 204 endfunction 205 endif 206 endif 207 208 anoremenu <silent> 10.800 &File.-SEP4- <Nul> 209 anoremenu <silent> 10.801 &File.E&xit<Tab>Alt+F4 :call Cream_exit()<CR> 210 anoremenu <silent> 10.821 &File.Save\ All\ and\ &Exit :call Cream_save_exit()<CR> 211 212 213endfunction 214call Cream_menu_load_file() 215 216"---------------------------------------------------------------------- 217" Recent File menu 218 219function! Cream_load_menu_mru() 220 if filereadable($CREAM . "cream-menu-mru.vim") > 0 221 execute "source " . $CREAM . "cream-menu-mru.vim" 222 endif 223endfunction 224call Cream_load_menu_mru() 225 226" vim:foldmethod=marker 227