Mercurial > vim

comparison src/testdir/test_gui.vim @ 34205:b629e912b0fb v9.1.0051

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 9.1.0051: MS-Windows: Key event test fail Commit: https://github.com/vim/vim/commit/f6ebaa7ae64edbe2e56d65c2a3f2494301d11acb Author: Christian Brabandt <cb@256bit.org> Date: Thu Jan 25 20:44:49 2024 +0100 patch 9.1.0051: MS-Windows: Key event test fail Problem: MS-Windows: Key event test fail (after 9.1.0050) Solution: Catch Interrupt and return Ctrl-C Signed-off-by: Christian Brabandt <cb@256bit.org>
author Christian Brabandt <cb@256bit.org>
date Thu, 25 Jan 2024 21:00:04 +0100
parents f8dd278ab05f
children 995b539939c4
comparison
equal deleted inserted replaced
34204:073a16d82b75 34205:b629e912b0fb
1706 new 1706 new
1707 1707
1708 " Test for <Ctrl-A> to <Ctrl-Z> keys 1708 " Test for <Ctrl-A> to <Ctrl-Z> keys
1709 for kc in range(65, 90) 1709 for kc in range(65, 90)
1710 call SendKeys([0x11, kc]) 1710 call SendKeys([0x11, kc])
1711 let ch = getcharstr() 1711 try
1712 let ch = getcharstr()
1713 catch /^Vim:Interrupt$/
1714 let ch = "\<c-c>"
1715 endtry
1712 call assert_equal(nr2char(kc - 64), ch) 1716 call assert_equal(nr2char(kc - 64), ch)
1713 endfor 1717 endfor
1714 1718
1715 " Testing more extensive windows keyboard handling 1719 " Testing more extensive windows keyboard handling
1716 " is covered in test_mswin_event.vim 1720 " is covered in test_mswin_event.vim