Mercurial > vim
comparison src/testdir/test_fnamemodify.vim @ 8726:4c5c08316979 v7.4.1652
commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Author: Bram Moolenaar <Bram@vim.org>
Date: Fri Mar 25 17:55:42 2016 +0100
patch 7.4.1652
Problem: Old style test for fnamemodify().
Solution: Turn it into a new style test.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Fri, 25 Mar 2016 18:00:04 +0100 |
parents | |
children | c1ac169ee618 |
comparison
equal
deleted
inserted
replaced
8725:90a3abb1c067 | 8726:4c5c08316979 |
---|---|
1 " Test filename modifiers. | |
2 | |
3 func Test_fnamemodify() | |
4 let $HOME = fnamemodify('.', ':p:h:h') | |
5 set shell=sh | |
6 | |
7 call assert_equal('/', fnamemodify('.', ':p')[-1:]) | |
8 call assert_equal('r', fnamemodify('.', ':p:h')[-1:]) | |
9 call assert_equal('t', fnamemodify('test.out', ':p')[-1:]) | |
10 call assert_equal('test.out', fnamemodify('test.out', ':.')) | |
11 call assert_equal('a', fnamemodify('../testdir/a', ':.')) | |
12 call assert_equal('~/testdir/test.out', fnamemodify('test.out', ':~')) | |
13 call assert_equal('~/testdir/a', fnamemodify('../testdir/a', ':~')) | |
14 call assert_equal('a', fnamemodify('../testdir/a', ':t')) | |
15 call assert_equal('', fnamemodify('.', ':p:t')) | |
16 call assert_equal('test.out', fnamemodify('test.out', ':p:t')) | |
17 call assert_equal('out', fnamemodify('test.out', ':p:e')) | |
18 call assert_equal('out', fnamemodify('test.out', ':p:t:e')) | |
19 call assert_equal('abc.fb2.tar', fnamemodify('abc.fb2.tar.gz', ':r')) | |
20 call assert_equal('abc.fb2', fnamemodify('abc.fb2.tar.gz', ':r:r')) | |
21 call assert_equal('abc', fnamemodify('abc.fb2.tar.gz', ':r:r:r')) | |
22 call assert_equal('testdir/abc.fb2', substitute(fnamemodify('abc.fb2.tar.gz', ':p:r:r'), '.*\(testdir/.*\)', '\1', '')) | |
23 call assert_equal('gz', fnamemodify('abc.fb2.tar.gz', ':e')) | |
24 call assert_equal('tar.gz', fnamemodify('abc.fb2.tar.gz', ':e:e')) | |
25 call assert_equal('fb2.tar.gz', fnamemodify('abc.fb2.tar.gz', ':e:e:e')) | |
26 call assert_equal('fb2.tar.gz', fnamemodify('abc.fb2.tar.gz', ':e:e:e:e')) | |
27 call assert_equal('tar', fnamemodify('abc.fb2.tar.gz', ':e:e:r')) | |
28 | |
29 call assert_equal('''abc def''', fnamemodify('abc def', ':S')) | |
30 call assert_equal('''abc" "def''', fnamemodify('abc" "def', ':S')) | |
31 call assert_equal('''abc"%"def''', fnamemodify('abc"%"def', ':S')) | |
32 call assert_equal('''abc''\'''' ''\''''def''', fnamemodify('abc'' ''def', ':S')) | |
33 call assert_equal('''abc''\''''%''\''''def''', fnamemodify('abc''%''def', ':S')) | |
34 call assert_equal(expand('%:r:S'), shellescape(expand('%:r'))) | |
35 sp test_alot.vim | |
36 call assert_equal('test_alot,''test_alot'',test_alot.vim', join([expand('%:r'), expand('%:r:S'), expand('%')], ',')) | |
37 quit | |
38 | |
39 call assert_equal("'abc\ndef'", fnamemodify("abc\ndef", ':S')) | |
40 set shell=tcsh | |
41 call assert_equal("'abc\\\ndef'", fnamemodify("abc\ndef", ':S')) | |
42 set shell& | |
43 endfunc |