Mercurial > vim
comparison src/testdir/test_messages.vim @ 20168:be661435893a v8.2.0639
patch 8.2.0639: MS-Windows: messages test still fails
Commit: https://github.com/vim/vim/commit/49b2fb36ca94be14b98caf86420863d9bbe81a24
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Apr 25 17:13:56 2020 +0200
patch 8.2.0639: MS-Windows: messages test still fails
Problem: MS-Windows: messages test still fails.
Solution: Filter out the maintainer message.
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Sat, 25 Apr 2020 17:15:03 +0200 |
parents | c75be957c6fb |
children | ec0ace1ddc20 |
comparison
equal
deleted
inserted
replaced
20167:9396041b8f7b | 20168:be661435893a |
---|---|
1 " Tests for :messages, :echomsg, :echoerr | 1 " Tests for :messages, :echomsg, :echoerr |
2 | 2 |
3 source shared.vim | 3 source shared.vim |
4 source term_util.vim | 4 source term_util.vim |
5 | 5 |
6 function Test_messages() | 6 " Get all messages but drop the maintainer entry. |
7 func GetMessages() | |
8 redir => result | |
9 redraw | messages | |
10 redir END | |
11 let msg_list = split(result, "\n") | |
12 if msg_list->len() > 0 && msg_list[0] =~ 'Messages maintainer:' | |
13 return msg_list[1:] | |
14 endif | |
15 return msg_list | |
16 endfunc | |
17 | |
18 func Test_messages() | |
7 let oldmore = &more | 19 let oldmore = &more |
8 try | 20 try |
9 set nomore | 21 set nomore |
10 " Avoid the "message maintainer" line. | |
11 let $LANG = '' | |
12 let $LC_ALL = '' | |
13 let $LC_MESSAGES = '' | |
14 let $LC_COLLATE = '' | |
15 | 22 |
16 let arr = map(range(10), '"hello" . v:val') | 23 let arr = map(range(10), '"hello" . v:val') |
17 for s in arr | 24 for s in arr |
18 echomsg s | redraw | 25 echomsg s | redraw |
19 endfor | 26 endfor |
20 let result = '' | |
21 | 27 |
22 " get last two messages | 28 " get last two messages |
23 redir => result | 29 redir => result |
24 2messages | redraw | 30 2messages | redraw |
25 redir END | 31 redir END |
26 let msg_list = split(result, "\n") | 32 let msg_list = split(result, "\n") |
27 call assert_equal(["hello8", "hello9"], msg_list) | 33 call assert_equal(["hello8", "hello9"], msg_list) |
28 | 34 |
29 " clear messages without last one | 35 " clear messages without last one |
30 1messages clear | 36 1messages clear |
31 redir => result | 37 let msg_list = GetMessages() |
32 redraw | messages | |
33 redir END | |
34 let msg_list = split(result, "\n") | |
35 call assert_equal(['hello9'], msg_list) | 38 call assert_equal(['hello9'], msg_list) |
36 | 39 |
37 " clear all messages | 40 " clear all messages |
38 messages clear | 41 messages clear |
39 redir => result | 42 let msg_list = GetMessages() |
40 redraw | messages | 43 call assert_equal([], msg_list) |
41 redir END | |
42 call assert_equal('', result) | |
43 finally | 44 finally |
44 let &more = oldmore | 45 let &more = oldmore |
45 endtry | 46 endtry |
46 | 47 |
47 call assert_fails('message 1', 'E474:') | 48 call assert_fails('message 1', 'E474:') |
48 endfunction | 49 endfunc |
49 | 50 |
50 " Patch 7.4.1696 defined the "clearmode()" function for clearing the mode | 51 " Patch 7.4.1696 defined the "clearmode()" function for clearing the mode |
51 " indicator (e.g., "-- INSERT --") when ":stopinsert" is invoked. Message | 52 " indicator (e.g., "-- INSERT --") when ":stopinsert" is invoked. Message |
52 " output could then be disturbed when 'cmdheight' was greater than one. | 53 " output could then be disturbed when 'cmdheight' was greater than one. |
53 " This test ensures that the bugfix for this issue remains in place. | 54 " This test ensures that the bugfix for this issue remains in place. |