blob: 18c7f4e64d428cbe2880f8c2a8d1d7daa1672a45 [file] [log] [blame]
Bram Moolenaarc8129962017-01-22 20:04:51 +01001
2func Test_put_block()
3 if !has('multi_byte')
4 return
5 endif
6 new
7 call feedkeys("i\<C-V>u2500\<CR>x\<ESC>", 'x')
8 call feedkeys("\<C-V>y", 'x')
9 call feedkeys("gg0p", 'x')
10 call assert_equal("\u2500x", getline(1))
11 bwipe!
12endfunc
Bram Moolenaar9957a102017-01-23 21:53:53 +010013
14func Test_put_char_block()
15 new
16 call setline(1, ['Line 1', 'Line 2'])
17 f Xfile_put
18 " visually select both lines and put the cursor at the top of the visual
19 " selection and then put the buffer name over it
20 exe "norm! G0\<c-v>ke\"%p"
21 call assert_equal(['Xfile_put 1', 'Xfile_put 2'], getline(1,2))
22 bw!
23endfunc
Bram Moolenaar941c12d2017-01-24 19:55:43 +010024
25func Test_put_char_block2()
26 new
27 let a = [ getreg('a'), getregtype('a') ]
28 call setreg('a', ' one ', 'v')
29 call setline(1, ['Line 1', '', 'Line 3', ''])
30 " visually select the first 3 lines and put register a over it
31 exe "norm! ggl\<c-v>2j2l\"ap"
32 call assert_equal(['L one 1', '', 'L one 3', ''], getline(1,4))
33 " clean up
34 bw!
35 call setreg('a', a[0], a[1])
36endfunc
Bram Moolenaar18d90b92017-06-27 15:39:14 +020037
38func Test_put_lines()
39 new
40 let a = [ getreg('a'), getregtype('a') ]
41 call setline(1, ['Line 1', 'Line2', 'Line 3', ''])
42 exe 'norm! gg"add"AddG""p'
43 call assert_equal(['Line 3', '', 'Line 1', 'Line2'], getline(1,'$'))
44 " clean up
45 bw!
46 call setreg('a', a[0], a[1])
47endfunc