| Bram Moolenaar | 89b1042 | 2016-07-12 22:51:22 +0200 | [diff] [blame] | 1 | " Common preparations for running tests. |
| 2 | |
| Bram Moolenaar | f98246d | 2017-07-29 22:21:18 +0200 | [diff] [blame] | 3 | " Only load this once. |
| 4 | if 1 |
| Bram Moolenaar | c255b78 | 2022-11-26 19:16:48 +0000 | [diff] [blame] | 5 | |
| 6 | " When using xterm version 377 the response to the modifyOtherKeys status |
| 7 | " interferes with some tests. Remove the request from the t_TI termcap |
| 8 | " entry. |
| 9 | let &t_TI = substitute(&t_TI, "\<Esc>\\[?4m", '', '') |
| 10 | |
| Bram Moolenaar | f98246d | 2017-07-29 22:21:18 +0200 | [diff] [blame] | 11 | if exists('s:did_load') |
| 12 | finish |
| 13 | endif |
| 14 | let s:did_load = 1 |
| 15 | endif |
| 16 | |
| Bram Moolenaar | 66459b7 | 2016-08-06 19:01:55 +0200 | [diff] [blame] | 17 | " Make sure 'runtimepath' and 'packpath' does not include $HOME. |
| Bram Moolenaar | 89b1042 | 2016-07-12 22:51:22 +0200 | [diff] [blame] | 18 | set rtp=$VIM/vimfiles,$VIMRUNTIME,$VIM/vimfiles/after |
| Bram Moolenaar | c96a2f3 | 2016-08-06 19:45:31 +0200 | [diff] [blame] | 19 | if has('packages') |
| 20 | let &packpath = &rtp |
| 21 | endif |
| Bram Moolenaar | 89b1042 | 2016-07-12 22:51:22 +0200 | [diff] [blame] | 22 | |
| Bram Moolenaar | 94722c5 | 2023-01-28 19:19:03 +0000 | [diff] [blame] | 23 | " Only when the +eval feature is present. |
| Bram Moolenaar | 89b1042 | 2016-07-12 22:51:22 +0200 | [diff] [blame] | 24 | if 1 |
| Bram Moolenaar | 11e79bb | 2017-07-08 17:03:21 +0200 | [diff] [blame] | 25 | " Make sure the .Xauthority file can be found after changing $HOME. |
| 26 | if $XAUTHORITY == '' |
| 27 | let $XAUTHORITY = $HOME . '/.Xauthority' |
| 28 | endif |
| 29 | |
| Bram Moolenaar | 6a8691d | 2017-09-03 14:31:02 +0200 | [diff] [blame] | 30 | " Avoid storing shell history. |
| 31 | let $HISTFILE = "" |
| 32 | |
| Christian Brabandt | b8b1c8e | 2023-06-23 22:23:01 +0100 | [diff] [blame] | 33 | " Have current $HOME available as $ORIGHOME. $HOME is used for option |
| 34 | " defaults before we get here, and test_mksession checks that. |
| 35 | let $ORIGHOME = $HOME |
| 36 | |
| John M Devin | 5b9237c | 2024-09-08 20:00:38 +0200 | [diff] [blame] | 37 | if !exists('$XDG_CONFIG_HOME') |
| 38 | let $XDG_CONFIG_HOME = $HOME .. '/.config' |
| 39 | endif |
| 40 | |
| Bram Moolenaar | 89b1042 | 2016-07-12 22:51:22 +0200 | [diff] [blame] | 41 | " Make sure $HOME does not get read or written. |
| Bram Moolenaar | d1ee004 | 2017-07-29 20:39:53 +0200 | [diff] [blame] | 42 | " It must exist, gnome tries to create $HOME/.gnome2 |
| 43 | let $HOME = getcwd() . '/XfakeHOME' |
| Bram Moolenaar | d0b6c6c | 2017-07-30 13:28:23 +0200 | [diff] [blame] | 44 | if !isdirectory($HOME) |
| 45 | call mkdir($HOME) |
| 46 | endif |
| Bram Moolenaar | 89b1042 | 2016-07-12 22:51:22 +0200 | [diff] [blame] | 47 | endif |