mirror of
https://github.com/neovim/neovim.git
synced 2026-01-18 19:07:02 +00:00
16c1334399
Usually 'langmap' is used to map keyboard characters to ASCII motions or mappings. It's not entirely clear what the purpose of mapping to Unicode characters is, but since there is no error for mapping between two chars both >= 256, only give a warning that this will not work properly when mapping from a char < 256 to a char >= 256.
291 lines
8.5 KiB
Lua
291 lines
8.5 KiB
Lua
local t = require('test.testutil')
|
||
local n = require('test.functional.testnvim')()
|
||
|
||
local eq, neq, call = t.eq, t.neq, n.call
|
||
local eval, feed, clear = n.eval, n.feed, n.clear
|
||
local command, insert, expect = n.command, n.insert, n.expect
|
||
local feed_command = n.feed_command
|
||
local curwin = n.api.nvim_get_current_win
|
||
|
||
describe("'langmap'", function()
|
||
before_each(function()
|
||
clear()
|
||
insert('iii www')
|
||
command('set langmap=iw,wi')
|
||
feed('gg0')
|
||
end)
|
||
|
||
it('converts keys in normal mode', function()
|
||
feed('ix')
|
||
expect('iii ww')
|
||
feed('whello<esc>')
|
||
expect('iii helloww')
|
||
end)
|
||
it('gives characters that are mapped by :nmap.', function()
|
||
command('map i 0x')
|
||
feed('w')
|
||
expect('ii www')
|
||
end)
|
||
describe("'langnoremap' option.", function()
|
||
before_each(function()
|
||
command('nmapclear')
|
||
end)
|
||
it("'langnoremap' is by default ON", function()
|
||
eq(1, eval('&langnoremap'))
|
||
end)
|
||
it("Results of maps are not converted when 'langnoremap' ON.", function()
|
||
command('nmap x i')
|
||
feed('xdl<esc>')
|
||
expect('dliii www')
|
||
end)
|
||
it('applies when deciding whether to map recursively', function()
|
||
command('nmap l i')
|
||
command('nmap w j')
|
||
feed('ll')
|
||
expect('liii www')
|
||
end)
|
||
it("does not stop applying 'langmap' on first character of a mapping", function()
|
||
command('1t1')
|
||
command('1t1')
|
||
command('goto 1')
|
||
command('nmap w j')
|
||
feed('iiahello')
|
||
expect([[
|
||
iii www
|
||
iii www
|
||
ihelloii www]])
|
||
end)
|
||
it("Results of maps are converted when 'langnoremap' OFF.", function()
|
||
command('set nolangnoremap')
|
||
command('nmap x i')
|
||
feed('xdl<esc>')
|
||
expect('iii ww')
|
||
end)
|
||
end)
|
||
-- e.g. CTRL-W_j , mj , 'j and "jp
|
||
it('conversions are applied to keys in middle of command', function()
|
||
-- Works in middle of window command
|
||
feed('<C-w>s')
|
||
local origwin = curwin()
|
||
feed('<C-w>i')
|
||
neq(origwin, curwin())
|
||
-- Works when setting a mark
|
||
feed('yy3p3gg0mwgg0mi')
|
||
eq({ 0, 3, 1, 0 }, call('getpos', "'i"))
|
||
eq({ 0, 1, 1, 0 }, call('getpos', "'w"))
|
||
feed('3dd')
|
||
-- Works when moving to a mark
|
||
feed("'i")
|
||
eq({ 0, 1, 1, 0 }, call('getpos', '.'))
|
||
-- Works when selecting a register
|
||
feed('qillqqwhhq')
|
||
eq('hh', eval('@i'))
|
||
eq('ll', eval('@w'))
|
||
feed('a<C-r>i<esc>')
|
||
expect('illii www')
|
||
feed('"ip')
|
||
expect('illllii www')
|
||
-- Works with i_CTRL-O
|
||
feed('0a<C-O>ihi<esc>')
|
||
expect('illllii hiwww')
|
||
end)
|
||
|
||
describe('exceptions', function()
|
||
-- All "command characters" that 'langmap' does not apply to.
|
||
-- These tests consist of those places where some subset of ASCII
|
||
-- characters define certain commands, yet 'langmap' is not applied to
|
||
-- them.
|
||
-- n.b. I think these shouldn't be exceptions.
|
||
it(':s///c confirmation', function()
|
||
command('set langmap=yn,ny')
|
||
feed('qa')
|
||
feed_command('s/i/w/gc')
|
||
feed('yynq')
|
||
expect('wwi www')
|
||
feed('u@a')
|
||
expect('wwi www')
|
||
eq(':s/i/w/gc\ryyn', eval('@a'))
|
||
end)
|
||
it('insert-mode CTRL-G', function()
|
||
command('set langmap=jk,kj')
|
||
command('d')
|
||
insert([[
|
||
hello
|
||
hello
|
||
hello]])
|
||
expect([[
|
||
hello
|
||
hello
|
||
hello]])
|
||
feed('qa')
|
||
feed('gg3|ahello<C-G>jx<esc>')
|
||
feed('q')
|
||
expect([[
|
||
helhellolo
|
||
helxlo
|
||
hello]])
|
||
eq('gg3|ahellojx', eval('@a'))
|
||
end)
|
||
it('command-line CTRL-\\', function()
|
||
command('set langmap=en,ne')
|
||
feed(':<C-\\>e\'hello\'\r<C-B>put ="<C-E>"<CR>')
|
||
expect([[
|
||
iii www
|
||
hello]])
|
||
end)
|
||
it('command-line CTRL-R', function()
|
||
n.source([[
|
||
let i_value = 0
|
||
let j_value = 0
|
||
call setreg('i', 'i_value')
|
||
call setreg('j', 'j_value')
|
||
set langmap=ij,ji
|
||
]])
|
||
feed(':let <C-R>i=1<CR>')
|
||
eq(1, eval('i_value'))
|
||
eq(0, eval('j_value'))
|
||
end)
|
||
-- it('-- More -- prompt', function()
|
||
-- -- The 'b' 'j' 'd' 'f' commands at the -- More -- prompt
|
||
-- end)
|
||
it('ask yes/no after backwards range', function()
|
||
command('set langmap=yn,ny')
|
||
feed('dd')
|
||
insert([[
|
||
hello
|
||
there
|
||
these
|
||
are
|
||
some
|
||
lines
|
||
]])
|
||
feed_command('4,2d')
|
||
feed('n')
|
||
expect([[
|
||
hello
|
||
there
|
||
these
|
||
are
|
||
some
|
||
lines
|
||
]])
|
||
end)
|
||
it('prompt for number', function()
|
||
command('set langmap=12,21')
|
||
n.source([[
|
||
let gotten_one = 0
|
||
function Map()
|
||
let answer = inputlist(['a', '1.', '2.', '3.'])
|
||
if answer == 1
|
||
let g:gotten_one = 1
|
||
endif
|
||
endfunction
|
||
nnoremap x :call Map()<CR>
|
||
]])
|
||
feed('x1<CR>')
|
||
eq(1, eval('gotten_one'))
|
||
command('let g:gotten_one = 0')
|
||
feed_command('call Map()')
|
||
feed('1<CR>')
|
||
eq(1, eval('gotten_one'))
|
||
end)
|
||
end)
|
||
it('conversions are not applied during setreg()', function()
|
||
call('setreg', 'i', 'ww')
|
||
eq('ww', eval('@i'))
|
||
end)
|
||
it('conversions not applied in insert mode', function()
|
||
feed('aiiiwww')
|
||
expect('iiiiwwwii www')
|
||
end)
|
||
it('conversions not applied in search mode', function()
|
||
feed('/iii<cr>x')
|
||
expect('ii www')
|
||
end)
|
||
it('conversions not applied in cmdline mode', function()
|
||
feed(':call append(1, "iii")<cr>')
|
||
expect([[
|
||
iii www
|
||
iii]])
|
||
end)
|
||
|
||
local function testrecording(command_string, expect_string, setup_function, expect_macro)
|
||
if setup_function then
|
||
setup_function()
|
||
end
|
||
feed('qa' .. command_string .. 'q')
|
||
expect(expect_string)
|
||
eq(expect_macro or n.fn.nvim_replace_termcodes(command_string, true, true, true), eval('@a'))
|
||
if setup_function then
|
||
setup_function()
|
||
end
|
||
-- n.b. may need nvim_replace_termcodes() here.
|
||
feed('@a')
|
||
expect(expect_string)
|
||
end
|
||
|
||
local function local_setup()
|
||
-- Can't use `insert` as it uses `i` and we've swapped the meaning of that
|
||
-- with the `langmap` setting.
|
||
command('%d')
|
||
command("put ='hello'")
|
||
command('1d')
|
||
end
|
||
|
||
it('does not affect recording special keys', function()
|
||
testrecording('A<BS><esc>', 'hell', local_setup)
|
||
testrecording('>><lt><lt>', 'hello', local_setup)
|
||
command('nnoremap \\ x')
|
||
testrecording('\\', 'ello', local_setup)
|
||
testrecording('A<C-V><BS><esc>', 'hello<BS>', local_setup)
|
||
end)
|
||
pending('Translates modified keys correctly', function()
|
||
command('nnoremap <M-i> x')
|
||
command('nnoremap <M-w> l')
|
||
testrecording('<M-w>', 'ello', local_setup)
|
||
testrecording('<M-i>x', 'hllo', local_setup)
|
||
end)
|
||
pending('handles multi-byte characters', function()
|
||
command('set langmap=ïx')
|
||
testrecording('ï', 'ello', local_setup)
|
||
-- The test below checks that what's recorded is correct.
|
||
-- It doesn't check the behaviour, as in order to cause some behaviour we
|
||
-- need to map the multi-byte character, and there is a known bug
|
||
-- preventing this from working (see the test below).
|
||
command('set langmap=xï')
|
||
testrecording('x', 'hello', local_setup)
|
||
end)
|
||
pending('handles multibyte mappings', function()
|
||
-- See this vim issue for the problem, may as well add a test.
|
||
-- https://github.com/vim/vim/issues/297
|
||
command('set langmap=ïx')
|
||
command('nnoremap x diw')
|
||
testrecording('ï', '', local_setup)
|
||
command('set nolangnoremap')
|
||
command('set langmap=xï')
|
||
command('nnoremap ï ix<esc>')
|
||
testrecording('x', 'xhello', local_setup)
|
||
end)
|
||
it('does not crash when mapping char < 256 to char >= 256', function()
|
||
-- Note: this warning should be removed when the pending tests above are fixed.
|
||
local wmsg = table.concat({
|
||
"'langmap': mapping from e to ε will not work properly",
|
||
"'langmap': mapping from ü to μ will not work properly",
|
||
}, '\n')
|
||
-- ä ë ï ö ü ÿ < 256, β γ ε μ >= 256
|
||
command('set langmap=iw,wi,äë,ëä,ïx,xï,βγ,γβ,eε,εe,üμ,μü,ÿy,yÿ')
|
||
eq(wmsg, n.exec_capture('messages'))
|
||
command('messages clear | set langmap=iwäëïxβγeεüμÿy;wiëäxïγβεeμüyÿ')
|
||
eq(wmsg, n.exec_capture('messages'))
|
||
end)
|
||
-- This test is to ensure the behaviour doesn't change from what's already
|
||
-- around. I (hardenedapple) personally think this behaviour should be
|
||
-- changed.
|
||
it('treats control modified keys as characters', function()
|
||
command('nnoremap <C-w> iw<esc>')
|
||
command('nnoremap <C-i> ii<esc>')
|
||
testrecording('<C-w>', 'whello', local_setup, eval([["\<*C-w>"]]))
|
||
testrecording('<C-i>', 'ihello', local_setup, eval([["\<*C-i>"]]))
|
||
end)
|
||
end)
|