Mercurial > vim
view src/testdir/test_suspend.vim @ 15973:393a9a3a2da2 v8.1.0992
patch 8.1.0992: a :normal command resets the reg_executing() result
commit https://github.com/vim/vim/commit/cce713ddcc0c9ab29926c28e287cbb587a959b08
Author: Bram Moolenaar <Bram@vim.org>
Date: Mon Mar 4 11:40:12 2019 +0100
patch 8.1.0992: a :normal command resets the reg_executing() result
Problem: A :normal command while executing a register resets the
reg_executing() result.
Solution: Save and restore reg_executing. (closes #4066)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Mon, 04 Mar 2019 11:45:07 +0100 |
parents | 47328ce4b7aa |
children | b1e69c9e4c67 |
line wrap: on
line source
" Test :suspend source shared.vim func Test_suspend() if !has('terminal') || !executable('/bin/sh') return endif let buf = term_start('/bin/sh') " Wait for shell prompt. call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) call term_sendkeys(buf, v:progpath \ . " --clean -X" \ . " -c 'set nu'" \ . " -c 'call setline(1, \"foo\")'" \ . " Xfoo\<CR>") " Cursor in terminal buffer should be on first line in spawned vim. call WaitForAssert({-> assert_equal(' 1 foo', term_getline(buf, '.'))}) for suspend_cmd in [":suspend\<CR>", \ ":stop\<CR>", \ ":suspend!\<CR>", \ ":stop!\<CR>", \ "\<C-Z>"] " Suspend and wait for shell prompt. call term_sendkeys(buf, suspend_cmd) call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) " Without 'autowrite', buffer should not be written. call assert_equal(0, filereadable('Xfoo')) call term_sendkeys(buf, "fg\<CR>") call WaitForAssert({-> assert_equal(' 1 foo', term_getline(buf, '.'))}) endfor " Test that :suspend! with 'autowrite' writes content of buffers if modified. call term_sendkeys(buf, ":set autowrite\<CR>") call assert_equal(0, filereadable('Xfoo')) call term_sendkeys(buf, ":suspend\<CR>") " Wait for shell prompt. call WaitForAssert({-> assert_match('[$#] $', term_getline(buf, '.'))}) call assert_equal(['foo'], readfile('Xfoo')) call term_sendkeys(buf, "fg\<CR>") call WaitForAssert({-> assert_equal(' 1 foo', term_getline(buf, '.'))}) " Quit gracefully to dump coverage information. call term_sendkeys(buf, ":qall!\<CR>") call term_wait(buf) call Stop_shell_in_terminal(buf) exe buf . 'bwipe!' call delete('Xfoo') endfunc