Mercurial > vim
view src/testdir/test_langmap.vim @ 25330:820395d1137b v8.2.3202
patch 8.2.3202: Vim9: tests are only executed for legacy script
Commit: https://github.com/vim/vim/commit/5dd839ce20466eea52e59ecf86456f1ab370d2bd
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Jul 22 18:48:53 2021 +0200
patch 8.2.3202: Vim9: tests are only executed for legacy script
Problem: Vim9: tests are only executed for legacy script.
Solution: Run more tests also for Vim9 script. Fix uncovered problems.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Thu, 22 Jul 2021 19:00:05 +0200 |
parents | 08940efa6b4e |
children | 109aa4913cba |
line wrap: on
line source
" tests for 'langmap' source check.vim CheckFeature langmap func Test_langmap() new set langmap=}l,^x,%v call setline(1, ['abc']) call feedkeys('gg0}^', 'tx') call assert_equal('ac', getline(1)) " in Replace mode " need silent! to avoid a delay when entering Insert mode call setline(1, ['abcde']) silent! call feedkeys("gg0lR%{z\<Esc>00", 'tx') call assert_equal('a%{ze', getline(1)) " in Select mode " need silent! to avoid a delay when entering Insert mode call setline(1, ['abcde']) silent! call feedkeys("gg0}%}\<C-G>}^\<Esc>00", 'tx') call assert_equal('a}^de', getline(1)) " Error cases call assert_fails('set langmap=aA,b', 'E357:') call assert_fails('set langmap=z;y;y;z', 'E358:') " Map character > 256 enew! set langmap=āx,ăl,āx call setline(1, ['abcde']) call feedkeys('gg2lā', 'tx') call assert_equal('abde', getline(1)) " special characters in langmap enew! call setline(1, ['Hello World']) set langmap=\\;\\,,\\,\\; call feedkeys('ggfo,', 'tx') call assert_equal(8, col('.')) call feedkeys(';', 'tx') call assert_equal(5, col('.')) set langmap& set langmap=\\;\\,;\\,\\; call feedkeys('ggfo,', 'tx') call assert_equal(8, col('.')) call feedkeys(';', 'tx') call assert_equal(5, col('.')) set langmap& quit! endfunc " vim: shiftwidth=2 sts=2 expandtab