6062
|
1 Test for linebreak and list option in utf-8 mode
|
|
2
|
|
3 STARTTEST
|
|
4 :so small.vim
|
|
5 :if !exists("+linebreak") | e! test.ok | w! test.out | qa! | endif
|
|
6 :so mbyte.vim
|
|
7 :if &enc !=? 'utf-8'|:e! test.ok|:w! test.out|qa!|endif
|
|
8 :10new|:vsp|:vert resize 20
|
|
9 :put =\"\tabcdef hijklmn\tpqrstuvwxyz\u00a01060ABCDEFGHIJKLMNOP \"
|
|
10 :norm! zt
|
|
11 :set ts=4 sw=4 sts=4 linebreak sbr=+ wrap
|
|
12 :fu! ScreenChar(width)
|
|
13 : let c=''
|
|
14 : for j in range(1,4)
|
|
15 : for i in range(1,a:width)
|
|
16 : let c.=nr2char(screenchar(j, i))
|
|
17 : endfor
|
|
18 : let c.="\n"
|
|
19 : endfor
|
|
20 : return c
|
|
21 :endfu
|
|
22 :fu! DoRecordScreen()
|
|
23 : wincmd l
|
|
24 : $put =printf(\"\n%s\", g:test)
|
|
25 : $put =g:line
|
|
26 : wincmd p
|
|
27 :endfu
|
|
28 :let g:test ="Test 1: set linebreak + set list + fancy listchars"
|
|
29 :exe "set linebreak list listchars=nbsp:\u2423,tab:\u2595\u2014,trail:\u02d1,eol:\ub6"
|
|
30 :redraw!
|
|
31 :let line=ScreenChar(winwidth(0))
|
|
32 :call DoRecordScreen()
|
6100
|
33 :"
|
6062
|
34 :let g:test ="Test 2: set nolinebreak list"
|
|
35 :set list nolinebreak
|
|
36 :redraw!
|
|
37 :let line=ScreenChar(winwidth(0))
|
|
38 :call DoRecordScreen()
|
6100
|
39 :"
|
|
40 :let g:test ="Test 3: set linebreak nolist"
|
|
41 :$put =\"\t*mask = nil;\"
|
|
42 :$
|
|
43 :norm! zt
|
|
44 :set nolist linebreak
|
|
45 :redraw!
|
|
46 :let line=ScreenChar(winwidth(0))
|
|
47 :call DoRecordScreen()
|
|
48 :"
|
6062
|
49 :%w! test.out
|
|
50 :qa!
|
|
51 ENDTEST
|
|
52 dummy text
|