Mercurial > vim

view src/testdir/test_popup.vim @ 9438:7897b1e4f3e7 v7.4.2000

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
commit https://github.com/vim/vim/commit/245a7cb6d33e556415c9fcaa874b784a6d8f0ef3 Author: Bram Moolenaar <Bram@vim.org> Date: Fri Jul 8 10:53:12 2016 +0200 patch 7.4.2000 Problem: Evalcmd test fails. Solution: Add missing piece.
author Christian Brabandt <cb@256bit.org>
date Fri, 08 Jul 2016 11:00:06 +0200
parents 35b173e37dc6
children 203792348947
line wrap: on
line source

" Test for completion menu

inoremap <F5> <C-R>=ListMonths()<CR>
let g:months = ['January', 'February', 'March', 'April', 'May', 'June', 'July', 'August', 'September', 'October', 'November', 'December']
let g:setting = ''

func ListMonths()
    if g:setting != ''
	exe ":set" g:setting
    endif
    call complete(col('.'), g:months) 
    return ''
endfunc

func! Test_popup_completion_insertmode()
    new
    call feedkeys("a\<f5>\<down>\<enter>\<esc>", 'tx')
    call assert_equal('February', getline(1))
    %d
    let g:setting = 'noinsertmode'
    call feedkeys("a\<f5>\<down>\<enter>\<esc>", 'tx')
    call assert_equal('February', getline(1))
    call assert_false(pumvisible())
    %d
    let g:setting = ''
    call feedkeys("a\<f5>". repeat("\<c-n>",12)."\<enter>\<esc>", 'tx')
    call assert_equal('', getline(1))
    %d
    call feedkeys("a\<f5>\<c-p>\<enter>\<esc>", 'tx')
    call assert_equal('', getline(1))
    %d
    call feedkeys("a\<f5>\<c-p>\<c-p>\<enter>\<esc>", 'tx')
    call assert_equal('December', getline(1))
    bwipe!
endfunc