view src/testdir/test_display.vim @ 10470:232a0d1d8f24 v8.0.0128

commit https://github.com/vim/vim/commit/7089237885218eb8a19805bc2b75481c4efcd6ba Author: Bram Moolenaar <Bram@vim.org> Date: Fri Dec 9 19:51:49 2016 +0100 patch 8.0.0128 Problem: Display test fails on MS-Windows. Solution: Set 'isprint' to "@".
author Christian Brabandt <cb@256bit.org>
date Fri, 09 Dec 2016 20:00:05 +0100
parents 34b50194f82d
children b25895ab67be
line wrap: on
line source

" Test for displaying stuff
if !has('gui_running') && has('unix')
  set term=ansi
endif

function! s:screenline(lnum, nr) abort
  let line = []
  for j in range(a:nr)
    for c in range(1, winwidth(0))
        call add(line, nr2char(screenchar(a:lnum+j, c)))
    endfor
    call add(line, "\n")
  endfor
  return join(line, '')
endfunction

function! Test_display_foldcolumn()
  new
  vnew
  vert resize 25
  call assert_equal(25, winwidth(winnr()))
  set isprint=@

  1put='e more noise blah blah‚ more stuff here'

  let expect = "e more noise blah blah<82\n> more stuff here        \n"

  call cursor(2, 1)
  norm! zt
  redraw!
  call assert_equal(expect, s:screenline(1,2))
  set fdc=2
  redraw!
  let expect = "  e more noise blah blah<\n  82> more stuff here    \n"
  call assert_equal(expect, s:screenline(1,2))

  quit!
  quit!
endfunction