Mercurial > vim
view src/testdir/test_autocmd.vim @ 9450:073aebdba121 v7.4.2006
commit https://github.com/vim/vim/commit/30445cb6e94698d212ba866ef3e4022ac625540a
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jul 9 15:21:02 2016 +0200
patch 7.4.2006
Problem: Crash when using tabnext in BufUnload autocmd. (Norio Takagi)
Solution: First check that the current buffer is the right one. (Hirohito
Higashi)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sat, 09 Jul 2016 15:30:05 +0200 |
parents | 97a9538c37ff |
children | 0190d5de215f |
line wrap: on
line source
" Tests for autocommands func Test_vim_did_enter() call assert_false(v:vim_did_enter) " This script will never reach the main loop, can't check if v:vim_did_enter " becomes one. endfunc if has('timers') func ExitInsertMode(id) call feedkeys("\<Esc>") endfunc func Test_cursorhold_insert() let g:triggered = 0 au CursorHoldI * let g:triggered += 1 set updatetime=20 call timer_start(100, 'ExitInsertMode') call feedkeys('a', 'x!') call assert_equal(1, g:triggered) endfunc func Test_cursorhold_insert_ctrl_x() let g:triggered = 0 au CursorHoldI * let g:triggered += 1 set updatetime=20 call timer_start(100, 'ExitInsertMode') " CursorHoldI does not trigger after CTRL-X call feedkeys("a\<C-X>", 'x!') call assert_equal(0, g:triggered) endfunc endif function Test_bufunload() augroup test_bufunload_group autocmd! autocmd BufUnload * call add(s:li, "bufunload") autocmd BufDelete * call add(s:li, "bufdelete") autocmd BufWipeout * call add(s:li, "bufwipeout") augroup END let s:li=[] new setlocal bufhidden= bunload call assert_equal(["bufunload", "bufdelete"], s:li) let s:li=[] new setlocal bufhidden=delete bunload call assert_equal(["bufunload", "bufdelete"], s:li) let s:li=[] new setlocal bufhidden=unload bwipeout call assert_equal(["bufunload", "bufdelete", "bufwipeout"], s:li) augroup! test_bufunload_group endfunc " SEGV occurs in older versions. (At least 7.4.2005 or older) function Test_autocmd_bufunload_with_tabnext() tabedit tabfirst augroup test_autocmd_bufunload_with_tabnext_group autocmd! autocmd BufUnload <buffer> tabnext augroup END quit call assert_equal(2, tabpagenr('$')) augroup! test_autocmd_bufunload_with_tabnext_group tablast quit endfunc