Mercurial > vim

view src/testdir/test_iminsert.vim @ 17547:1b8463f97365 v8.1.1771

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.1771: options test fails on MS-Windows commit https://github.com/vim/vim/commit/d4404b4391a0cd3ab197e09bee7828c88882f6b2 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jul 28 18:38:09 2019 +0200 patch 8.1.1771: options test fails on MS-Windows Problem: Options test fails on MS-Windows. Solution: Add correct and incorrect values for 'completeslash'.
author Bram Moolenaar <Bram@vim.org>
date Sun, 28 Jul 2019 18:45:04 +0200
parents 2dcaa860e3fc
children 8ae333756614
line wrap: on
line source

source view_util.vim

let s:imactivatefunc_called = 0
let s:imstatusfunc_called = 0

func IM_activatefunc(active)
  let s:imactivatefunc_called = 1
endfunc

func IM_statusfunc()
  let s:imstatusfunc_called = 1
  return 0
endfunc

func Test_iminsert2()
  set imactivatefunc=IM_activatefunc
  set imstatusfunc=IM_statusfunc
  set iminsert=2
  normal! i
  set iminsert=0
  set imactivatefunc=
  set imstatusfunc=

  let expected = has('gui_running') ? 0 : 1
  call assert_equal(expected, s:imactivatefunc_called)
  call assert_equal(expected, s:imstatusfunc_called)
endfunc