Mercurial > vim
view src/testdir/test_listchars.in @ 12523:881564b89f9b v8.0.1140
patch 8.0.1140: still old style tests
commit https://github.com/vim/vim/commit/bb3e6416f157f68799ccb6070fa2f91df6780e79
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Sep 23 19:24:46 2017 +0200
patch 8.0.1140: still old style tests
Problem: Still old style tests.
Solution: Convert two tests to new style. (Yegappan Lakshmanan)
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sat, 23 Sep 2017 19:30:04 +0200 |
| parents | 095b538d58a6 |
| children |
line wrap: on
line source
Tests for 'listchars' display with 'list' and :list STARTTEST :so small.vim :set ff=unix :let g:lines = [] :function GetScreenCharsForLine(lnum) : return join(map(range(1, virtcol('$')), 'nr2char(screenchar(a:lnum, v:val))'), '') :endfunction :nnoremap <expr> GG ":call add(g:lines, GetScreenCharsForLine(".screenrow()."))\<CR>" :set listchars+=tab:>-,space:.,trail:< :set list : /^start:/ :normal! jzt GG GG GG GG GGH: :set listchars-=trail:< GG GG GG GG GG: :put =g:lines :'[,']w! test.out ENDTEST start: aa bb cccc dd ee STARTTEST :set listchars+=trail:< :set nolist : /^start:/ :redir! >> test.out :+1,$list :redir END :q! ENDTEST start: fff gg h iii