Mercurial > vim

view src/testdir/test_exists_autocmd.vim @ 15464:3faa7cc8207c v8.1.0740

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.0740: Tcl test fails commit https://github.com/vim/vim/commit/8309b0559da6e9a581a7816572594c90c2d7f942 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jan 13 16:46:22 2019 +0100 patch 8.1.0740: Tcl test fails Problem: Tcl test fails. Solution: When the argument is empty don't give an error, instead rely on the error reporting higher up.
author Bram Moolenaar <Bram@vim.org>
date Sun, 13 Jan 2019 17:00:06 +0100
parents 140d51d5b5c3
children 08940efa6b4e
line wrap: on
line source

" Test that groups and patterns are tested correctly when calling exists() for
" autocommands.

function Test_AutoCommands()
  let results=[]
  augroup auexists
  augroup END
  call assert_true(exists("##BufEnter"))
  call assert_false(exists("#BufEnter"))
  au BufEnter * let g:entered=1
  call assert_true(exists("#BufEnter"))
  call assert_false(exists("#auexists#BufEnter"))
  augroup auexists
  au BufEnter * let g:entered=1
  augroup END
  call assert_true(exists("#auexists#BufEnter"))
  call assert_false(exists("#BufEnter#*.test"))
  au BufEnter *.test let g:entered=1
  call assert_true(exists("#BufEnter#*.test"))
  edit testfile.test
  call assert_false(exists("#BufEnter#<buffer>"))
  au BufEnter <buffer> let g:entered=1
  call assert_true(exists("#BufEnter#<buffer>"))
  edit testfile2.test
  call assert_false(exists("#BufEnter#<buffer>"))
endfunction