Mercurial > vim
view src/testdir/test_join.vim @ 12662:15f0f9f16cd9 v8.0.1209
patch 8.0.1209: still too many old style tests
commit https://github.com/vim/vim/commit/53f0c962394dc6bc66d5b0762af9434e672d1b25
Author: Bram Moolenaar <Bram@vim.org>
Date: Sun Oct 22 14:23:59 2017 +0200
patch 8.0.1209: still too many old style tests
Problem: Still too many old style tests.
Solution: Convert a few more tests to new style. (Yegappan Lakshmanan,
closes #2230)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sun, 22 Oct 2017 14:30:07 +0200 |
parents | dd2e2bd69d0e |
children | f776ce5d4ed8 |
line wrap: on
line source
" Test for joining lines. func Test_join_with_count() new call setline(1, ['one', 'two', 'three', 'four']) normal J call assert_equal('one two', getline(1)) %del call setline(1, ['one', 'two', 'three', 'four']) normal 10J call assert_equal('one two three four', getline(1)) quit! endfunc " Tests for setting the '[,'] marks when joining lines. func Test_join_marks() enew call append(0, [ \ "\t\tO sodales, ludite, vos qui", \ "attamen consulite per voster honur. Tua pulchra " . \ "facies me fay planszer milies", \ "", \ "This line.", \ "Should be joined with the next line", \ "and with this line"]) normal gg0gqj call assert_equal([0, 1, 1, 0], getpos("'[")) call assert_equal([0, 2, 1, 0], getpos("']")) /^This line/;'}-join call assert_equal([0, 4, 11, 0], getpos("'[")) call assert_equal([0, 4, 67, 0], getpos("']")) enew! endfunc