view src/testdir/test_display.vim @ 10694:fa6c4825a1c4 v8.0.0237

patch 8.0.0237: when 'wildoptions' is "tagfile" completion may not work commit https://github.com/vim/vim/commit/ba47b51ff88d91c9bb5aa522183e23a656865697 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Jan 24 21:18:19 2017 +0100 patch 8.0.0237: when 'wildoptions' is "tagfile" completion may not work Problem: When setting wildoptions=tagfile the completion context is not set correctly. (desjardins) Solution: Check for EXPAND_TAGS_LISTFILES. (Christian Brabandt, closes #1399)
author Christian Brabandt <cb@256bit.org>
date Tue, 24 Jan 2017 21:30:04 +0100
parents 232a0d1d8f24
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