Merge #2821 'test: migrate legacy test breakindent'

1 files changed, 211 insertions, 0 deletions

diff --git a/test/functional/legacy/breakindent_spec.lua b/test/functional/legacy/breakindent_spec.lua
new file mode 100644
index 0000000000..a12d4add10
--- /dev/null
+++ b/test/functional/legacy/breakindent_spec.lua
@@ -0,0 +1,211 @@
+-- Test for breakindent
+
+local helpers = require('test.functional.helpers')
+local feed, insert = helpers.feed, helpers.insert
+local clear, execute, expect = helpers.clear, helpers.execute, helpers.expect
+
+describe('breakindent', function()
+  setup(clear)
+
+  it('is working', function()
+    insert('dummy text')
+
+    execute('set wildchar=^E')
+    execute('10new')
+    execute('vsp')
+    execute('vert resize 20')
+    execute([[put =\"\tabcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOP\"]])
+    execute('set ts=4 sw=4 sts=4 breakindent')
+    execute('fu! ScreenChar(line, width)')
+    execute('	let c=""')
+    execute('	for i in range(1,a:width)')
+    execute('		let c.=nr2char(screenchar(a:line, i))')
+    execute('	endfor')
+    execute([[       let c.="\n"]])
+    execute('	for i in range(1,a:width)')
+    execute('		let c.=nr2char(screenchar(a:line+1, i))')
+    execute('	endfor')
+    execute([[       let c.="\n"]])
+    execute('	for i in range(1,a:width)')
+    execute('		let c.=nr2char(screenchar(a:line+2, i))')
+    execute('	endfor')
+    execute('	return c')
+    execute('endfu')
+    execute('fu DoRecordScreen()')
+    execute('	wincmd l')
+    execute([[	$put =printf(\"\n%s\", g:test)]])
+    execute('	$put =g:line1')
+    execute('	wincmd p')
+    execute('endfu')
+    execute('set briopt=min:0')
+    execute('let g:test="Test 1: Simple breakindent"')
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+    execute('let g:test="Test 2: Simple breakindent + sbr=>>"')
+    execute('set sbr=>>')
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+    execute('let g:test ="Test 3: Simple breakindent + briopt:sbr"')
+    execute('set briopt=sbr,min:0 sbr=++')
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+    execute('let g:test ="Test 4: Simple breakindent + min width: 18"')
+    execute('set sbr= briopt=min:18')
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+    execute('let g:test =" Test 5: Simple breakindent + shift by 2"')
+    execute('set briopt=shift:2,min:0')
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+    execute('let g:test=" Test 6: Simple breakindent + shift by -1"')
+    execute('set briopt=shift:-1,min:0')
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+    execute('let g:test=" Test 7: breakindent + shift by +1 + nu + sbr=? briopt:sbr"')
+    execute('set briopt=shift:1,sbr,min:0 nu sbr=? nuw=4')
+    execute('let line1=ScreenChar(line("."),10)')
+    execute('call DoRecordScreen()')
+    execute('let g:test=" Test 8: breakindent + shift:1 + nu + sbr=# list briopt:sbr"')
+    execute('set briopt=shift:1,sbr,min:0 nu sbr=# list lcs&vi')
+    execute('let line1=ScreenChar(line("."),10)')
+    execute('call DoRecordScreen()')
+    execute([[let g:test=" Test 9: breakindent + shift by +1 + 'nu' + sbr=# list"]])
+    execute('set briopt-=sbr')
+    execute('let line1=ScreenChar(line("."),10)')
+    execute('call DoRecordScreen()')
+    execute([[let g:test=" Test 10: breakindent + shift by +1 + 'nu' + sbr=~ cpo+=n"]])
+    execute('set cpo+=n sbr=~ nu nuw=4 nolist briopt=sbr,min:0')
+    execute('let line1=ScreenChar(line("."),10)')
+    execute('call DoRecordScreen()')
+    execute('wincmd p')
+    execute([[let g:test="\n Test 11: strdisplaywidth when breakindent is on"]])
+    execute('set cpo-=n sbr=>> nu nuw=4 nolist briopt= ts=4')
+    -- Skip leading tab when calculating text width.
+    execute('let text=getline(2)')
+    -- Text wraps 3 times.
+    execute('let width = strlen(text[1:])+indent(2)*4+strlen(&sbr)*3')
+    execute('$put =g:test')
+    execute([[$put =printf(\"strdisplaywidth: %d == calculated: %d\", strdisplaywidth(text), width)]])
+    execute([[let g:str="\t\t\t\t\t{"]])
+    execute('let g:test=" Test 12: breakindent + long indent"')
+    execute('wincmd p')
+    execute('set all& breakindent linebreak briopt=min:10 nu numberwidth=3 ts=4')
+    execute('$put =g:str')
+    feed('zt')
+    execute('let line1=ScreenChar(1,10)')
+    execute('wincmd p')
+    execute('call DoRecordScreen()')
+
+    -- Test, that the string "    a\tb\tc\td\te" is correctly displayed in a
+    -- 20 column wide window (see bug report
+    -- https://groups.google.com/d/msg/vim_dev/ZOdg2mc9c9Y/TT8EhFjEy0IJ ).
+    execute('only')
+    execute('vert 20new')
+    execute('set all& breakindent briopt=min:10')
+    execute([[call setline(1, ["    a\tb\tc\td\te", "    z   y       x       w       v"])]])
+    execute([[/^\s*a]])
+    feed('fbgjyl')
+    execute('let line1 = @0')
+    execute([[?^\s*z]])
+    feed('fygjyl')
+    execute('let line2 = @0')
+    execute('quit!')
+    execute([[$put ='Test 13: breakindent with wrapping Tab']])
+    execute('$put =line1')
+    execute('$put =line2')
+
+    execute('let g:test="Test 14: breakindent + visual blockwise delete #1"')
+    execute('set all& breakindent shada+=nX-test-breakindent.shada')
+    execute('30vnew')
+    execute('normal! 3a1234567890')
+    execute('normal! a    abcde')
+    execute([[exec "normal! 0\<C-V>tex"]])
+    execute('let line1=ScreenChar(line("."),8)')
+    execute('call DoRecordScreen()')
+
+    execute('let g:test="Test 15: breakindent + visual blockwise delete #2"')
+    execute('%d')
+    execute('normal! 4a1234567890')
+    execute([[exec "normal! >>\<C-V>3f0x"]])
+    execute('let line1=ScreenChar(line("."),20)')
+    execute('call DoRecordScreen()')
+    execute('quit!')
+
+    -- Assert buffer contents.
+    expect([[
+      
+      	abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOP
+      
+      Test 1: Simple breakindent
+          abcd
+          qrst
+          GHIJ
+      
+      Test 2: Simple breakindent + sbr=>>
+          abcd
+          >>qr
+          >>EF
+      
+      Test 3: Simple breakindent + briopt:sbr
+          abcd
+      ++  qrst
+      ++  GHIJ
+      
+      Test 4: Simple breakindent + min width: 18
+          abcd
+        qrstuv
+        IJKLMN
+      
+       Test 5: Simple breakindent + shift by 2
+          abcd
+            qr
+            EF
+      
+       Test 6: Simple breakindent + shift by -1
+          abcd
+         qrstu
+         HIJKL
+      
+       Test 7: breakindent + shift by +1 + nu + sbr=? briopt:sbr
+        2     ab
+          ?    m
+          ?    x
+      
+       Test 8: breakindent + shift:1 + nu + sbr=# list briopt:sbr
+        2 ^Iabcd
+          #  opq
+          #  BCD
+      
+       Test 9: breakindent + shift by +1 + 'nu' + sbr=# list
+        2 ^Iabcd
+             #op
+             #AB
+      
+       Test 10: breakindent + shift by +1 + 'nu' + sbr=~ cpo+=n
+        2     ab
+      ~       mn
+      ~       yz
+      
+       Test 11: strdisplaywidth when breakindent is on
+      strdisplaywidth: 46 == calculated: 64
+      					{
+      
+       Test 12: breakindent + long indent
+      56        
+                
+      ~         
+      Test 13: breakindent with wrapping Tab
+      d
+      w
+      
+      Test 14: breakindent + visual blockwise delete #1
+      e       
+      ~       
+      ~       
+      
+      Test 15: breakindent + visual blockwise delete #2
+              1234567890  
+      ~                   
+      ~                   ]])
+  end)
+end)