Mercurial > vim

annotate src/testdir/test_join.vim @ 15062:3a94f7918980 v8.1.0542

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.0542: shiftwidth() does not take 'vartabstop' into account commit https://github.com/vim/vim/commit/f951416a8396a54bbbe21de1a8b16716428549f2 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Nov 22 03:08:29 2018 +0100 patch 8.1.0542: shiftwidth() does not take 'vartabstop' into account Problem: shiftwidth() does not take 'vartabstop' into account. Solution: Use the cursor position or a position explicitly passed. Also make >> and << work better with 'vartabstop'. (Christian Brabandt)
author Bram Moolenaar <Bram@vim.org>
date Thu, 22 Nov 2018 03:15:10 +0100
parents 15f0f9f16cd9
children f776ce5d4ed8
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8445
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Test for joining lines.
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 func Test_join_with_count()
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 new
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 call setline(1, ['one', 'two', 'three', 'four'])
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 normal J
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 call assert_equal('one two', getline(1))
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 %del
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 call setline(1, ['one', 'two', 'three', 'four'])
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 normal 10J
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 call assert_equal('one two three four', getline(1))
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 quit!
dd2e2bd69d0e commit https://github.com/vim/vim/commit/41e0f2f48f541eb2c8eb5620d3f1d270eb979154
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 endfunc
12662
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
14
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
15 " Tests for setting the '[,'] marks when joining lines.
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
16 func Test_join_marks()
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
17 enew
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
18 call append(0, [
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
19 \ "\t\tO sodales, ludite, vos qui",
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
20 \ "attamen consulite per voster honur. Tua pulchra " .
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
21 \ "facies me fay planszer milies",
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
22 \ "",
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
23 \ "This line.",
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
24 \ "Should be joined with the next line",
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
25 \ "and with this line"])
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
26
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
27 normal gg0gqj
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
28 call assert_equal([0, 1, 1, 0], getpos("'["))
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
29 call assert_equal([0, 2, 1, 0], getpos("']"))
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
30
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
31 /^This line/;'}-join
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
32 call assert_equal([0, 4, 11, 0], getpos("'["))
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
33 call assert_equal([0, 4, 67, 0], getpos("']"))
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
34 enew!
15f0f9f16cd9 patch 8.0.1209: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 8445
diff changeset
35 endfunc