Mercurial > vim

view src/testdir/test_iminsert.vim @ 16435:65d5f7039131 v8.1.1222

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.1222: build still fails on MS-Windows commit https://github.com/vim/vim/commit/dcaa54dded7c7ef9b2217a205d23301d313e96dc Author: Bram Moolenaar <Bram@vim.org> Date: Sat Apr 27 22:45:00 2019 +0200 patch 8.1.1222: build still fails on MS-Windows Problem: Build still fails on MS-Windows. Solution: Move another declaration to start of block.
author Bram Moolenaar <Bram@vim.org>
date Sat, 27 Apr 2019 23:00: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