blob: d9f99f057f1adcc234faeb919d1ffc375b7a0f16 [file] [log] [blame]
Bram Moolenaar6d91bcb2020-08-12 18:50:36 +02001" Test for environment variables.
2
Bram Moolenaar691ddee2019-05-09 14:52:41 +02003scriptencoding utf-8
4
5func Test_environ()
6 unlet! $TESTENV
7 call assert_equal(0, has_key(environ(), 'TESTENV'))
8 let $TESTENV = 'foo'
9 call assert_equal(1, has_key(environ(), 'TESTENV'))
10 let $TESTENV = 'こんにちわ'
11 call assert_equal('こんにちわ', environ()['TESTENV'])
12endfunc
13
14func Test_getenv()
15 unlet! $TESTENV
Bram Moolenaar4c313b12019-08-24 22:58:31 +020016 call assert_equal(v:null, 'TESTENV'->getenv())
Bram Moolenaar691ddee2019-05-09 14:52:41 +020017 let $TESTENV = 'foo'
18 call assert_equal('foo', getenv('TESTENV'))
19endfunc
20
21func Test_setenv()
22 unlet! $TESTENV
Bram Moolenaar196b4662019-09-06 21:34:30 +020023 eval 'foo'->setenv('TEST ENV')
Bram Moolenaar691ddee2019-05-09 14:52:41 +020024 call assert_equal('foo', getenv('TEST ENV'))
25 call setenv('TEST ENV', v:null)
26 call assert_equal(v:null, getenv('TEST ENV'))
27endfunc
28
29func Test_external_env()
30 call setenv('FOO', 'HelloWorld')
31 if has('win32')
32 let result = system('echo %FOO%')
33 else
34 let result = system('echo $FOO')
35 endif
36 let result = substitute(result, '[ \r\n]', '', 'g')
37 call assert_equal('HelloWorld', result)
38
39 call setenv('FOO', v:null)
40 if has('win32')
Bram Moolenaarc9740222019-06-04 08:22:53 +020041 let result = system('set | findstr "^FOO="')
Bram Moolenaar691ddee2019-05-09 14:52:41 +020042 else
43 let result = system('env | grep ^FOO=')
44 endif
45 call assert_equal('', result)
46endfunc
Bram Moolenaar6d91bcb2020-08-12 18:50:36 +020047
48" vim: shiftwidth=2 sts=2 expandtab