Mercurial > vim
view src/testdir/test_messages.vim @ 9788:3fdf6caf42f7 v7.4.2169
commit https://github.com/vim/vim/commit/446cce6d537b036467033975a86729dbdc83f860
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Aug 6 21:37:27 2016 +0200
patch 7.4.2169
Problem: Startup test gets stuck on MS-Windows.
Solution: Use double quotes.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sat, 06 Aug 2016 21:45:05 +0200 |
parents | 9200836eee15 |
children | d111462e0173 |
line wrap: on
line source
" Tests for :messages function Test_messages() let oldmore = &more try set nomore " Avoid the "message maintainer" line. let $LANG = '' let arr = map(range(10), '"hello" . v:val') for s in arr echomsg s | redraw endfor let result = '' " get last two messages redir => result 2messages | redraw redir END let msg_list = split(result, "\n") call assert_equal(["hello8", "hello9"], msg_list) " clear messages without last one 1messages clear redir => result redraw | messages redir END let msg_list = split(result, "\n") call assert_equal(['hello9'], msg_list) " clear all messages messages clear redir => result redraw | messages redir END call assert_equal('', result) finally let &more = oldmore endtry endfunction