mirror of
https://github.com/vim/vim.git
synced 2025-07-26 11:04:33 -04:00
52992feafe
Problem: Testing: WorkingClipboard() is not accurate. Solution: Check feature clipboard_working instead.
137 lines
3.5 KiB
VimL
137 lines
3.5 KiB
VimL
" Tests for bracketed paste and other forms of pasting.
|
|
|
|
" Bracketed paste only works with "xterm". Not in GUI or Windows console.
|
|
source check.vim
|
|
CheckNotMSWindows
|
|
CheckNotGui
|
|
|
|
set term=xterm
|
|
|
|
source shared.vim
|
|
|
|
func Test_paste_normal_mode()
|
|
new
|
|
" In first column text is inserted
|
|
call setline(1, ['a', 'b', 'c'])
|
|
call cursor(2, 1)
|
|
call feedkeys("\<Esc>[200~foo\<CR>bar\<Esc>[201~", 'xt')
|
|
call assert_equal('foo', getline(2))
|
|
call assert_equal('barb', getline(3))
|
|
call assert_equal('c', getline(4))
|
|
|
|
" When repeating text is appended
|
|
normal .
|
|
call assert_equal('barfoo', getline(3))
|
|
call assert_equal('barb', getline(4))
|
|
call assert_equal('c', getline(5))
|
|
bwipe!
|
|
|
|
" In second column text is appended
|
|
call setline(1, ['a', 'bbb', 'c'])
|
|
call cursor(2, 2)
|
|
call feedkeys("\<Esc>[200~foo\<CR>bar\<Esc>[201~", 'xt')
|
|
call assert_equal('bbfoo', getline(2))
|
|
call assert_equal('barb', getline(3))
|
|
call assert_equal('c', getline(4))
|
|
|
|
" In last column text is appended
|
|
call setline(1, ['a', 'bbb', 'c'])
|
|
call cursor(2, 3)
|
|
call feedkeys("\<Esc>[200~foo\<CR>bar\<Esc>[201~", 'xt')
|
|
call assert_equal('bbbfoo', getline(2))
|
|
call assert_equal('bar', getline(3))
|
|
call assert_equal('c', getline(4))
|
|
endfunc
|
|
|
|
func Test_paste_insert_mode()
|
|
new
|
|
call setline(1, ['a', 'b', 'c'])
|
|
2
|
|
call feedkeys("i\<Esc>[200~foo\<CR>bar\<Esc>[201~ done\<Esc>", 'xt')
|
|
call assert_equal('foo', getline(2))
|
|
call assert_equal('bar doneb', getline(3))
|
|
call assert_equal('c', getline(4))
|
|
|
|
normal .
|
|
call assert_equal('bar donfoo', getline(3))
|
|
call assert_equal('bar doneeb', getline(4))
|
|
call assert_equal('c', getline(5))
|
|
|
|
set ai et tw=10
|
|
call setline(1, ['a', ' b', 'c'])
|
|
2
|
|
call feedkeys("A\<Esc>[200~foo\<CR> bar bar bar\<Esc>[201~\<Esc>", 'xt')
|
|
call assert_equal(' bfoo', getline(2))
|
|
call assert_equal(' bar bar bar', getline(3))
|
|
call assert_equal('c', getline(4))
|
|
|
|
set ai& et& tw=0
|
|
bwipe!
|
|
endfunc
|
|
|
|
func Test_paste_clipboard()
|
|
CheckFeature clipboard_working
|
|
|
|
let @+ = "nasty\<Esc>:!ls\<CR>command"
|
|
new
|
|
exe "normal i\<C-R>+\<Esc>"
|
|
call assert_equal("nasty\<Esc>:!ls\<CR>command", getline(1))
|
|
bwipe!
|
|
endfunc
|
|
|
|
func Test_paste_cmdline()
|
|
call feedkeys(":a\<Esc>[200~foo\<CR>bar\<Esc>[201~b\<Home>\"\<CR>", 'xt')
|
|
call assert_equal("\"afoo\<CR>barb", getreg(':'))
|
|
endfunc
|
|
|
|
func Test_paste_visual_mode()
|
|
new
|
|
call setline(1, 'here are some words')
|
|
call feedkeys("0fsve\<Esc>[200~more\<Esc>[201~", 'xt')
|
|
call assert_equal('here are more words', getline(1))
|
|
call assert_equal('some', getreg('-'))
|
|
|
|
" include last char in the line
|
|
call feedkeys("0fwve\<Esc>[200~noises\<Esc>[201~", 'xt')
|
|
call assert_equal('here are more noises', getline(1))
|
|
call assert_equal('words', getreg('-'))
|
|
|
|
" exclude last char in the line
|
|
call setline(1, 'some words!')
|
|
call feedkeys("0fwve\<Esc>[200~noises\<Esc>[201~", 'xt')
|
|
call assert_equal('some noises!', getline(1))
|
|
call assert_equal('words', getreg('-'))
|
|
|
|
" multi-line selection
|
|
call setline(1, ['some words', 'and more'])
|
|
call feedkeys("0fwvj0fd\<Esc>[200~letters\<Esc>[201~", 'xt')
|
|
call assert_equal('some letters more', getline(1))
|
|
call assert_equal("words\nand", getreg('1'))
|
|
|
|
bwipe!
|
|
endfunc
|
|
|
|
func CheckCopyPaste()
|
|
call setline(1, ['copy this', ''])
|
|
normal 1G0"*y$
|
|
normal j"*p
|
|
call assert_equal('copy this', getline(2))
|
|
endfunc
|
|
|
|
func Test_xrestore()
|
|
if !has('xterm_clipboard')
|
|
return
|
|
endif
|
|
let display = $DISPLAY
|
|
new
|
|
call CheckCopyPaste()
|
|
|
|
xrestore
|
|
call CheckCopyPaste()
|
|
|
|
exe "xrestore " .. display
|
|
call CheckCopyPaste()
|
|
|
|
bwipe!
|
|
endfunc
|