Mercurial > vim

view src/testdir/test_behave.vim @ 14756:a179e5cfcab7 v8.1.0390

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.0390: scrollbars are not tested commit https://github.com/vim/vim/commit/ab18673731522c18696b9b132d3841646904e1bd Author: Bram Moolenaar <Bram@vim.org> Date: Fri Sep 14 21:27:06 2018 +0200 patch 8.1.0390: scrollbars are not tested Problem: Scrollbars are not tested. Solution: Add test_scrollbar() and a test.
author Christian Brabandt <cb@256bit.org>
date Fri, 14 Sep 2018 21:30:05 +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