thac0/vim
1
0
Fork 0
forked from aniani/vim
Code Activity

patch 8.1.0995: a getchar() call resets the reg_executing() result

Browse Source 
Problem:    A getchar() call while executing a register resets the
            reg_executing() result.
Solution:   Save and restore reg_executing. (closes #406
This commit is contained in:
Bram Moolenaar
2019-03-05 12:24:10 +01:00
parent 8fcb60f961
commit f0fab3046c
3 changed files with 23 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
src/testdir/test_functions.vim
View File

@@ -1138,6 +1138,7 @@ func Test_reg_executing_and_recording()
call assert_equal('":', s:reg_stat)
" :normal command saves and restores reg_executing
let s:reg_stat = ''
let @q = ":call TestFunc()\<CR>:call s:save_reg_stat()\<CR>"
func TestFunc() abort
normal! ia
@@ -1146,6 +1147,24 @@ func Test_reg_executing_and_recording()
call assert_equal(':q', s:reg_stat)
delfunc TestFunc
" getchar() command saves and restores reg_executing
map W :call TestFunc()<CR>
let @q = "W"
func TestFunc() abort
let g:reg1 = reg_executing()
let g:typed = getchar(0)
let g:reg2 = reg_executing()
endfunc
call feedkeys("@qy", 'xt')
call assert_equal(char2nr("y"), g:typed)
call assert_equal('q', g:reg1)
call assert_equal('q', g:reg2)
delfunc TestFunc
unmap W
unlet g:typed
unlet g:reg1
unlet g:reg2
bwipe!
delfunc s:save_reg_stat
unlet s:reg_stat