mirror of
https://github.com/neovim/neovim.git
synced 2025-01-01 17:23:36 -07:00
65fb622000
Hope this will make people using feed_command less likely: this hides bugs. Already found at least two: 1. msgpackparse() will show internal error: hash_add() in case of duplicate keys, though it will still work correctly. Currently silenced. 2. ttimeoutlen was spelled incorrectly, resulting in option not being set when expected. Test was still functioning somehow though. Currently fixed.
100 lines
2.5 KiB
Lua
100 lines
2.5 KiB
Lua
-- Tests for 'listchars' display with 'list' and :list.
|
|
|
|
local helpers = require('test.functional.helpers')(after_each)
|
|
local feed, insert, source = helpers.feed, helpers.insert, helpers.source
|
|
local clear, feed_command, expect = helpers.clear, helpers.feed_command, helpers.expect
|
|
|
|
describe("'listchars'", function()
|
|
before_each(function()
|
|
clear()
|
|
feed_command('set listchars&vi')
|
|
end)
|
|
|
|
it("works with 'list'", function()
|
|
source([[
|
|
function GetScreenCharsForLine(lnum)
|
|
return join(map(range(1, virtcol('$')), 'nr2char(screenchar(a:lnum, v:val))'), '')
|
|
endfunction
|
|
nnoremap <expr> GG ":call add(g:lines, GetScreenCharsForLine(".screenrow()."))\<CR>"
|
|
]])
|
|
|
|
insert([[
|
|
start:
|
|
aa
|
|
bb
|
|
cccc
|
|
dd ee
|
|
]])
|
|
|
|
feed_command('let g:lines = []')
|
|
|
|
-- Set up 'listchars', switch on 'list', and use the "GG" mapping to record
|
|
-- what the buffer lines look like.
|
|
feed_command('set listchars+=tab:>-,space:.,trail:<')
|
|
feed_command('set list')
|
|
feed_command('/^start:/')
|
|
feed_command('normal! jzt')
|
|
feed('GG<cr>')
|
|
feed('GG<cr>')
|
|
feed('GG<cr>')
|
|
feed('GG<cr>')
|
|
feed('GGH')
|
|
|
|
-- Repeat without displaying "trail" spaces.
|
|
feed_command('set listchars-=trail:<')
|
|
feed('GG<cr>')
|
|
feed('GG<cr>')
|
|
feed('GG<cr>')
|
|
feed('GG<cr>')
|
|
feed('GG')
|
|
|
|
-- Delete the buffer contents and :put the collected lines.
|
|
feed_command('%d')
|
|
feed_command('put =g:lines', '1d')
|
|
|
|
-- Assert buffer contents.
|
|
expect([[
|
|
>-------aa>-----$
|
|
..bb>---<<$
|
|
...cccc><$
|
|
dd........ee<<>-$
|
|
<$
|
|
>-------aa>-----$
|
|
..bb>---..$
|
|
...cccc>.$
|
|
dd........ee..>-$
|
|
.$]])
|
|
end)
|
|
|
|
it('works with :list', function()
|
|
insert([[
|
|
start:
|
|
fff
|
|
gg
|
|
h
|
|
iii ]])
|
|
|
|
-- Set up 'listchars', switch 'list' *off* (:list must show the 'listchars'
|
|
-- even when 'list' is off), then run :list and collect the output.
|
|
feed_command('set listchars+=tab:>-,space:.,trail:<')
|
|
feed_command('set nolist')
|
|
feed_command('/^start:/')
|
|
feed_command('redir! => g:lines')
|
|
feed_command('+1,$list')
|
|
feed_command('redir END')
|
|
|
|
-- Delete the buffer contents and :put the collected lines.
|
|
feed_command('%d')
|
|
feed_command('put =g:lines', '1d')
|
|
|
|
-- Assert buffer contents.
|
|
expect([[
|
|
|
|
|
|
..fff>--<<$
|
|
>-------gg>-----$
|
|
.....h>-$
|
|
iii<<<<><<$]])
|
|
end)
|
|
end)
|