Mercurial > vim

annotate src/testdir/test_messages.vim @ 19784:39dbaf2eec63

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added tag v8.2.0448 for changeset 546bdeef35f1bb55bbccccad3ee5fecee677d08b
author Bram Moolenaar <Bram@vim.org>
date Wed, 25 Mar 2020 22:30:04 +0100
parents c9cc9e5c87e0
children c087099e9163
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
15219
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
1 " Tests for :messages, :echomsg, :echoerr
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
16368
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
3 source shared.vim
18983
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
4 source term_util.vim
16368
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
5
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 function Test_messages()
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 let oldmore = &more
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 try
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 set nomore
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
10 " Avoid the "message maintainer" line.
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
11 let $LANG = ''
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 let arr = map(range(10), '"hello" . v:val')
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 for s in arr
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 echomsg s | redraw
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 endfor
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 let result = ''
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
19 " get last two messages
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 redir => result
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 2messages | redraw
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 redir END
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
23 let msg_list = split(result, "\n")
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
24 call assert_equal(["hello8", "hello9"], msg_list)
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 " clear messages without last one
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 1messages clear
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 redir => result
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
29 redraw | messages
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 redir END
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
31 let msg_list = split(result, "\n")
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
32 call assert_equal(['hello9'], msg_list)
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 " clear all messages
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 messages clear
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 redir => result
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
37 redraw | messages
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38 redir END
8905
9200836eee15 commit https://github.com/vim/vim/commit/bea1ede1c59a11ca5bf9d91cd30b7b2937b9fb41
Christian Brabandt <cb@256bit.org>
parents: 8897
diff changeset
39 call assert_equal('', result)
8897
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 finally
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 let &more = oldmore
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 endtry
a410390e340b commit https://github.com/vim/vim/commit/451f849fd6282a4facd4f0f58af62837443fb5a6
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 endfunction
13968
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
44
14202
51693b1a640e patch 8.1.0118: duplicate error message for put command
Christian Brabandt <cb@256bit.org>
parents: 13968
diff changeset
45 " Patch 7.4.1696 defined the "clearmode()" function for clearing the mode
13968
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
46 " indicator (e.g., "-- INSERT --") when ":stopinsert" is invoked. Message
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
47 " output could then be disturbed when 'cmdheight' was greater than one.
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
48 " This test ensures that the bugfix for this issue remains in place.
15406
63b02fcf1361 patch 8.1.0711: test files still use function!
Bram Moolenaar <Bram@vim.org>
parents: 15219
diff changeset
49 func Test_stopinsert_does_not_break_message_output()
13968
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
50 set cmdheight=2
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
51 redraw!
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
52
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
53 stopinsert | echo 'test echo'
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
54 call assert_equal(116, screenchar(&lines - 1, 1))
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
55 call assert_equal(32, screenchar(&lines, 1))
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
56 redraw!
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
57
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
58 stopinsert | echomsg 'test echomsg'
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
59 call assert_equal(116, screenchar(&lines - 1, 1))
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
60 call assert_equal(32, screenchar(&lines, 1))
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
61 redraw!
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
62
d111462e0173 patch 8.1.0002: :stopinsert changes the message position
Christian Brabandt <cb@256bit.org>
parents: 8905
diff changeset
63 set cmdheight&
15406
63b02fcf1361 patch 8.1.0711: test files still use function!
Bram Moolenaar <Bram@vim.org>
parents: 15219
diff changeset
64 endfunc
15097
1946487c74ba patch 8.1.0559: command line completion not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 14202
diff changeset
65
1946487c74ba patch 8.1.0559: command line completion not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 14202
diff changeset
66 func Test_message_completion()
1946487c74ba patch 8.1.0559: command line completion not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 14202
diff changeset
67 call feedkeys(":message \<C-A>\<C-B>\"\<CR>", 'tx')
1946487c74ba patch 8.1.0559: command line completion not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 14202
diff changeset
68 call assert_equal('"message clear', @:)
1946487c74ba patch 8.1.0559: command line completion not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 14202
diff changeset
69 endfunc
15219
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
70
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
71 func Test_echomsg()
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
72 call assert_equal("\nhello", execute(':echomsg "hello"'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
73 call assert_equal("\n", execute(':echomsg ""'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
74 call assert_equal("\n12345", execute(':echomsg 12345'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
75 call assert_equal("\n[]", execute(':echomsg []'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
76 call assert_equal("\n[1, 2, 3]", execute(':echomsg [1, 2, 3]'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
77 call assert_equal("\n{}", execute(':echomsg {}'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
78 call assert_equal("\n{'a': 1, 'b': 2}", execute(':echomsg {"a": 1, "b": 2}'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
79 if has('float')
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
80 call assert_equal("\n1.23", execute(':echomsg 1.23'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
81 endif
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
82 call assert_match("function('<lambda>\\d*')", execute(':echomsg {-> 1234}'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
83 endfunc
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
84
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
85 func Test_echoerr()
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
86 call test_ignore_error('IgNoRe')
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
87 call assert_equal("\nIgNoRe hello", execute(':echoerr "IgNoRe hello"'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
88 call assert_equal("\n12345 IgNoRe", execute(':echoerr 12345 "IgNoRe"'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
89 call assert_equal("\n[1, 2, 'IgNoRe']", execute(':echoerr [1, 2, "IgNoRe"]'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
90 call assert_equal("\n{'IgNoRe': 2, 'a': 1}", execute(':echoerr {"a": 1, "IgNoRe": 2}'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
91 if has('float')
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
92 call assert_equal("\n1.23 IgNoRe", execute(':echoerr 1.23 "IgNoRe"'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
93 endif
18031
8a2fb21c23c0 patch 8.1.2011: more functions can be used as methods
Bram Moolenaar <Bram@vim.org>
parents: 17833
diff changeset
94 eval '<lambda>'->test_ignore_error()
15219
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
95 call assert_match("function('<lambda>\\d*')", execute(':echoerr {-> 1234}'))
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
96 call test_ignore_error('RESET')
dada0b389d4f patch 8.1.0619: :echomsg and :echoerr do not handle List and Dict
Bram Moolenaar <Bram@vim.org>
parents: 15097
diff changeset
97 endfunc
16368
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
98
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
99 func Test_mode_message_at_leaving_insert_by_ctrl_c()
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
100 if !has('terminal') || has('gui_running')
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
101 return
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
102 endif
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
103
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
104 " Set custom statusline built by user-defined function.
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
105 let testfile = 'Xtest.vim'
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
106 let lines =<< trim END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
107 func StatusLine() abort
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
108 return ""
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
109 endfunc
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
110 set statusline=%!StatusLine()
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
111 set laststatus=2
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
112 END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
113 call writefile(lines, testfile)
16368
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
114
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
115 let rows = 10
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
116 let buf = term_start([GetVimProg(), '--clean', '-S', testfile], {'term_rows': rows})
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
117 call term_wait(buf, 200)
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
118 call assert_equal('run', job_status(term_getjob(buf)))
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
119
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
120 call term_sendkeys(buf, "i")
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
121 call WaitForAssert({-> assert_match('^-- INSERT --\s*$', term_getline(buf, rows))})
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
122 call term_sendkeys(buf, "\<C-C>")
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
123 call WaitForAssert({-> assert_match('^\s*$', term_getline(buf, rows))})
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
124
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
125 call term_sendkeys(buf, ":qall!\<CR>")
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
126 call WaitForAssert({-> assert_equal('dead', job_status(term_getjob(buf)))})
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
127 exe buf . 'bwipe!'
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
128 call delete(testfile)
a3b5cbd2effe patch 8.1.1189: mode is not cleared when leaving Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 15406
diff changeset
129 endfunc
16374
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
130
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
131 func Test_mode_message_at_leaving_insert_with_esc_mapped()
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
132 if !has('terminal') || has('gui_running')
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
133 return
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
134 endif
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
135
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
136 " Set custom statusline built by user-defined function.
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
137 let testfile = 'Xtest.vim'
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
138 let lines =<< trim END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
139 set laststatus=2
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
140 inoremap <Esc> <Esc>00
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
141 END
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16374
diff changeset
142 call writefile(lines, testfile)
16374
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
143
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
144 let rows = 10
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
145 let buf = term_start([GetVimProg(), '--clean', '-S', testfile], {'term_rows': rows})
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
146 call term_wait(buf, 200)
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
147 call assert_equal('run', job_status(term_getjob(buf)))
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
148
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
149 call term_sendkeys(buf, "i")
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
150 call WaitForAssert({-> assert_match('^-- INSERT --\s*$', term_getline(buf, rows))})
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
151 call term_sendkeys(buf, "\<Esc>")
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
152 call WaitForAssert({-> assert_match('^\s*$', term_getline(buf, rows))})
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
153
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
154 call term_sendkeys(buf, ":qall!\<CR>")
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
155 call WaitForAssert({-> assert_equal('dead', job_status(term_getjob(buf)))})
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
156 exe buf . 'bwipe!'
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
157 call delete(testfile)
57c37c17ff9d patch 8.1.1192: mode is not cleared when leaving Insert mode with mapped Esc
Bram Moolenaar <Bram@vim.org>
parents: 16368
diff changeset
158 endfunc
17833
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
159
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
160 func Test_echospace()
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
161 set noruler noshowcmd laststatus=1
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
162 call assert_equal(&columns - 1, v:echospace)
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
163 split
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
164 call assert_equal(&columns - 1, v:echospace)
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
165 set ruler
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
166 call assert_equal(&columns - 1, v:echospace)
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
167 close
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
168 call assert_equal(&columns - 19, v:echospace)
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
169 set showcmd noruler
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
170 call assert_equal(&columns - 12, v:echospace)
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
171 set showcmd ruler
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
172 call assert_equal(&columns - 29, v:echospace)
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
173
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
174 set ruler& showcmd&
8377ec7c5824 patch 8.1.1913: not easy to compute the space on the command line
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
175 endfunc
18983
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
176
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
177 " Test more-prompt (see :help more-prompt).
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
178 func Test_message_more()
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
179 if !CanRunVimInTerminal()
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
180 throw 'Skipped: cannot run vim in terminal'
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
181 endif
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
182 let buf = RunVimInTerminal('', {'rows': 6})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
183 call term_sendkeys(buf, ":call setline(1, range(1, 100))\n")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
184
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
185 call term_sendkeys(buf, ":%p#\n")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
186 call WaitForAssert({-> assert_equal(' 5 5', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
187 call WaitForAssert({-> assert_equal('-- More --', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
188
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
189 call term_sendkeys(buf, '?')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
190 call WaitForAssert({-> assert_equal(' 5 5', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
191 call WaitForAssert({-> assert_equal('-- More -- SPACE/d/j: screen/page/line down, b/u/k: up, q: quit ', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
192
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
193 " Down a line with j, <CR>, <NL> or <Down>.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
194 call term_sendkeys(buf, "j")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
195 call WaitForAssert({-> assert_equal(' 6 6', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
196 call WaitForAssert({-> assert_equal('-- More --', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
197 call term_sendkeys(buf, "\<NL>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
198 call WaitForAssert({-> assert_equal(' 7 7', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
199 call term_sendkeys(buf, "\<CR>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
200 call WaitForAssert({-> assert_equal(' 8 8', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
201 call term_sendkeys(buf, "\<Down>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
202 call WaitForAssert({-> assert_equal(' 9 9', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
203
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
204 " Down a screen with <Space>, f, or <PageDown>.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
205 call term_sendkeys(buf, 'f')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
206 call WaitForAssert({-> assert_equal(' 14 14', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
207 call WaitForAssert({-> assert_equal('-- More --', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
208 call term_sendkeys(buf, ' ')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
209 call WaitForAssert({-> assert_equal(' 19 19', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
210 call term_sendkeys(buf, "\<PageDown>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
211 call WaitForAssert({-> assert_equal(' 24 24', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
212
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
213 " Down a page (half a screen) with d.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
214 call term_sendkeys(buf, 'd')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
215 call WaitForAssert({-> assert_equal(' 27 27', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
216
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
217 " Down all the way with 'G'.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
218 call term_sendkeys(buf, 'G')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
219 call WaitForAssert({-> assert_equal('100 100', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
220 call WaitForAssert({-> assert_equal('Press ENTER or type command to continue', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
221
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
222 " Up a line k, <BS> or <Up>.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
223 call term_sendkeys(buf, 'k')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
224 call WaitForAssert({-> assert_equal(' 99 99', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
225 call term_sendkeys(buf, "\<BS>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
226 call WaitForAssert({-> assert_equal(' 98 98', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
227 call term_sendkeys(buf, "\<Up>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
228 call WaitForAssert({-> assert_equal(' 97 97', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
229
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
230 " Up a screen with b or <PageUp>.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
231 call term_sendkeys(buf, 'b')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
232 call WaitForAssert({-> assert_equal(' 92 92', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
233 call term_sendkeys(buf, "\<PageUp>")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
234 call WaitForAssert({-> assert_equal(' 87 87', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
235
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
236 " Up a page (half a screen) with u.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
237 call term_sendkeys(buf, 'u')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
238 call WaitForAssert({-> assert_equal(' 84 84', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
239
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
240 " Up all the way with 'g'.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
241 call term_sendkeys(buf, 'g')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
242 call WaitForAssert({-> assert_equal(' 5 5', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
243 call WaitForAssert({-> assert_equal('-- More --', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
244
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
245 " All the way down. Pressing f should do nothing but pressing
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
246 " space should end the more prompt.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
247 call term_sendkeys(buf, 'G')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
248 call WaitForAssert({-> assert_equal('100 100', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
249 call WaitForAssert({-> assert_equal('Press ENTER or type command to continue', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
250 call term_sendkeys(buf, 'f')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
251 call WaitForAssert({-> assert_equal('100 100', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
252 call term_sendkeys(buf, ' ')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
253 call WaitForAssert({-> assert_equal('100', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
254
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
255 " Pressing g< shows the previous command output.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
256 call term_sendkeys(buf, 'g<')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
257 call WaitForAssert({-> assert_equal('100 100', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
258 call WaitForAssert({-> assert_equal('Press ENTER or type command to continue', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
259
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
260 call term_sendkeys(buf, ":%p#\n")
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
261 call WaitForAssert({-> assert_equal(' 5 5', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
262 call WaitForAssert({-> assert_equal('-- More --', term_getline(buf, 6))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
263
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
264 " Stop command output with q, <Esc> or CTRL-C.
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
265 call term_sendkeys(buf, 'q')
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
266 call WaitForAssert({-> assert_equal('100', term_getline(buf, 5))})
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
267
19279
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
268 call StopVimInTerminal(buf)
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
269 endfunc
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
270
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
271 func Test_ask_yesno()
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
272 if !CanRunVimInTerminal()
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
273 throw 'Skipped: cannot run vim in terminal'
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
274 endif
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
275 let buf = RunVimInTerminal('', {'rows': 6})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
276 call term_sendkeys(buf, ":call setline(1, range(1, 2))\n")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
277
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
278 call term_sendkeys(buf, ":2,1s/^/n/\n")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
279 call WaitForAssert({-> assert_equal('Backwards range given, OK to swap (y/n)?', term_getline(buf, 6))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
280 call term_sendkeys(buf, "n")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
281 call WaitForAssert({-> assert_match('^Backwards range given, OK to swap (y/n)?n *1,1 *All$', term_getline(buf, 6))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
282 call WaitForAssert({-> assert_equal('1', term_getline(buf, 1))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
283
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
284 call term_sendkeys(buf, ":2,1s/^/Esc/\n")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
285 call WaitForAssert({-> assert_equal('Backwards range given, OK to swap (y/n)?', term_getline(buf, 6))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
286 call term_sendkeys(buf, "\<Esc>")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
287 call WaitForAssert({-> assert_match('^Backwards range given, OK to swap (y/n)?n *1,1 *All$', term_getline(buf, 6))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
288 call WaitForAssert({-> assert_equal('1', term_getline(buf, 1))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
289
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
290 call term_sendkeys(buf, ":2,1s/^/y/\n")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
291 call WaitForAssert({-> assert_equal('Backwards range given, OK to swap (y/n)?', term_getline(buf, 6))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
292 call term_sendkeys(buf, "y")
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
293 call WaitForAssert({-> assert_match('^Backwards range given, OK to swap (y/n)?y *2,1 *All$', term_getline(buf, 6))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
294 call WaitForAssert({-> assert_equal('y1', term_getline(buf, 1))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
295 call WaitForAssert({-> assert_equal('y2', term_getline(buf, 2))})
25cb7ab433c6 patch 8.2.0198: no tests for y/n prompt
Bram Moolenaar <Bram@vim.org>
parents: 19083
diff changeset
296
18983
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
297 call StopVimInTerminal(buf)
54baf548bff9 patch 8.2.0052: more-prompt not properly tested
Bram Moolenaar <Bram@vim.org>
parents: 18031
diff changeset
298 endfunc
19081
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
299
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
300 func Test_null()
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
301 echom test_null_list()
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
302 echom test_null_dict()
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
303 echom test_null_blob()
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
304 echom test_null_string()
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
305 echom test_null_partial()
19083
82410cbaa042 patch 8.2.0102: messages test fails in small version
Bram Moolenaar <Bram@vim.org>
parents: 19081
diff changeset
306 if has('job')
82410cbaa042 patch 8.2.0102: messages test fails in small version
Bram Moolenaar <Bram@vim.org>
parents: 19081
diff changeset
307 echom test_null_job()
82410cbaa042 patch 8.2.0102: messages test fails in small version
Bram Moolenaar <Bram@vim.org>
parents: 19081
diff changeset
308 echom test_null_channel()
82410cbaa042 patch 8.2.0102: messages test fails in small version
Bram Moolenaar <Bram@vim.org>
parents: 19081
diff changeset
309 endif
19081
3b1f83fdaabc patch 8.2.0101: crash when passing null object to ":echomsg"
Bram Moolenaar <Bram@vim.org>
parents: 18983
diff changeset
310 endfunc