@@ -22,23 +22,21 @@ endfunc
2222
2323func Test_put_char_block2 ()
2424 new
25- let a = [ ' a' - >getreg (), ' a' - >getregtype () ]
2625 call setreg (' a' , ' one ' , ' v' )
2726 call setline (1 , [' Line 1' , ' ' , ' Line 3' , ' ' ])
2827 " visually select the first 3 lines and put register a over it
2928 exe " norm! ggl\<c-v> 2j2l\" ap"
30- call assert_equal ([' L one 1' , ' ' , ' L one 3' , ' ' ], getline (1 ,4 ))
29+ call assert_equal ([' L one 1' , ' ' , ' L one 3' , ' ' ], getline (1 , 4 ))
3130 " clean up
3231 bw !
33- call setreg (' a' , a [0 ], a [1 ])
3432endfunc
3533
3634func Test_put_lines ()
3735 new
3836 let a = [ getreg (' a' ), getregtype (' a' ) ]
3937 call setline (1 , [' Line 1' , ' Line2' , ' Line 3' , ' ' ])
4038 exe ' norm! gg"add"AddG""p'
41- call assert_equal ([' Line 3' , ' ' , ' Line 1' , ' Line2' ], getline (1 ,' $' ))
39+ call assert_equal ([' Line 3' , ' ' , ' Line 1' , ' Line2' ], getline (1 , ' $' ))
4240 " clean up
4341 bw !
4442 eval a [0 ]- >setreg (' a' , a [1 ])
@@ -53,7 +51,7 @@ func Test_put_expr()
5351 exec " 4norm! \" =\<cr> P"
5452 norm! j0.
5553 norm! j0.
56- call assert_equal ([' A1' ,' A2' ,' A3' ,' 4A' ,' 5A' ,' 6A' ], getline (1 ,' $' ))
54+ call assert_equal ([' A1' ,' A2' ,' A3' ,' 4A' ,' 5A' ,' 6A' ], getline (1 , ' $' ))
5755 bw !
5856endfunc
5957
0 commit comments