Mercurial > vim
view src/testdir/test_shift.vim @ 21550:b0b57d91671c v8.2.1325
patch 8.2.1325: Vim9: using Vim9 script for autaload not tested
Commit: https://github.com/vim/vim/commit/ea2d8d25718836bf627b67b7fcd28a1e528bb7b9
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Jul 29 22:11:05 2020 +0200
patch 8.2.1325: Vim9: using Vim9 script for autaload not tested
Problem: Vim9: using Vim9 script for autaload not tested.
Solution: Add a test. Update help.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Wed, 29 Jul 2020 22:15:05 +0200 |
parents | c945f1d03b1c |
children | 08940efa6b4e |
line wrap: on
line source
" Test shifting lines with :> and :< source check.vim func Test_ex_shift_right() set shiftwidth=2 " shift right current line. call setline(1, range(1, 5)) 2 > 3 >> call assert_equal(['1', \ ' 2', \ ' 3', \ '4', \ '5'], getline(1, '$')) " shift right with range. call setline(1, range(1, 4)) 2,3>> call assert_equal(['1', \ ' 2', \ ' 3', \ '4', \ '5'], getline(1, '$')) " shift right with range and count. call setline(1, range(1, 4)) 2>3 call assert_equal(['1', \ ' 2', \ ' 3', \ ' 4', \ '5'], getline(1, '$')) bw! set shiftwidth& endfunc func Test_ex_shift_left() set shiftwidth=2 call setline(1, range(1, 5)) %>>> " left shift current line. 2< 3<< 4<<<<< call assert_equal([' 1', \ ' 2', \ ' 3', \ '4', \ ' 5'], getline(1, '$')) " shift right with range. call setline(1, range(1, 5)) %>>> 2,3<< call assert_equal([' 1', \ ' 2', \ ' 3', \ ' 4', \ ' 5'], getline(1, '$')) " shift right with range and count. call setline(1, range(1, 5)) %>>> 2<<3 call assert_equal([' 1', \ ' 2', \ ' 3', \ ' 4', \ ' 5'], getline(1, '$')) bw! set shiftwidth& endfunc func Test_ex_shift_rightleft() CheckFeature rightleft set shiftwidth=2 rightleft call setline(1, range(1, 4)) 2,3<< call assert_equal(['1', \ ' 2', \ ' 3', \ '4'], getline(1, '$')) 3,4> call assert_equal(['1', \ ' 2', \ ' 3', \ '4'], getline(1, '$')) bw! set rightleft& shiftwidth& endfunc func Test_ex_shift_errors() call assert_fails('><', 'E488:') call assert_fails('<>', 'E488:') call assert_fails('>!', 'E477:') call assert_fails('<!', 'E477:') call assert_fails('2,1>', 'E493:') call assert_fails('2,1<', 'E493:') endfunc