Mercurial > vim
view src/testdir/test_visual.vim @ 11150:9f9409588102 v8.0.0462
patch 8.0.0462: failure of an MS-Windows test may go unnoticed
commit https://github.com/vim/vim/commit/b27523ff7ab3083c20c0f33415d890f978726c4f
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Mar 16 14:04:51 2017 +0100
patch 8.0.0462: failure of an MS-Windows test may go unnoticed
Problem: If an MS-Windows tests succeeds at first and then fails in a way
it does not produce a test.out file it looks like the test
succeeded.
Solution: Delete the previous output file.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Thu, 16 Mar 2017 14:15:04 +0100 |
parents | ae45d497868f |
children | 66b677c77467 |
line wrap: on
line source
" Tests for various Visual mode. if !has('visual') finish endif set belloff=all func Test_block_shift_multibyte() " Uses double-wide character. if !has('multi_byte') return endif split call setline(1, ['xヹxxx', 'ヹxxx']) exe "normal 1G0l\<C-V>jl>" call assert_equal('x ヹxxx', getline(1)) call assert_equal(' ヹxxx', getline(2)) q! endfunc func Test_dotregister_paste() new exe "norm! ihello world\<esc>" norm! 0ve".p call assert_equal('hello world world', getline(1)) q! endfunc func Test_Visual_ctrl_o() new call setline(1, ['one', 'two', 'three']) call cursor(1,2) set noshowmode set tw=0 call feedkeys("\<c-v>jjlIa\<c-\>\<c-o>:set tw=88\<cr>\<esc>", 'tx') call assert_equal(['oane', 'tawo', 'tahree'], getline(1, 3)) call assert_equal(88, &tw) set tw& bw! endfu func Test_Visual_vapo() new normal oxx normal vapo bwipe! endfunc func Test_Visual_inner_quote() new normal oxX normal vki' bwipe! endfunc