mirror of
https://github.com/neovim/neovim.git
synced 2024-12-22 20:25:16 -07:00
909b7d9dea
Problem: Messages test fails on MS-Windows.
Solution: Adjust the asserts. Skip the "messages maintainer" line if not
showing all messages
bea1ede1c5
41 lines
842 B
VimL
41 lines
842 B
VimL
" 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
|