| Test for linebreak and list option in utf-8 mode |
| |
| STARTTEST |
| :so small.vim |
| :if !exists("+linebreak") || !has("conceal") || !has("signs") | e! test.ok | w! test.out | qa! | endif |
| :so mbyte.vim |
| :set encoding=utf8 |
| :if &enc !=? 'utf-8'|:e! test.ok|:w! test.out|qa!|endif |
| :10new|:vsp|:vert resize 20 |
| :put =\"\tabcdef hijklmn\tpqrstuvwxyz\u00a01060ABCDEFGHIJKLMNOP \" |
| :norm! zt |
| :set ts=4 sw=4 sts=4 linebreak sbr=+ wrap |
| :fu! ScreenChar(width, lines) |
| : let c='' |
| : for j in range(1,a:lines) |
| : for i in range(1,a:width) |
| : let c.=nr2char(screenchar(j, i)) |
| : endfor |
| : let c.="\n" |
| : endfor |
| : return c |
| :endfu |
| :fu! DoRecordScreen() |
| : wincmd l |
| : $put =printf(\"\n%s\", g:test) |
| : $put =g:line |
| : wincmd p |
| :endfu |
| :" |
| :let g:test ="Test 1: set linebreak + set list + fancy listchars" |
| :exe "set linebreak list listchars=nbsp:\u2423,tab:\u2595\u2014,trail:\u02d1,eol:\ub6" |
| :redraw! |
| :let line=ScreenChar(winwidth(0),4) |
| :call DoRecordScreen() |
| :" |
| :let g:test ="Test 2: set nolinebreak list" |
| :set list nolinebreak |
| :redraw! |
| :let line=ScreenChar(winwidth(0),4) |
| :call DoRecordScreen() |
| :" |
| :let g:test ="Test 3: set linebreak nolist" |
| :$put =\"\t*mask = nil;\" |
| :$ |
| :norm! zt |
| :set nolist linebreak |
| :redraw! |
| :let line=ScreenChar(winwidth(0),4) |
| :call DoRecordScreen() |
| :" |
| :let g:test ="Test 4: set linebreak list listchars and concealing" |
| :let c_defines=['#define ABCDE 1','#define ABCDEF 1','#define ABCDEFG 1','#define ABCDEFGH 1', '#define MSG_MODE_FILE 1','#define MSG_MODE_CONSOLE 2','#define MSG_MODE_FILE_AND_CONSOLE 3','#define MSG_MODE_FILE_THEN_CONSOLE 4'] |
| :call append('$', c_defines) |
| :vert resize 40 |
| :$-7 |
| :norm! zt |
| :set list linebreak listchars=tab:>- cole=1 |
| :syn match Conceal conceal cchar=>'AB\|MSG_MODE' |
| :redraw! |
| :let line=ScreenChar(winwidth(0),7) |
| :call DoRecordScreen() |
| :" |
| :let g:test ="Test 5: set linebreak list listchars and concealing part2" |
| :let c_defines=['bbeeeeee ; some text'] |
| :call append('$', c_defines) |
| :$ |
| :norm! zt |
| :set nowrap ts=2 list linebreak listchars=tab:>- cole=2 concealcursor=n |
| :syn clear |
| :syn match meaning /;\s*\zs.*/ |
| :syn match hasword /^\x\{8}/ contains=word |
| :syn match word /\<\x\{8}\>/ contains=beginword,endword contained |
| :syn match beginword /\<\x\x/ contained conceal |
| :syn match endword /\x\{6}\>/ contained |
| :hi meaning guibg=blue |
| :hi beginword guibg=green |
| :hi endword guibg=red |
| :redraw! |
| :let line=ScreenChar(winwidth(0),1) |
| :call DoRecordScreen() |
| :" |
| :let g:test ="Test 6: Screenattributes for comment" |
| :$put =g:test |
| :call append('$', ' /* and some more */') |
| :exe "set ft=c ts=7 linebreak list listchars=nbsp:\u2423,tab:\u2595\u2014,trail:\u02d1,eol:\ub6" |
| :syntax on |
| :hi SpecialKey term=underline ctermfg=red guifg=red |
| :let attr=[] |
| :nnoremap <expr> GG ":let attr += ['".screenattr(screenrow(),screencol())."']\n" |
| :$ |
| :norm! zt0 |
| GGlGGlGGlGGlGGlGGlGGlGGlGGlGGl |
| :call append('$', ['ScreenAttributes for test6:']) |
| :if attr[0] != attr[1] && attr[1] != attr[3] && attr[3] != attr[5] |
| : call append('$', "Attribut 0 and 1 and 3 and 5 are different!") |
| :else |
| : call append('$', "Not all attributes are different") |
| :endif |
| :set cpo&vim linebreak selection=exclusive |
| :" |
| :let g:test ="Test 8: set linebreak with visual block mode and v_b_A and selection=exclusive and multibyte char" |
| :$put =g:test |
| Golong line: 40afoobar aTARGETÃ' at end |
| :exe "norm! $3B\<C-v>eAx\<Esc>" |
| :" |
| :let g:test ="Test 9: a multibyte sign and colorcolumn" |
| :let attr=[] |
| :let attr2=[] |
| :$put ='' |
| :$put ='a b c' |
| :$put ='a b c' |
| :set list nolinebreak cc=3 |
| :sign define foo text=uff0b |
| :sign place 1 name=foo line=50 buffer=2 |
| :norm! 2kztj |
| :let line1=line('.') |
| 0GGlGGlGGlGGl |
| :let line2=line('.') |
| :let attr2=attr |
| :let attr=[] |
| 0GGlGGlGGlGGl |
| :redraw! |
| :let line=ScreenChar(winwidth(0),3) |
| :call DoRecordScreen() |
| :" expected: attr[2] is different because of colorcolumn |
| :if attr[0] != attr2[0] || attr[1] != attr2[1] || attr[2] != attr2[2] |
| : call append('$', "Screen attributes are different!") |
| :else |
| : call append('$', "Screen attributes are the same!") |
| :endif |
| :%w! test.out |
| :qa! |
| ENDTEST |
| dummy text |