| 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 |
| Bram Moolenaar | 35ca0e7 | 2016-03-05 17:41:49 +0100 | [diff] [blame] | 58 | |
| 59 | " Check command-line completion for 'packadd' |
| 60 | func Test_packadd_completion() |
| 61 | let optdir1 = &packpath . '/pack/mine/opt' |
| 62 | let optdir2 = &packpath . '/pack/candidate/opt' |
| 63 | |
| 64 | call mkdir(optdir1 . '/pluginA', 'p') |
| 65 | call mkdir(optdir1 . '/pluginC', 'p') |
| 66 | call mkdir(optdir2 . '/pluginB', 'p') |
| 67 | call mkdir(optdir2 . '/pluginC', 'p') |
| 68 | |
| 69 | let li = [] |
| 70 | call feedkeys(":packadd \<Tab>')\<C-B>call add(li, '\<CR>", 't') |
| 71 | call feedkeys(":packadd " . repeat("\<Tab>", 2) . "')\<C-B>call add(li, '\<CR>", 't') |
| 72 | call feedkeys(":packadd " . repeat("\<Tab>", 3) . "')\<C-B>call add(li, '\<CR>", 't') |
| 73 | call feedkeys(":packadd " . repeat("\<Tab>", 4) . "')\<C-B>call add(li, '\<CR>", 'tx') |
| 74 | call assert_equal("packadd pluginA", li[0]) |
| 75 | call assert_equal("packadd pluginB", li[1]) |
| 76 | call assert_equal("packadd pluginC", li[2]) |
| 77 | call assert_equal("packadd ", li[3]) |
| 78 | endfunc |