view src/testdir/test_autochdir.vim @ 15462:2c44001e7e13 v8.1.0739

patch 8.1.0739: text objects in not sufficiently tested commit https://github.com/vim/vim/commit/81b1ba4be57b4bfd7e53a6709b4f98758612ef5f Author: Bram Moolenaar <Bram@vim.org> Date: Sun Jan 13 16:12:40 2019 +0100 patch 8.1.0739: text objects in not sufficiently tested Problem: Text objects in not sufficiently tested. Solution: Add a few more test cases. (Dominique Pelle, closes https://github.com/vim/vim/issues/3795)
author Bram Moolenaar <Bram@vim.org>
date Sun, 13 Jan 2019 16:15:07 +0100
parents 90ab2d3ce11d
children ebdf6cd89910
line wrap: on
line source

" Test 'autochdir' behavior

if !exists("+autochdir")
  finish
endif

func Test_set_filename()
  let cwd = getcwd()
  call test_autochdir()
  set acd

  let s:li = []
  autocmd DirChanged auto call add(s:li, "autocd")
  autocmd DirChanged auto call add(s:li, expand("<afile>"))

  new
  w samples/Xtest
  call assert_equal("Xtest", expand('%'))
  call assert_equal("samples", substitute(getcwd(), '.*/\(\k*\)', '\1', ''))
  call assert_equal(["autocd", getcwd()], s:li)

  bwipe!
  au! DirChanged
  set noacd
  exe 'cd ' . cwd
  call delete('samples/Xtest')
endfunc