Mercurial > vim

view src/testdir/test_ins_complete_no_halt.vim @ 30805:4edfa418f8ba v9.0.0737

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 9.0.0737: Lisp word only recognized when a space follows Commit: https://github.com/vim/vim/commit/d26c5805bcbd630dab0478c2d22503a6e32a83c1 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Oct 13 12:30:08 2022 +0100 patch 9.0.0737: Lisp word only recognized when a space follows Problem: Lisp word only recognized when a space follows. Solution: Also match a word at the end of a line. Rename the test. Use a compiled function to avoid backslashes.
author Bram Moolenaar <Bram@vim.org>
date Thu, 13 Oct 2022 13:45:06 +0200
parents b9e8c9ed792b
children
line wrap: on
line source

" Test insert mode completion does not get stuck when looping around.
" In a separate file to avoid the settings to leak to other test cases.

set complete+=kspell
set completeopt+=menu
set completeopt+=menuone
set completeopt+=noselect
set completeopt+=noinsert
let g:autocompletion = v:true

func Test_ins_complete_no_halt()
  function! OpenCompletion()
    if pumvisible() && (g:autocompletion == v:true)
      call feedkeys("\<C-e>\<C-n>", "i")
      return
    endif
    if ((v:char >= 'a' && v:char <= 'z') || (v:char >= 'A' && v:char <= 'Z')) && (g:autocompletion == v:true)
      call feedkeys("\<C-n>", "i")
      redraw
    endif
  endfunction

  autocmd InsertCharPre * noautocmd call OpenCompletion()

  setlocal spell! spelllang=en_us

  call feedkeys("iauto-complete-halt-test test test test test test test test test test test test test test test test test test test\<C-c>", "tx!")
  call assert_equal(["auto-complete-halt-test test test test test test test test test test test test test test test test test test test"], getline(1, "$"))
endfunc

func Test_auto_complete_backwards_no_halt()
  function! OpenCompletion()
    if pumvisible() && (g:autocompletion == v:true)
      call feedkeys("\<C-e>\<C-p>", "i")
      return
    endif
    if ((v:char >= 'a' && v:char <= 'z') || (v:char >= 'A' && v:char <= 'Z')) && (g:autocompletion == v:true)
      call feedkeys("\<C-p>", "i")
      redraw
    endif
  endfunction

  autocmd InsertCharPre * noautocmd call OpenCompletion()

  setlocal spell! spelllang=en_us

  call feedkeys("iauto-complete-halt-test test test test test test test test test test test test test test test test test test test\<C-c>", "tx!")
  call assert_equal(["auto-complete-halt-test test test test test test test test test test test test test test test test test test test"], getline(1, "$"))
endfunc

" vim: shiftwidth=2 sts=2 expandtab