Mercurial > vim

view src/testdir/test_tabline.vim @ 13982:29bad8212db3 v8.1.0009

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.0009: tabpages insufficiently tested commit https://github.com/vim/vim/commit/dbe8869c41a3b3309207a434c17db295d358e873 Author: Bram Moolenaar <Bram@vim.org> Date: Sun May 20 14:57:22 2018 +0200 patch 8.1.0009: tabpages insufficiently tested Problem: Tabpages insufficiently tested. Solution: Add more test coverage. (Dominique Pelle, closes https://github.com/vim/vim/issues/2934)
author Christian Brabandt <cb@256bit.org>
date Sun, 20 May 2018 15:00:06 +0200
parents ccab37bb9ac9
children 325e4a8ba1b6
line wrap: on
line source

function! TablineWithCaughtError()
  let s:func_in_tabline_called = 1
  try
    call eval('unknown expression')
  catch
  endtry
  return ''
endfunction

function! TablineWithError()
  let s:func_in_tabline_called = 1
  call eval('unknown expression')
  return ''
endfunction

function! Test_caught_error_in_tabline()
  if has('gui')
    set guioptions-=e
  endif
  let showtabline_save = &showtabline
  set showtabline=2
  let s:func_in_tabline_called = 0
  let tabline = '%{TablineWithCaughtError()}'
  let &tabline = tabline
  redraw!
  call assert_true(s:func_in_tabline_called)
  call assert_equal(tabline, &tabline)
  set tabline=
  let &showtabline = showtabline_save
endfunction

function! Test_tabline_will_be_disabled_with_error()
  if has('gui')
    set guioptions-=e
  endif
  let showtabline_save = &showtabline
  set showtabline=2
  let s:func_in_tabline_called = 0
  let tabline = '%{TablineWithError()}'
  try
    let &tabline = tabline
    redraw!
  catch
  endtry
  call assert_true(s:func_in_tabline_called)
  call assert_equal('', &tabline)
  set tabline=
  let &showtabline = showtabline_save
endfunction