| zeertzjq | bb404f5 | 2022-07-23 06:25:29 +0100 | [diff] [blame] | 1 | " Tests for character input and feedkeys() function. |
| 2 | |
| 3 | func Test_feedkeys_x_with_empty_string() |
| 4 | new |
| 5 | call feedkeys("ifoo\<Esc>") |
| 6 | call assert_equal('', getline('.')) |
| 7 | call feedkeys('', 'x') |
| 8 | call assert_equal('foo', getline('.')) |
| 9 | |
| 10 | " check it goes back to normal mode immediately. |
| 11 | call feedkeys('i', 'x') |
| 12 | call assert_equal('foo', getline('.')) |
| 13 | quit! |
| 14 | endfunc |
| 15 | |
| 16 | func Test_feedkeys_with_abbreviation() |
| 17 | new |
| 18 | inoreabbrev trigger value |
| 19 | call feedkeys("atrigger ", 'x') |
| 20 | call feedkeys("atrigger ", 'x') |
| 21 | call assert_equal('value value ', getline(1)) |
| 22 | bwipe! |
| 23 | iunabbrev trigger |
| 24 | endfunc |
| 25 | |
| 26 | func Test_feedkeys_escape_special() |
| 27 | nnoremap … <Cmd>let g:got_ellipsis += 1<CR> |
| 28 | call feedkeys('…', 't') |
| 29 | call assert_equal('…', getcharstr()) |
| 30 | let g:got_ellipsis = 0 |
| 31 | call feedkeys('…', 'xt') |
| 32 | call assert_equal(1, g:got_ellipsis) |
| 33 | unlet g:got_ellipsis |
| 34 | nunmap … |
| 35 | endfunc |
| 36 | |
| 37 | func Test_input_simplify_ctrl_at() |
| 38 | new |
| 39 | " feeding unsimplified CTRL-@ should still trigger i_CTRL-@ |
| 40 | call feedkeys("ifoo\<Esc>A\<*C-@>x", 'xt') |
| 41 | call assert_equal('foofo', getline(1)) |
| 42 | bw! |
| 43 | endfunc |
| 44 | |
| 45 | func Test_input_simplify_noremap() |
| 46 | call feedkeys("i\<*C-M>", 'nx') |
| 47 | call assert_equal('', getline(1)) |
| 48 | call assert_equal([0, 2, 1, 0, 1], getcurpos()) |
| 49 | bw! |
| 50 | endfunc |
| 51 | |
| 52 | func Test_input_simplify_timedout() |
| 53 | inoremap <C-M>a b |
| 54 | call feedkeys("i\<*C-M>", 'xt') |
| 55 | call assert_equal('', getline(1)) |
| 56 | call assert_equal([0, 2, 1, 0, 1], getcurpos()) |
| 57 | iunmap <C-M>a |
| 58 | bw! |
| 59 | endfunc |
| 60 | |
| 61 | " vim: shiftwidth=2 sts=2 expandtab |