"===================================================================== " cream-menu-popup.vim " " Cream -- An easy-to-use configuration of the famous Vim text editor " [ http://cream.sourceforge.net ] Copyright (C) 2001-2007 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 2 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. " " Note: This is functionalized so we can re-set it with a call. function! Cream_menu_popup() " destroy existing popup menu silent! unmenu PopUp silent! unmenu! PopUp " add blank line only prior to version 6.1.433 if version < 601 || version == 601 && !exists("patch433") anoremenu 100 PopUp.\ anoremenu 101 PopUp.-Sep101- endif anoremenu 111 PopUp.&Undo :call Cream_undo("i") vmenu 113 PopUp.Cu&t :call Cream_cut("v") vmenu 114 PopUp.&Copy :call Cream_copy("v") vmenu 115 PopUp.&Paste :call Cream_paste("v") imenu 116 PopUp.&Paste :call Cream_paste("i") vmenu 117 PopUp.&Delete :call Cream_delete() "anoremenu 118 PopUp.-Sep108- anoremenu 119 PopUp.Select\ &All :call Cream_select_all() " current line highlighting call Cream_highlight_currentline() endfunction call Cream_menu_popup()