Mercurial > vim
view src/testdir/test_environ.vim @ 16720:9c90cf08cfa8 v8.1.1362
patch 8.1.1362: code and data in tests can be hard to read
commit https://github.com/vim/vim/commit/c79745a82faeb5a6058e915ca49a4c69fa60ea01
Author: Bram Moolenaar <Bram@vim.org>
Date: Mon May 20 22:12:34 2019 +0200
patch 8.1.1362: code and data in tests can be hard to read
Problem: Code and data in tests can be hard to read.
Solution: Use the new heredoc style. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/4400)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Mon, 20 May 2019 22:15:06 +0200 |
| parents | 1e0a5f09fdf1 |
| children | 8d91579414b8 |
line wrap: on
line source
scriptencoding utf-8 func Test_environ() unlet! $TESTENV call assert_equal(0, has_key(environ(), 'TESTENV')) let $TESTENV = 'foo' call assert_equal(1, has_key(environ(), 'TESTENV')) let $TESTENV = 'こんにちわ' call assert_equal('こんにちわ', environ()['TESTENV']) endfunc func Test_getenv() unlet! $TESTENV call assert_equal(v:null, getenv('TESTENV')) let $TESTENV = 'foo' call assert_equal('foo', getenv('TESTENV')) endfunc func Test_setenv() unlet! $TESTENV call setenv('TEST ENV', 'foo') call assert_equal('foo', getenv('TEST ENV')) call setenv('TEST ENV', v:null) call assert_equal(v:null, getenv('TEST ENV')) endfunc func Test_external_env() call setenv('FOO', 'HelloWorld') if has('win32') let result = system('echo %FOO%') else let result = system('echo $FOO') endif let result = substitute(result, '[ \r\n]', '', 'g') call assert_equal('HelloWorld', result) call setenv('FOO', v:null) if has('win32') let result = system('set | grep ^FOO=') else let result = system('env | grep ^FOO=') endif call assert_equal('', result) endfunc