diff options
author | Bram Moolenaar <Bram@vim.org> | 2018-09-22 21:37:39 +0200 |
---|---|---|
committer | Bram Moolenaar <Bram@vim.org> | 2018-09-22 21:37:39 +0200 |
commit | 3b30168f04b8a2a2f1bbaa2f90be546550463146 (patch) | |
tree | 5f68dbcf6c552fecf727836399f0be17216e1d14 /src/testdir | |
parent | 7ff8a3cfb6b029f9af1fdf3890e1320cafce5111 (diff) |
patch 8.1.0428: the :suspend command is not testedv8.1.0428
Problem: The :suspend command is not tested.
Solution: Add a test. (Dominique Pelle, closes #3472)
Diffstat (limited to 'src/testdir')
-rw-r--r-- | src/testdir/test_alot.vim | 1 | ||||
-rw-r--r-- | src/testdir/test_suspend.vim | 51 |
2 files changed, 52 insertions, 0 deletions
diff --git a/src/testdir/test_alot.vim b/src/testdir/test_alot.vim index ea829e060d..3a0c6e0422 100644 --- a/src/testdir/test_alot.vim +++ b/src/testdir/test_alot.vim @@ -52,6 +52,7 @@ source test_set.vim source test_sort.vim source test_sha256.vim source test_statusline.vim +source test_suspend.vim source test_syn_attr.vim source test_tabline.vim source test_tabpage.vim diff --git a/src/testdir/test_suspend.vim b/src/testdir/test_suspend.vim new file mode 100644 index 0000000000..462173e8cc --- /dev/null +++ b/src/testdir/test_suspend.vim @@ -0,0 +1,51 @@ +" 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, '.'))}) + + exe buf . 'bwipe!' + call delete('Xfoo') + set autowrite& +endfunc |