Mercurial > vim

annotate src/testdir/test_fnamemodify.vim @ 19812:7cde7ea94dd3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added tag v8.2.0462 for changeset d1d840cfd135d18f52fb7833ba130289825f1f2a
author Bram Moolenaar <Bram@vim.org>
date Fri, 27 Mar 2020 20:30:05 +0100
parents 782f410c5df3
children 94f05de75e9f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Test filename modifiers.
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 func Test_fnamemodify()
11101
c5027d19ef61 patch 8.0.0438: the fnamemodify test may cause later tests to fail
Christian Brabandt <cb@256bit.org>
parents: 8730
diff changeset
4 let save_home = $HOME
c5027d19ef61 patch 8.0.0438: the fnamemodify test may cause later tests to fail
Christian Brabandt <cb@256bit.org>
parents: 8730
diff changeset
5 let save_shell = &shell
19299
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
6 let save_shellslash = &shellslash
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 let $HOME = fnamemodify('.', ':p:h:h')
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 set shell=sh
19299
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
9 set shellslash
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 call assert_equal('/', fnamemodify('.', ':p')[-1:])
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 call assert_equal('r', fnamemodify('.', ':p:h')[-1:])
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 call assert_equal('t', fnamemodify('test.out', ':p')[-1:])
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 call assert_equal('test.out', fnamemodify('test.out', ':.'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 call assert_equal('a', fnamemodify('../testdir/a', ':.'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 call assert_equal('~/testdir/test.out', fnamemodify('test.out', ':~'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 call assert_equal('~/testdir/a', fnamemodify('../testdir/a', ':~'))
17849
73ddc462979d patch 8.1.1921: more functions can be used as methods
Bram Moolenaar <Bram@vim.org>
parents: 16668
diff changeset
18 call assert_equal('a', '../testdir/a'->fnamemodify(':t'))
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 call assert_equal('', fnamemodify('.', ':p:t'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 call assert_equal('test.out', fnamemodify('test.out', ':p:t'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 call assert_equal('out', fnamemodify('test.out', ':p:e'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 call assert_equal('out', fnamemodify('test.out', ':p:t:e'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 call assert_equal('abc.fb2.tar', fnamemodify('abc.fb2.tar.gz', ':r'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 call assert_equal('abc.fb2', fnamemodify('abc.fb2.tar.gz', ':r:r'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 call assert_equal('abc', fnamemodify('abc.fb2.tar.gz', ':r:r:r'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 call assert_equal('testdir/abc.fb2', substitute(fnamemodify('abc.fb2.tar.gz', ':p:r:r'), '.*\(testdir/.*\)', '\1', ''))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 call assert_equal('gz', fnamemodify('abc.fb2.tar.gz', ':e'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 call assert_equal('tar.gz', fnamemodify('abc.fb2.tar.gz', ':e:e'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 call assert_equal('fb2.tar.gz', fnamemodify('abc.fb2.tar.gz', ':e:e:e'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 call assert_equal('fb2.tar.gz', fnamemodify('abc.fb2.tar.gz', ':e:e:e:e'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 call assert_equal('tar', fnamemodify('abc.fb2.tar.gz', ':e:e:r'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32
19299
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
33 let cwd = getcwd()
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
34 call mkdir($HOME . '/XXXXXXXX/a', 'p')
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
35 call mkdir($HOME . '/XXXXXXXX/b', 'p')
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
36 call chdir($HOME . '/XXXXXXXX/a/')
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
37 call assert_equal('foo', fnamemodify($HOME . '/XXXXXXXX/a/foo', ':p:~:.'))
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
38 call assert_equal('~/XXXXXXXX/b/foo', fnamemodify($HOME . '/XXXXXXXX/b/foo', ':p:~:.'))
19314
782f410c5df3 patch 8.2.0215: wrong file name shortening
Bram Moolenaar <Bram@vim.org>
parents: 19299
diff changeset
39 call mkdir($HOME . '/XXXXXXXX/a.ext', 'p')
782f410c5df3 patch 8.2.0215: wrong file name shortening
Bram Moolenaar <Bram@vim.org>
parents: 19299
diff changeset
40 call assert_equal('~/XXXXXXXX/a.ext/foo', fnamemodify($HOME . '/XXXXXXXX/a.ext/foo', ':p:~:.'))
19299
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
41 call chdir(cwd)
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
42 call delete($HOME . '/XXXXXXXX', 'rf')
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
43
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44 call assert_equal('''abc def''', fnamemodify('abc def', ':S'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
45 call assert_equal('''abc" "def''', fnamemodify('abc" "def', ':S'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 call assert_equal('''abc"%"def''', fnamemodify('abc"%"def', ':S'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
47 call assert_equal('''abc''\'''' ''\''''def''', fnamemodify('abc'' ''def', ':S'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48 call assert_equal('''abc''\''''%''\''''def''', fnamemodify('abc''%''def', ':S'))
11197
7f355d8cd634 patch 8.0.0485: not all windows commands are tested
Christian Brabandt <cb@256bit.org>
parents: 11101
diff changeset
49 sp test_alot.vim
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
50 call assert_equal(expand('%:r:S'), shellescape(expand('%:r')))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
51 call assert_equal('test_alot,''test_alot'',test_alot.vim', join([expand('%:r'), expand('%:r:S'), expand('%')], ','))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
52 quit
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
53
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
54 call assert_equal("'abc\ndef'", fnamemodify("abc\ndef", ':S'))
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
55 set shell=tcsh
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
56 call assert_equal("'abc\\\ndef'", fnamemodify("abc\ndef", ':S'))
11101
c5027d19ef61 patch 8.0.0438: the fnamemodify test may cause later tests to fail
Christian Brabandt <cb@256bit.org>
parents: 8730
diff changeset
57
c5027d19ef61 patch 8.0.0438: the fnamemodify test may cause later tests to fail
Christian Brabandt <cb@256bit.org>
parents: 8730
diff changeset
58 let $HOME = save_home
c5027d19ef61 patch 8.0.0438: the fnamemodify test may cause later tests to fail
Christian Brabandt <cb@256bit.org>
parents: 8730
diff changeset
59 let &shell = save_shell
19299
8b710057093c patch 8.2.0208: fnamemodify() does not apply ":~" when followed by ":."
Bram Moolenaar <Bram@vim.org>
parents: 18261
diff changeset
60 let &shellslash = save_shellslash
8726
4c5c08316979 commit https://github.com/vim/vim/commit/610cc1b9b3c8104382f5506606c1f87118c28114
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 endfunc
18261
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
62
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
63 func Test_fnamemodify_er()
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
64 call assert_equal("with", fnamemodify("path/to/file.with.extensions", ':e:e:r:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
65
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
66 call assert_equal('c', fnamemodify('a.c', ':e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
67 call assert_equal('c', fnamemodify('a.c', ':e:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
68 call assert_equal('c', fnamemodify('a.c', ':e:e:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
69 call assert_equal('c', fnamemodify('a.c', ':e:e:r:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
70
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
71 call assert_equal('rb', fnamemodify('a.spec.rb', ':e:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
72 call assert_equal('rb', fnamemodify('a.spec.rb', ':e:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
73 call assert_equal('spec.rb', fnamemodify('a.spec.rb', ':e:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
74 call assert_equal('spec', fnamemodify('a.spec.rb', ':e:e:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
75 call assert_equal('spec', fnamemodify('a.spec.rb', ':e:e:r:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
76 call assert_equal('spec', fnamemodify('a.b.spec.rb', ':e:e:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
77 call assert_equal('b.spec', fnamemodify('a.b.spec.rb', ':e:e:e:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
78 call assert_equal('b', fnamemodify('a.b.spec.rb', ':e:e:e:r:r'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
79
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
80 call assert_equal('spec', fnamemodify('a.b.spec.rb', ':r:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
81 call assert_equal('b', fnamemodify('a.b.spec.rb', ':r:r:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
82
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
83 call assert_equal('c', fnamemodify('a.b.c.d.e', ':r:r:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
84 call assert_equal('b.c', fnamemodify('a.b.c.d.e', ':r:r:e:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
85
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
86 " :e never includes the whole filename, so "a.b":e:e:e --> "b"
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
87 call assert_equal('b.c', fnamemodify('a.b.c.d.e', ':r:r:e:e:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
88 call assert_equal('b.c', fnamemodify('a.b.c.d.e', ':r:r:e:e:e:e'))
8d09b7f53c71 patch 8.1.2125: fnamemodify() fails when repeating :e
Bram Moolenaar <Bram@vim.org>
parents: 17849
diff changeset
89 endfunc