| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 1 | " Tests for 'packpath' and :packadd |
| Bram Moolenaar | 863c1a9 | 2016-03-03 15:47:06 +0100 | [diff] [blame] | 2 | |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 3 | func SetUp() |
| 4 | let s:topdir = expand('%:h') . '/Xdir' |
| 5 | exe 'set packpath=' . s:topdir |
| 6 | let s:plugdir = s:topdir . '/pack/mine/opt/mytest' |
| 7 | endfunc |
| 8 | |
| 9 | func TearDown() |
| 10 | call delete(s:topdir, 'rf') |
| 11 | endfunc |
| 12 | |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 13 | func Test_packadd() |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 14 | call mkdir(s:plugdir . '/plugin', 'p') |
| 15 | call mkdir(s:plugdir . '/ftdetect', 'p') |
| 16 | set rtp& |
| 17 | let rtp = &rtp |
| Bram Moolenaar | 863c1a9 | 2016-03-03 15:47:06 +0100 | [diff] [blame] | 18 | filetype on |
| Bram Moolenaar | 863c1a9 | 2016-03-03 15:47:06 +0100 | [diff] [blame] | 19 | |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 20 | exe 'split ' . s:plugdir . '/plugin/test.vim' |
| 21 | call setline(1, 'let g:plugin_works = 42') |
| 22 | wq |
| Bram Moolenaar | 863c1a9 | 2016-03-03 15:47:06 +0100 | [diff] [blame] | 23 | |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 24 | exe 'split ' . s:plugdir . '/ftdetect/test.vim' |
| 25 | call setline(1, 'let g:ftdetect_works = 17') |
| 26 | wq |
| 27 | |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 28 | packadd mytest |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 29 | |
| 30 | call assert_equal(42, g:plugin_works) |
| 31 | call assert_equal(17, g:ftdetect_works) |
| 32 | call assert_true(len(&rtp) > len(rtp)) |
| 33 | call assert_true(&rtp =~ 'testdir/Xdir/pack/mine/opt/mytest\($\|,\)') |
| 34 | endfunc |
| 35 | |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 36 | func Test_packadd_noload() |
| 37 | call mkdir(s:plugdir . '/plugin', 'p') |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 38 | call mkdir(s:plugdir . '/syntax', 'p') |
| 39 | set rtp& |
| 40 | let rtp = &rtp |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 41 | |
| 42 | exe 'split ' . s:plugdir . '/plugin/test.vim' |
| 43 | call setline(1, 'let g:plugin_works = 42') |
| 44 | wq |
| 45 | let g:plugin_works = 0 |
| 46 | |
| 47 | packadd! mytest |
| 48 | |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 49 | call assert_true(len(&rtp) > len(rtp)) |
| 50 | call assert_true(&rtp =~ 'testdir/Xdir/pack/mine/opt/mytest\($\|,\)') |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 51 | call assert_equal(0, g:plugin_works) |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 52 | |
| 53 | " check the path is not added twice |
| 54 | let new_rtp = &rtp |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 55 | packadd! mytest |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 56 | call assert_equal(new_rtp, &rtp) |
| Bram Moolenaar | 863c1a9 | 2016-03-03 15:47:06 +0100 | [diff] [blame] | 57 | endfunc |