| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 1 | " Test 'autochdir' behavior |
| 2 | |
| 3 | if !exists("+autochdir") |
| Bram Moolenaar | 9c0cec6 | 2019-06-06 13:38:15 +0200 | [diff] [blame] | 4 | throw 'Skipped: autochdir feature missing' |
| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 5 | endif |
| 6 | |
| 7 | func Test_set_filename() |
| Bram Moolenaar | cf1ba35 | 2017-10-27 00:55:04 +0200 | [diff] [blame] | 8 | let cwd = getcwd() |
| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 9 | call test_autochdir() |
| 10 | set acd |
| Bram Moolenaar | 2caad3f | 2018-12-16 15:38:02 +0100 | [diff] [blame] | 11 | |
| 12 | let s:li = [] |
| 13 | autocmd DirChanged auto call add(s:li, "autocd") |
| 14 | autocmd DirChanged auto call add(s:li, expand("<afile>")) |
| 15 | |
| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 16 | new |
| 17 | w samples/Xtest |
| 18 | call assert_equal("Xtest", expand('%')) |
| 19 | call assert_equal("samples", substitute(getcwd(), '.*/\(\k*\)', '\1', '')) |
| Bram Moolenaar | 2caad3f | 2018-12-16 15:38:02 +0100 | [diff] [blame] | 20 | call assert_equal(["autocd", getcwd()], s:li) |
| 21 | |
| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 22 | bwipe! |
| Bram Moolenaar | 2caad3f | 2018-12-16 15:38:02 +0100 | [diff] [blame] | 23 | au! DirChanged |
| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 24 | set noacd |
| Bram Moolenaar | cf1ba35 | 2017-10-27 00:55:04 +0200 | [diff] [blame] | 25 | exe 'cd ' . cwd |
| Bram Moolenaar | 5c71994 | 2016-07-09 23:40:45 +0200 | [diff] [blame] | 26 | call delete('samples/Xtest') |
| 27 | endfunc |