|
7
|
1
|
|
|
2 Test Visual block mode commands
|
|
1528
|
3 And test "U" in Visual mode, also on German sharp S.
|
|
7
|
4
|
|
|
5 STARTTEST
|
|
|
6 :so small.vim
|
|
1528
|
7 :so mbyte.vim
|
|
1537
|
8 :" This only works when 'encoding' is "latin1", don't depend on the environment
|
|
|
9 :set enc=latin1
|
|
7
|
10 /^abcde
|
|
|
11 :" Test shift-right of a block
|
|
|
12 jlllljj>wlljlll>
|
|
|
13 :" Test shift-left of a block
|
|
|
14 G$hhhhkk<
|
|
|
15 :" Test block-insert
|
|
|
16 GklkkkIxyz
|
|
|
17 :" Test block-replace
|
|
|
18 Gllllkkklllrq
|
|
|
19 :" Test block-change
|
|
|
20 G$khhhhhkkcmno
|
|
1528
|
21 :$-4,$w! test.out
|
|
5471
|
22 :" Test block-insert using cursor keys for movement
|
|
|
23 /^aaaa/
|
|
|
24 :exe ":norm! l\<C-V>jjjlllI\<Right>\<Right> \<Esc>"
|
|
|
25 :/^aa/,/^$/w >> test.out
|
|
5500
|
26 :" Test for Visual block was created with the last <C-v>$
|
|
|
27 /^A23$/
|
|
|
28 :exe ":norm! l\<C-V>j$Aab\<Esc>"
|
|
|
29 :.,/^$/w >> test.out
|
|
|
30 :" Test for Visual block was created with the middle <C-v>$ (1)
|
|
|
31 /^B23$/
|
|
|
32 :exe ":norm! l\<C-V>j$hAab\<Esc>"
|
|
|
33 :.,/^$/w >> test.out
|
|
|
34 :" Test for Visual block was created with the middle <C-v>$ (2)
|
|
|
35 /^C23$/
|
|
|
36 :exe ":norm! l\<C-V>j$hhAab\<Esc>"
|
|
|
37 :.,/^$/w >> test.out
|
|
5730
|
38 :" Test for Visual block insert when virtualedit=all
|
|
|
39 :set ve=all
|
|
|
40 :/\t\tline
|
|
|
41 :exe ":norm! 07l\<C-V>jjIx\<Esc>"
|
|
|
42 :set ve=
|
|
|
43 :.,/^$/w >> test.out
|
|
1528
|
44 :" gUe must uppercase a whole word, also when ß changes to SS
|
|
|
45 Gothe youtußeuu endYpk0wgUe
|
|
|
46 :" gUfx must uppercase until x, inclusive.
|
|
|
47 O- youßtußexu -0fogUfx
|
|
|
48 :" VU must uppercase a whole line
|
|
|
49 YpkVU
|
|
|
50 :" same, when it's the last line in the buffer
|
|
|
51 YPGi111VUddP
|
|
|
52 :" Uppercase two lines
|
|
|
53 Oblah di
|
|
|
54 doh dutVkUj
|
|
|
55 :" Uppercase part of two lines
|
|
|
56 ddppi333k0i222fyllvjfuUk
|
|
5428
|
57 :" visual replace using Enter or NL
|
|
|
58 G3o1234567892k05l2jr
G3o987652k02l2jr
|
|
|
59 G3o1234567892k05l2jr
|
|
|
60 G3o987652k02l2jr
|
|
5600
|
61 :"
|
|
|
62 :" Test cursor position. When ve=block and Visual block mode and $gj
|
|
|
63 :set ve=block
|
|
|
64 :exe ":norm! 2k\<C-V>$gj\<Esc>"
|
|
|
65 :let cpos=getpos("'>")
|
|
|
66 :$put ='col:'.cpos[2].' off:'.cpos[3]
|
|
1528
|
67 :/^the/,$w >> test.out
|
|
|
68 :qa!
|
|
7
|
69 ENDTEST
|
|
|
70
|
|
5730
|
71 line1
|
|
|
72 line2
|
|
|
73 line3
|
|
|
74
|
|
5471
|
75 aaaaaa
|
|
|
76 bbbbbb
|
|
|
77 cccccc
|
|
|
78 dddddd
|
|
|
79
|
|
5500
|
80 A23
|
|
|
81 4567
|
|
|
82
|
|
|
83 B23
|
|
|
84 4567
|
|
|
85
|
|
|
86 C23
|
|
|
87 4567
|
|
|
88
|
|
7
|
89 abcdefghijklm
|
|
|
90 abcdefghijklm
|
|
|
91 abcdefghijklm
|
|
|
92 abcdefghijklm
|
|
|
93 abcdefghijklm
|
