view src/testdir/test_autochdir.vim @ 14441:2d6703d4448a v8.1.0234

patch 8.1.0234: incorrect reference counting in Perl interface commit https://github.com/vim/vim/commit/41c363a3154dd1caeb431fa54748ad48ef6d3bd1 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Aug 2 21:46:51 2018 +0200 patch 8.1.0234: incorrect reference counting in Perl interface Problem: Incorrect reference counting in Perl interface. Solution: Call SvREFCNT_inc more often, add a test. (Damien)
author Christian Brabandt <cb@256bit.org>
date Thu, 02 Aug 2018 22:00:06 +0200
parents 03a6aeea2096
children 90ab2d3ce11d
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
  new
  w samples/Xtest
  call assert_equal("Xtest", expand('%'))
  call assert_equal("samples", substitute(getcwd(), '.*/\(\k*\)', '\1', ''))
  bwipe!
  set noacd
  exe 'cd ' . cwd
  call delete('samples/Xtest')
endfunc