| 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\($\|,\)') |
| Bram Moolenaar | be82c25 | 2016-03-06 14:44:08 +0100 | [diff] [blame] | 34 | |
| 35 | " Check exception |
| 36 | call assert_fails("packadd directorynotfound", 'E919:') |
| 37 | call assert_fails("packadd", 'E471:') |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 38 | endfunc |
| 39 | |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 40 | func Test_packadd_noload() |
| 41 | call mkdir(s:plugdir . '/plugin', 'p') |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 42 | call mkdir(s:plugdir . '/syntax', 'p') |
| 43 | set rtp& |
| 44 | let rtp = &rtp |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 45 | |
| 46 | exe 'split ' . s:plugdir . '/plugin/test.vim' |
| 47 | call setline(1, 'let g:plugin_works = 42') |
| 48 | wq |
| 49 | let g:plugin_works = 0 |
| 50 | |
| 51 | packadd! mytest |
| 52 | |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 53 | call assert_true(len(&rtp) > len(rtp)) |
| 54 | call assert_true(&rtp =~ 'testdir/Xdir/pack/mine/opt/mytest\($\|,\)') |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 55 | call assert_equal(0, g:plugin_works) |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 56 | |
| 57 | " check the path is not added twice |
| 58 | let new_rtp = &rtp |
| Bram Moolenaar | f365482 | 2016-03-04 22:12:23 +0100 | [diff] [blame] | 59 | packadd! mytest |
| Bram Moolenaar | 9171587 | 2016-03-03 17:13:03 +0100 | [diff] [blame] | 60 | call assert_equal(new_rtp, &rtp) |
| Bram Moolenaar | 863c1a9 | 2016-03-03 15:47:06 +0100 | [diff] [blame] | 61 | endfunc |
| Bram Moolenaar | 35ca0e7 | 2016-03-05 17:41:49 +0100 | [diff] [blame] | 62 | |
| 63 | " Check command-line completion for 'packadd' |
| 64 | func Test_packadd_completion() |
| 65 | let optdir1 = &packpath . '/pack/mine/opt' |
| 66 | let optdir2 = &packpath . '/pack/candidate/opt' |
| 67 | |
| 68 | call mkdir(optdir1 . '/pluginA', 'p') |
| 69 | call mkdir(optdir1 . '/pluginC', 'p') |
| 70 | call mkdir(optdir2 . '/pluginB', 'p') |
| 71 | call mkdir(optdir2 . '/pluginC', 'p') |
| 72 | |
| 73 | let li = [] |
| 74 | call feedkeys(":packadd \<Tab>')\<C-B>call add(li, '\<CR>", 't') |
| 75 | call feedkeys(":packadd " . repeat("\<Tab>", 2) . "')\<C-B>call add(li, '\<CR>", 't') |
| 76 | call feedkeys(":packadd " . repeat("\<Tab>", 3) . "')\<C-B>call add(li, '\<CR>", 't') |
| 77 | call feedkeys(":packadd " . repeat("\<Tab>", 4) . "')\<C-B>call add(li, '\<CR>", 'tx') |
| 78 | call assert_equal("packadd pluginA", li[0]) |
| 79 | call assert_equal("packadd pluginB", li[1]) |
| 80 | call assert_equal("packadd pluginC", li[2]) |
| 81 | call assert_equal("packadd ", li[3]) |
| 82 | endfunc |