Mercurial > vim

view src/testdir/test_behave.vim @ 18404:b1a10a018f83 v8.1.2196

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.2196: MS-Windows: running tests with MSVC lacks updates Commit: https://github.com/vim/vim/commit/d53ebfc6246b2f29752adbda13cd2c11acca285a Author: Bram Moolenaar <Bram@vim.org> Date: Sun Oct 20 21:47:20 2019 +0200 patch 8.1.2196: MS-Windows: running tests with MSVC lacks updates Problem: MS-Windows: running tests with MSVC lacks updates. Solution: Improve running individual tests on MS-Windows. (closes https://github.com/vim/vim/issues/4922)
author Bram Moolenaar <Bram@vim.org>
date Sun, 20 Oct 2019 22:00:03 +0200
parents d4db9adc8642
children 08940efa6b4e
line wrap: on
line source

" Test the :behave command

func Test_behave()
  behave mswin
  call assert_equal('mouse,key', &selectmode)
  call assert_equal('popup', &mousemodel)
  call assert_equal('startsel,stopsel', &keymodel)
  call assert_equal('exclusive', &selection)

  behave xterm
  call assert_equal('', &selectmode)
  call assert_equal('extend', &mousemodel)
  call assert_equal('', &keymodel)
  call assert_equal('inclusive', &selection)

  set selection&
  set mousemodel&
  set keymodel&
  set selection&
endfunc

func Test_behave_completion()
  call feedkeys(":behave \<C-A>\<C-B>\"\<CR>", 'tx')
  call assert_equal('"behave mswin xterm', @:)
endfunc

func Test_behave_error()
  call assert_fails('behave x', 'E475:')
endfunc