vim: src/testdir/test_popupwin.vim annotate

annotate src/testdir/test_popupwin.vim @ 17151:ebe9aab81898 v8.1.1575

patch 8.1.1575: callbacks may be garbage collected commit https://github.com/vim/vim/commit/75a1a9415b9c207de5a29b25c0d1949c6c9c5c61 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Jun 20 03:45:36 2019 +0200 patch 8.1.1575: callbacks may be garbage collected Problem: Callbacks may be garbage collected. Solution: Set reference in callbacks. (Ozaki Kiichi, closes https://github.com/vim/vim/issues/4564)

author	Bram Moolenaar <Bram@vim.org>
date	Thu, 20 Jun 2019 04:00:07 +0200
parents	c90fdb999393
children	6990c1160ea5

rev	line source
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 " Tests for popup windows
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	2
17089 8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 17077 diff changeset	3 source check.vim
8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 17077 diff changeset	4 CheckFeature textprop
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	5
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 source screendump.vim
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	7
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 func Test_simple_popup()
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	9 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	10 throw 'Skipped: cannot make screendumps'
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 endif
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 call writefile([
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	13 \ "call setline(1, range(1, 100))",
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	14 \ "hi PopupColor1 ctermbg=lightblue",
306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	15 \ "hi PopupColor2 ctermbg=lightcyan",
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	16 \ "hi Comment ctermfg=red",
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	17 \ "call prop_type_add('comment', {'highlight': 'Comment'})",
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	18 \ "let winid = popup_create('hello there', {'line': 3, 'col': 11, 'minwidth': 20, 'highlight': 'PopupColor1'})",
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	19 \ "let winid2 = popup_create(['another one', 'another two', 'another three'], {'line': 3, 'col': 25, 'minwidth': 20})",
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	20 \ "call setwinvar(winid2, '&wincolor', 'PopupColor2')",
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 \], 'XtestPopup')
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 let buf = RunVimInTerminal('-S XtestPopup', {'rows': 10})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 call VerifyScreenDump(buf, 'Test_popupwin_01', {})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	24
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	25 " Add a tabpage
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	26 call term_sendkeys(buf, ":tabnew\<CR>")
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	27 call term_sendkeys(buf, ":let popupwin = popup_create(["
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	28 \ .. "{'text': 'other tab'},"
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	29 \ .. "{'text': 'a comment line', 'props': [{"
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	30 \ .. "'col': 3, 'length': 7, 'minwidth': 20, 'type': 'comment'"
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	31 \ .. "}]},"
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	32 \ .. "], {'line': 4, 'col': 9, 'minwidth': 20})\<CR>")
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	33 call VerifyScreenDump(buf, 'Test_popupwin_02', {})
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	34
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	35 " switch back to first tabpage
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	36 call term_sendkeys(buf, "gt")
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	37 call VerifyScreenDump(buf, 'Test_popupwin_03', {})
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	38
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	39 " close that tabpage
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	40 call term_sendkeys(buf, ":quit!\<CR>")
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	41 call VerifyScreenDump(buf, 'Test_popupwin_04', {})
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	42
17037 9297877074a3 patch 8.1.1518: crash when setting 'columns' while a popup is visible Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	43 " set 'columns' to a small value, size must be recomputed
9297877074a3 patch 8.1.1518: crash when setting 'columns' while a popup is visible Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	44 call term_sendkeys(buf, ":let cols = &columns\<CR>")
9297877074a3 patch 8.1.1518: crash when setting 'columns' while a popup is visible Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	45 call term_sendkeys(buf, ":set columns=12\<CR>")
9297877074a3 patch 8.1.1518: crash when setting 'columns' while a popup is visible Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	46 call VerifyScreenDump(buf, 'Test_popupwin_04a', {})
9297877074a3 patch 8.1.1518: crash when setting 'columns' while a popup is visible Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	47 call term_sendkeys(buf, ":let &columns = cols\<CR>")
9297877074a3 patch 8.1.1518: crash when setting 'columns' while a popup is visible Bram Moolenaar <Bram@vim.org> parents: 17026 diff changeset	48
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	49 " resize popup, show empty line at bottom
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	50 call term_sendkeys(buf, ":call popup_move(popupwin, {'minwidth': 15, 'maxwidth': 25, 'minheight': 3, 'maxheight': 5})\<CR>")
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	51 call term_sendkeys(buf, ":redraw\<CR>")
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	52 call VerifyScreenDump(buf, 'Test_popupwin_05', {})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	53
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	54 " show not fitting line at bottom
032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	55 call term_sendkeys(buf, ":call setbufline(winbufnr(popupwin), 3, 'this line will not fit here')\<CR>")
032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	56 call term_sendkeys(buf, ":redraw\<CR>")
032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	57 call VerifyScreenDump(buf, 'Test_popupwin_06', {})
032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	58
16998 2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	59 " move popup over ruler
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	60 call term_sendkeys(buf, ":set cmdheight=2\<CR>")
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	61 call term_sendkeys(buf, ":call popup_move(popupwin, {'line': 7, 'col': 55})\<CR>")
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	62 call VerifyScreenDump(buf, 'Test_popupwin_07', {})
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	63
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	64 " clear all popups after moving the cursor a bit, so that ruler is updated
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	65 call term_sendkeys(buf, "axxx\<Esc>")
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	66 call term_wait(buf)
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	67 call term_sendkeys(buf, "0")
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	68 call term_wait(buf)
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	69 call term_sendkeys(buf, ":call popup_clear()\<CR>")
16998 2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	70 call VerifyScreenDump(buf, 'Test_popupwin_08', {})
2ec0f953ec3f patch 8.1.1499: ruler not updated after popup window was removed Bram Moolenaar <Bram@vim.org> parents: 16965 diff changeset	71
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 " clean up
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 call StopVimInTerminal(buf)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 call delete('XtestPopup')
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 endfunc
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	76
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	77 func Test_popup_with_border_and_padding()
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	78 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	79 throw 'Skipped: cannot make screendumps'
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	80 endif
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	81
16886 2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	82 for iter in range(0, 1)
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	83 call writefile([iter == 1 ? '' : 'set enc=latin1',
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	84 \ "call setline(1, range(1, 100))",
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	85 \ "call popup_create('hello border', {'line': 2, 'col': 3, 'border': []})",
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	86 \ "call popup_create('hello padding', {'line': 2, 'col': 23, 'padding': []})",
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	87 \ "call popup_create('hello both', {'line': 2, 'col': 43, 'border': [], 'padding': []})",
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	88 \ "call popup_create('border TL', {'line': 6, 'col': 3, 'border': [1, 0, 0, 4]})",
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	89 \ "call popup_create('paddings', {'line': 6, 'col': 23, 'padding': [1, 3, 2, 4]})",
17101 1a23650f8da5 patch 8.1.1550: when a popup has left padding text may be cut off Bram Moolenaar <Bram@vim.org> parents: 17097 diff changeset	90 \ "call popup_create('wrapped longer text', {'line': 8, 'col': 55, 'padding': [0, 3, 0, 3], 'border': [0, 1, 0, 1]})",
1a23650f8da5 patch 8.1.1550: when a popup has left padding text may be cut off Bram Moolenaar <Bram@vim.org> parents: 17097 diff changeset	91 \ "call popup_create('right aligned text', {'line': 11, 'col': 56, 'wrap': 0, 'padding': [0, 3, 0, 3], 'border': [0, 1, 0, 1]})",
16886 2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	92 \], 'XtestPopupBorder')
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	93 let buf = RunVimInTerminal('-S XtestPopupBorder', {'rows': 15})
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	94 call VerifyScreenDump(buf, 'Test_popupwin_2' .. iter, {})
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	95
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	96 call StopVimInTerminal(buf)
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	97 call delete('XtestPopupBorder')
2bd51fdcc793 patch 8.1.1444: not using double line characters for popup border Bram Moolenaar <Bram@vim.org> parents: 16884 diff changeset	98 endfor
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	99
16888 ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	100 call writefile([
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	101 \ "call setline(1, range(1, 100))",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	102 \ "hi BlueColor ctermbg=lightblue",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	103 \ "hi TopColor ctermbg=253",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	104 \ "hi RightColor ctermbg=245",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	105 \ "hi BottomColor ctermbg=240",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	106 \ "hi LeftColor ctermbg=248",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	107 \ "call popup_create('hello border', {'line': 2, 'col': 3, 'border': [], 'borderhighlight': ['BlueColor']})",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	108 \ "call popup_create(['hello border', 'and more'], {'line': 2, 'col': 23, 'border': [], 'borderhighlight': ['TopColor', 'RightColor', 'BottomColor', 'LeftColor']})",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	109 \ "call popup_create(['hello border', 'lines only'], {'line': 2, 'col': 43, 'border': [], 'borderhighlight': ['BlueColor'], 'borderchars': ['x']})",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	110 \ "call popup_create(['hello border', 'with corners'], {'line': 2, 'col': 60, 'border': [], 'borderhighlight': ['BlueColor'], 'borderchars': ['x', '#']})",
17125 b4eb06233448 patch 8.1.1562: popup window not always redrawn after popup_setoptions() Bram Moolenaar <Bram@vim.org> parents: 17123 diff changeset	111 \ "let winid = popup_create(['hello border', 'with numbers'], {'line': 6, 'col': 3, 'border': [], 'borderhighlight': ['BlueColor'], 'borderchars': ['0', '1', '2', '3', '4', '5', '6', '7']})",
16888 ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	112 \ "call popup_create(['hello border', 'just blanks'], {'line': 7, 'col': 23, 'border': [], 'borderhighlight': ['BlueColor'], 'borderchars': [' ']})",
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	113 \], 'XtestPopupBorder')
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	114 let buf = RunVimInTerminal('-S XtestPopupBorder', {'rows': 12})
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	115 call VerifyScreenDump(buf, 'Test_popupwin_22', {})
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	116
17125 b4eb06233448 patch 8.1.1562: popup window not always redrawn after popup_setoptions() Bram Moolenaar <Bram@vim.org> parents: 17123 diff changeset	117 " check that changing borderchars triggers a redraw
b4eb06233448 patch 8.1.1562: popup window not always redrawn after popup_setoptions() Bram Moolenaar <Bram@vim.org> parents: 17123 diff changeset	118 call term_sendkeys(buf, ":call popup_setoptions(winid, {'borderchars': ['a', 'b', 'c', 'd', 'e', 'f', 'g', 'h']})\<CR>")
b4eb06233448 patch 8.1.1562: popup window not always redrawn after popup_setoptions() Bram Moolenaar <Bram@vim.org> parents: 17123 diff changeset	119 call VerifyScreenDump(buf, 'Test_popupwin_23', {})
b4eb06233448 patch 8.1.1562: popup window not always redrawn after popup_setoptions() Bram Moolenaar <Bram@vim.org> parents: 17123 diff changeset	120
16888 ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	121 call StopVimInTerminal(buf)
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	122 call delete('XtestPopupBorder')
ec61b6b79865 patch 8.1.1445: popup window border highlight not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16886 diff changeset	123
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	124 let with_border_or_padding = {
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	125 \ 'line': 2,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	126 \ 'core_line': 3,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	127 \ 'col': 3,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	128 \ 'core_col': 4,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	129 \ 'width': 14,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	130 \ 'core_width': 12,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	131 \ 'height': 3,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	132 \ 'core_height': 1,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	133 \ 'visible': 1}
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	134 let winid = popup_create('hello border', {'line': 2, 'col': 3, 'border': []})",
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	135 call assert_equal(with_border_or_padding, popup_getpos(winid))
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	136 let options = popup_getoptions(winid)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	137 call assert_equal([], options.border)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	138 call assert_false(has_key(options, "padding"))
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	139
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	140 let winid = popup_create('hello padding', {'line': 2, 'col': 3, 'padding': []})
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	141 let with_border_or_padding.width = 15
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	142 let with_border_or_padding.core_width = 13
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	143 call assert_equal(with_border_or_padding, popup_getpos(winid))
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	144 let options = popup_getoptions(winid)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	145 call assert_false(has_key(options, "border"))
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	146 call assert_equal([], options.padding)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	147
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	148 call popup_setoptions(winid, {
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	149 \ 'padding': [1, 2, 3, 4],
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	150 \ 'border': [4, 0, 7, 8],
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	151 \ 'borderhighlight': ['Top', 'Right', 'Bottom', 'Left'],
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	152 \ 'borderchars': ['1', '^', '2', '>', '3', 'v', '4', '<'],
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	153 \ })
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	154 let options = popup_getoptions(winid)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	155 call assert_equal([1, 0, 1, 1], options.border)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	156 call assert_equal([1, 2, 3, 4], options.padding)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	157 call assert_equal(['Top', 'Right', 'Bottom', 'Left'], options.borderhighlight)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	158 call assert_equal(['1', '^', '2', '>', '3', 'v', '4', '<'], options.borderchars)
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	159
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	160 let winid = popup_create('hello both', {'line': 3, 'col': 8, 'border': [], 'padding': []})
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	161 call assert_equal({
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	162 \ 'line': 3,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	163 \ 'core_line': 5,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	164 \ 'col': 8,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	165 \ 'core_col': 10,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	166 \ 'width': 14,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	167 \ 'core_width': 10,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	168 \ 'height': 5,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	169 \ 'core_height': 1,
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	170 \ 'visible': 1}, popup_getpos(winid))
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	171
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	172 call popup_clear()
16884 59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	173 endfunc
59e4148c0c73 patch 8.1.1443: popup window padding and border not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16880 diff changeset	174
16849 629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	175 func Test_popup_with_syntax_win_execute()
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	176 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	177 throw 'Skipped: cannot make screendumps'
16849 629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	178 endif
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	179 call writefile([
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	180 \ "call setline(1, range(1, 100))",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	181 \ "hi PopupColor ctermbg=lightblue",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	182 \ "let winid = popup_create([",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	183 \ "\\ '#include <stdio.h>',",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	184 \ "\\ 'int main(void)',",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	185 \ "\\ '{',",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	186 \ "\\ ' printf(123);',",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	187 \ "\\ '}',",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	188 \ "\\], {'line': 3, 'col': 25, 'highlight': 'PopupColor'})",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	189 \ "call win_execute(winid, 'set syntax=cpp')",
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	190 \], 'XtestPopup')
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	191 let buf = RunVimInTerminal('-S XtestPopup', {'rows': 10})
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	192 call VerifyScreenDump(buf, 'Test_popupwin_10', {})
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	193
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	194 " clean up
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	195 call StopVimInTerminal(buf)
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	196 call delete('XtestPopup')
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	197 endfunc
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	198
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	199 func Test_popup_with_syntax_setbufvar()
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	200 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	201 throw 'Skipped: cannot make screendumps'
16849 629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	202 endif
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	203 let lines =<< trim END
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	204 call setline(1, range(1, 100))
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	205 hi PopupColor ctermbg=lightgrey
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	206 let winid = popup_create([
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	207 \ '#include <stdio.h>',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	208 \ 'int main(void)',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	209 \ '{',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	210 \ ' printf(567);',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	211 \ '}',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	212 \], {'line': 3, 'col': 21, 'highlight': 'PopupColor'})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	213 call setbufvar(winbufnr(winid), '&syntax', 'cpp')
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	214 END
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	215 call writefile(lines, 'XtestPopup')
16849 629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	216 let buf = RunVimInTerminal('-S XtestPopup', {'rows': 10})
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	217 call VerifyScreenDump(buf, 'Test_popupwin_11', {})
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	218
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	219 " clean up
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	220 call StopVimInTerminal(buf)
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	221 call delete('XtestPopup')
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	222 endfunc
629f3d3b6886 patch 8.1.1426: no test for syntax highlight in popup window Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	223
17022 79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	224 func Test_popup_with_matches()
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	225 if !CanRunVimInTerminal()
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	226 throw 'Skipped: cannot make screendumps'
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	227 endif
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	228 let lines =<< trim END
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	229 call setline(1, ['111 222 333', '444 555 666'])
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	230 let winid = popup_create([
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	231 \ '111 222 333',
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	232 \ '444 555 666',
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	233 \], {'line': 3, 'col': 10, 'border': []})
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	234 set hlsearch
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	235 /666
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	236 call matchadd('ErrorMsg', '111')
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	237 call matchadd('ErrorMsg', '444')
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	238 call win_execute(winid, "call matchadd('ErrorMsg', '111')")
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	239 call win_execute(winid, "call matchadd('ErrorMsg', '555')")
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	240 END
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	241 call writefile(lines, 'XtestPopupMatches')
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	242 let buf = RunVimInTerminal('-S XtestPopupMatches', {'rows': 10})
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	243 call VerifyScreenDump(buf, 'Test_popupwin_matches', {})
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	244
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	245 " clean up
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	246 call StopVimInTerminal(buf)
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	247 call delete('XtestPopupMatches')
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	248 endfunc
79c3a52fdb07 patch 8.1.1511: matches in a popup window are not displayed properly Bram Moolenaar <Bram@vim.org> parents: 16998 diff changeset	249
16898 16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	250 func Test_popup_all_corners()
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	251 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	252 throw 'Skipped: cannot make screendumps'
16898 16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	253 endif
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	254 let lines =<< trim END
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	255 call setline(1, repeat([repeat('-', 60)], 15))
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	256 set so=0
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	257 normal 2G3\|r#
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	258 let winid1 = popup_create(['first', 'second'], {
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	259 \ 'line': 'cursor+1',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	260 \ 'col': 'cursor',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	261 \ 'pos': 'topleft',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	262 \ 'border': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	263 \ 'padding': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	264 \ })
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	265 normal 25\|r@
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	266 let winid1 = popup_create(['First', 'SeconD'], {
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	267 \ 'line': 'cursor+1',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	268 \ 'col': 'cursor',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	269 \ 'pos': 'topright',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	270 \ 'border': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	271 \ 'padding': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	272 \ })
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	273 normal 9G29\|r%
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	274 let winid1 = popup_create(['fiRSt', 'seCOnd'], {
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	275 \ 'line': 'cursor-1',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	276 \ 'col': 'cursor',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	277 \ 'pos': 'botleft',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	278 \ 'border': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	279 \ 'padding': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	280 \ })
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	281 normal 51\|r&
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	282 let winid1 = popup_create(['FIrsT', 'SEcoND'], {
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	283 \ 'line': 'cursor-1',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	284 \ 'col': 'cursor',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	285 \ 'pos': 'botright',
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	286 \ 'border': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	287 \ 'padding': [],
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	288 \ })
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	289 END
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	290 call writefile(lines, 'XtestPopupCorners')
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	291 let buf = RunVimInTerminal('-S XtestPopupCorners', {'rows': 12})
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	292 call VerifyScreenDump(buf, 'Test_popupwin_corners', {})
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	293
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	294 " clean up
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	295 call StopVimInTerminal(buf)
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	296 call delete('XtestPopupCorners')
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	297 endfunc
16fd1bb2e675 patch 8.1.1450: popup window positioning wrong when using padding or borders Bram Moolenaar <Bram@vim.org> parents: 16896 diff changeset	298
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	299 func Test_popup_firstline()
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	300 if !CanRunVimInTerminal()
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	301 throw 'Skipped: cannot make screendumps'
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	302 endif
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	303 let lines =<< trim END
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	304 call setline(1, range(1, 20))
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	305 call popup_create(['1111', '222222', '33333', '44', '5', '666666', '77777', '888', '9999999999999999'], {
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	306 \ 'maxheight': 4,
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	307 \ 'firstline': 3,
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	308 \ })
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	309 END
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	310 call writefile(lines, 'XtestPopupFirstline')
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	311 let buf = RunVimInTerminal('-S XtestPopupFirstline', {'rows': 10})
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	312 call VerifyScreenDump(buf, 'Test_popupwin_firstline', {})
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	313
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	314 " clean up
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	315 call StopVimInTerminal(buf)
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	316 call delete('XtestPopupFirstline')
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	317
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	318 let winid = popup_create(['1111', '222222', '33333', '44444'], {
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	319 \ 'maxheight': 2,
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	320 \ 'firstline': 3,
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	321 \ })
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	322 call assert_equal(3, popup_getoptions(winid).firstline)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	323 call popup_setoptions(winid, {'firstline': 1})
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	324 call assert_equal(1, popup_getoptions(winid).firstline)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	325
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	326 call popup_close(winid)
17047 6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	327 endfunc
6400d1ad5e4b patch 8.1.1523: cannot show range of buffer lines in popup window Bram Moolenaar <Bram@vim.org> parents: 17045 diff changeset	328
17055 f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	329 func Test_popup_drag()
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	330 if !CanRunVimInTerminal()
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	331 throw 'Skipped: cannot make screendumps'
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	332 endif
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	333 " create a popup that covers the command line
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	334 let lines =<< trim END
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	335 call setline(1, range(1, 20))
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	336 let winid = popup_create(['1111', '222222', '33333'], {
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	337 \ 'drag': 1,
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	338 \ 'border': [],
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	339 \ 'line': &lines - 4,
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	340 \ })
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	341 func Dragit()
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	342 call feedkeys("\<F3>\<LeftMouse>\<F4>\<LeftDrag>\<LeftRelease>", "xt")
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	343 endfunc
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	344 map <silent> <F3> :call test_setmouse(&lines - 4, &columns / 2)<CR>
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	345 map <silent> <F4> :call test_setmouse(&lines - 8, &columns / 2)<CR>
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	346 END
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	347 call writefile(lines, 'XtestPopupDrag')
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	348 let buf = RunVimInTerminal('-S XtestPopupDrag', {'rows': 10})
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	349 call VerifyScreenDump(buf, 'Test_popupwin_drag_01', {})
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	350
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	351 call term_sendkeys(buf, ":call Dragit()\<CR>")
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	352 call VerifyScreenDump(buf, 'Test_popupwin_drag_02', {})
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	353
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	354 " clean up
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	355 call StopVimInTerminal(buf)
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	356 call delete('XtestPopupDrag')
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	357 endfunc
f4de7ccdfd8c patch 8.1.1527: when moving popup window over the cmdline it is not redrawn Bram Moolenaar <Bram@vim.org> parents: 17047 diff changeset	358
17069 76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	359 func Test_popup_select()
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	360 if !CanRunVimInTerminal()
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	361 throw 'Skipped: cannot make screendumps'
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	362 endif
17071 57125309eef3 patch 8.1.1535: popup select test fails on Mac Bram Moolenaar <Bram@vim.org> parents: 17069 diff changeset	363 if !has('clipboard')
57125309eef3 patch 8.1.1535: popup select test fails on Mac Bram Moolenaar <Bram@vim.org> parents: 17069 diff changeset	364 throw 'Skipped: clipboard feature missing'
57125309eef3 patch 8.1.1535: popup select test fails on Mac Bram Moolenaar <Bram@vim.org> parents: 17069 diff changeset	365 endif
17069 76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	366 " create a popup with some text to be selected
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	367 let lines =<< trim END
17073 89753fdfab85 patch 8.1.1536: popup select test still fails on Mac Bram Moolenaar <Bram@vim.org> parents: 17071 diff changeset	368 set clipboard=autoselect
17069 76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	369 call setline(1, range(1, 20))
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	370 let winid = popup_create(['the word', 'some more', 'several words here'], {
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	371 \ 'drag': 1,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	372 \ 'border': [],
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	373 \ 'line': 3,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	374 \ 'col': 10,
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	375 \ })
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	376 func Select1()
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	377 call feedkeys("\<F3>\<LeftMouse>\<F4>\<LeftDrag>\<LeftRelease>", "xt")
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	378 endfunc
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	379 map <silent> <F3> :call test_setmouse(4, 15)<CR>
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	380 map <silent> <F4> :call test_setmouse(6, 23)<CR>
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	381 END
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	382 call writefile(lines, 'XtestPopupSelect')
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	383 let buf = RunVimInTerminal('-S XtestPopupSelect', {'rows': 10})
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	384 call term_sendkeys(buf, ":call Select1()\<CR>")
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	385 call VerifyScreenDump(buf, 'Test_popupwin_select_01', {})
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	386
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	387 call term_sendkeys(buf, ":call popup_close(winid)\<CR>")
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	388 call term_sendkeys(buf, "\"*p")
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	389 call VerifyScreenDump(buf, 'Test_popupwin_select_02', {})
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	390
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	391 " clean up
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	392 call StopVimInTerminal(buf)
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	393 call delete('XtestPopupSelect')
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	394 endfunc
76ae212a9075 patch 8.1.1534: modeless selection in popup window selects too much Bram Moolenaar <Bram@vim.org> parents: 17055 diff changeset	395
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	396 func Test_popup_in_tab()
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	397 " default popup is local to tab, not visible when in other tab
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	398 let winid = popup_create("text", {})
17043 d99805d25b42 patch 8.1.1521: when a popup window is closed the buffer remains Bram Moolenaar <Bram@vim.org> parents: 17037 diff changeset	399 let bufnr = winbufnr(winid)
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	400 call assert_equal(1, popup_getpos(winid).visible)
17149 c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	401 call assert_equal(0, popup_getoptions(winid).tabpage)
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	402 tabnew
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	403 call assert_equal(0, popup_getpos(winid).visible)
17149 c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	404 call assert_equal(1, popup_getoptions(winid).tabpage)
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	405 quit
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	406 call assert_equal(1, popup_getpos(winid).visible)
17043 d99805d25b42 patch 8.1.1521: when a popup window is closed the buffer remains Bram Moolenaar <Bram@vim.org> parents: 17037 diff changeset	407
d99805d25b42 patch 8.1.1521: when a popup window is closed the buffer remains Bram Moolenaar <Bram@vim.org> parents: 17037 diff changeset	408 call assert_equal(1, bufexists(bufnr))
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	409 call popup_clear()
17043 d99805d25b42 patch 8.1.1521: when a popup window is closed the buffer remains Bram Moolenaar <Bram@vim.org> parents: 17037 diff changeset	410 " buffer is gone now
d99805d25b42 patch 8.1.1521: when a popup window is closed the buffer remains Bram Moolenaar <Bram@vim.org> parents: 17037 diff changeset	411 call assert_equal(0, bufexists(bufnr))
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	412
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	413 " global popup is visible in any tab
17075 dacd46fbaa90 patch 8.1.1537: using "tab" for popup window can be confusing Bram Moolenaar <Bram@vim.org> parents: 17073 diff changeset	414 let winid = popup_create("text", {'tabpage': -1})
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	415 call assert_equal(1, popup_getpos(winid).visible)
17149 c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	416 call assert_equal(-1, popup_getoptions(winid).tabpage)
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	417 tabnew
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	418 call assert_equal(1, popup_getpos(winid).visible)
17149 c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	419 call assert_equal(-1, popup_getoptions(winid).tabpage)
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	420 quit
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	421 call assert_equal(1, popup_getpos(winid).visible)
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	422 call popup_clear()
17149 c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	423
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	424 " create popup in other tab
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	425 tabnew
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	426 let winid = popup_create("text", {'tabpage': 1})
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	427 call assert_equal(0, popup_getpos(winid).visible)
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	428 call assert_equal(1, popup_getoptions(winid).tabpage)
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	429 quit
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	430 call assert_equal(1, popup_getpos(winid).visible)
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	431 call assert_equal(0, popup_getoptions(winid).tabpage)
c90fdb999393 patch 8.1.1574: tabpage option not yet implemented for popup window Bram Moolenaar <Bram@vim.org> parents: 17125 diff changeset	432 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	433 endfunc
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	434
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	435 func Test_popup_valid_arguments()
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	436 " Zero value is like the property wasn't there
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	437 let winid = popup_create("text", {"col": 0})
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	438 let pos = popup_getpos(winid)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	439 call assert_inrange(&columns / 2 - 1, &columns / 2 + 1, pos.col)
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	440 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	441
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	442 " using cursor column has minimum value of 1
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	443 let winid = popup_create("text", {"col": 'cursor-100'})
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	444 let pos = popup_getpos(winid)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	445 call assert_equal(1, pos.col)
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	446 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	447
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	448 " center
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	449 let winid = popup_create("text", {"pos": 'center'})
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	450 let pos = popup_getpos(winid)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	451 let around = (&columns - pos.width) / 2
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	452 call assert_inrange(around - 1, around + 1, pos.col)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	453 let around = (&lines - pos.height) / 2
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	454 call assert_inrange(around - 1, around + 1, pos.line)
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	455 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	456 endfunc
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	457
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	458 func Test_popup_invalid_arguments()
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	459 call assert_fails('call popup_create(666, {})', 'E714:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	460 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	461 call assert_fails('call popup_create("text", "none")', 'E715:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	462 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	463
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	464 call assert_fails('call popup_create("text", {"col": "xxx"})', 'E475:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	465 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	466 call assert_fails('call popup_create("text", {"col": "cursor8"})', 'E15:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	467 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	468 call assert_fails('call popup_create("text", {"col": "cursor+x"})', 'E15:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	469 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	470 call assert_fails('call popup_create("text", {"col": "cursor+8x"})', 'E15:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	471 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	472
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	473 call assert_fails('call popup_create("text", {"line": "xxx"})', 'E475:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	474 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	475 call assert_fails('call popup_create("text", {"line": "cursor8"})', 'E15:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	476 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	477 call assert_fails('call popup_create("text", {"line": "cursor+x"})', 'E15:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	478 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	479 call assert_fails('call popup_create("text", {"line": "cursor+8x"})', 'E15:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	480 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	481
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	482 call assert_fails('call popup_create("text", {"pos": "there"})', 'E475:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	483 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	484 call assert_fails('call popup_create("text", {"padding": "none"})', 'E714:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	485 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	486 call assert_fails('call popup_create("text", {"border": "none"})', 'E714:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	487 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	488 call assert_fails('call popup_create("text", {"borderhighlight": "none"})', 'E714:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	489 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	490 call assert_fails('call popup_create("text", {"borderchars": "none"})', 'E714:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	491 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	492
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	493 call assert_fails('call popup_create([{"text": "text"}, 666], {})', 'E715:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	494 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	495 call assert_fails('call popup_create([{"text": "text", "props": "none"}], {})', 'E714:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	496 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	497 call assert_fails('call popup_create([{"text": "text", "props": ["none"]}], {})', 'E715:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	498 call popup_clear()
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	499 endfunc
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	500
16863 2b00163053cd patch 8.1.1433: win_execute() may leave popup window focused Bram Moolenaar <Bram@vim.org> parents: 16859 diff changeset	501 func Test_win_execute_closing_curwin()
2b00163053cd patch 8.1.1433: win_execute() may leave popup window focused Bram Moolenaar <Bram@vim.org> parents: 16859 diff changeset	502 split
2b00163053cd patch 8.1.1433: win_execute() may leave popup window focused Bram Moolenaar <Bram@vim.org> parents: 16859 diff changeset	503 let winid = popup_create('some text', {})
16874 da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	504 call assert_fails('call win_execute(winid, winnr() .. "close")', 'E994')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	505 call popup_clear()
16874 da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	506 endfunc
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	507
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	508 func Test_win_execute_not_allowed()
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	509 let winid = popup_create('some text', {})
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	510 call assert_fails('call win_execute(winid, "split")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	511 call assert_fails('call win_execute(winid, "vsplit")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	512 call assert_fails('call win_execute(winid, "close")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	513 call assert_fails('call win_execute(winid, "bdelete")', 'E994:')
16878 4096722cd9c1 patch 8.1.1440: win_execute() test fails Bram Moolenaar <Bram@vim.org> parents: 16874 diff changeset	514 call assert_fails('call win_execute(winid, "bwipe!")', 'E994:')
16874 da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	515 call assert_fails('call win_execute(winid, "tabnew")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	516 call assert_fails('call win_execute(winid, "tabnext")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	517 call assert_fails('call win_execute(winid, "next")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	518 call assert_fails('call win_execute(winid, "rewind")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	519 call assert_fails('call win_execute(winid, "buf")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	520 call assert_fails('call win_execute(winid, "edit")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	521 call assert_fails('call win_execute(winid, "enew")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	522 call assert_fails('call win_execute(winid, "wincmd x")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	523 call assert_fails('call win_execute(winid, "wincmd w")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	524 call assert_fails('call win_execute(winid, "wincmd t")', 'E994:')
da5f5836e90c patch 8.1.1438: some commands cause trouble in a popup window Bram Moolenaar <Bram@vim.org> parents: 16863 diff changeset	525 call assert_fails('call win_execute(winid, "wincmd b")', 'E994:')
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	526 call popup_clear()
16863 2b00163053cd patch 8.1.1433: win_execute() may leave popup window focused Bram Moolenaar <Bram@vim.org> parents: 16859 diff changeset	527 endfunc
2b00163053cd patch 8.1.1433: win_execute() may leave popup window focused Bram Moolenaar <Bram@vim.org> parents: 16859 diff changeset	528
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	529 func Test_popup_with_wrap()
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	530 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	531 throw 'Skipped: cannot make screendumps'
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	532 endif
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	533 let lines =<< trim END
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	534 call setline(1, range(1, 100))
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	535 let winid = popup_create(
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	536 \ 'a long line that wont fit',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	537 \ {'line': 3, 'col': 20, 'maxwidth': 10, 'wrap': 1})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	538 END
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	539 call writefile(lines, 'XtestPopup')
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	540 let buf = RunVimInTerminal('-S XtestPopup', {'rows': 10})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	541 call VerifyScreenDump(buf, 'Test_popupwin_wrap', {})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	542
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	543 " clean up
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	544 call StopVimInTerminal(buf)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	545 call delete('XtestPopup')
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	546 endfunc
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	547
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	548 func Test_popup_without_wrap()
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	549 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	550 throw 'Skipped: cannot make screendumps'
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	551 endif
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	552 let lines =<< trim END
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	553 call setline(1, range(1, 100))
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	554 let winid = popup_create(
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	555 \ 'a long line that wont fit',
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	556 \ {'line': 3, 'col': 20, 'maxwidth': 10, 'wrap': 0})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	557 END
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	558 call writefile(lines, 'XtestPopup')
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	559 let buf = RunVimInTerminal('-S XtestPopup', {'rows': 10})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	560 call VerifyScreenDump(buf, 'Test_popupwin_nowrap', {})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	561
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	562 " clean up
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	563 call StopVimInTerminal(buf)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	564 call delete('XtestPopup')
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	565 endfunc
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	566
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	567 func Test_popup_time()
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	568 if !has('timers')
17089 8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 17077 diff changeset	569 throw 'Skipped: timer feature not supported'
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	570 endif
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	571 topleft vnew
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	572 call setline(1, 'hello')
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	573
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	574 call popup_create('world', {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	575 \ 'line': 1,
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	576 \ 'col': 1,
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	577 \ 'minwidth': 20,
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	578 \ 'time': 500,
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	579 \})
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	580 redraw
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	581 let line = join(map(range(1, 5), 'screenstring(1, v:val)'), '')
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	582 call assert_equal('world', line)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	583
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	584 sleep 700m
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	585 redraw
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	586 let line = join(map(range(1, 5), 'screenstring(1, v:val)'), '')
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	587 call assert_equal('hello', line)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	588
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	589 call popup_create('on the command line', {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	590 \ 'line': &lines,
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	591 \ 'col': 10,
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	592 \ 'minwidth': 20,
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	593 \ 'time': 500,
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	594 \})
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	595 redraw
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	596 let line = join(map(range(1, 30), 'screenstring(&lines, v:val)'), '')
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	597 call assert_match('.on the command line.', line)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	598
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	599 sleep 700m
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	600 redraw
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	601 let line = join(map(range(1, 30), 'screenstring(&lines, v:val)'), '')
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	602 call assert_notmatch('.on the command line.', line)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	603
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	604 bwipe!
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	605 endfunc
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	606
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	607 func Test_popup_hide()
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	608 topleft vnew
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	609 call setline(1, 'hello')
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	610
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	611 let winid = popup_create('world', {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	612 \ 'line': 1,
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	613 \ 'col': 1,
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	614 \ 'minwidth': 20,
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	615 \})
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	616 redraw
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	617 let line = join(map(range(1, 5), 'screenstring(1, v:val)'), '')
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	618 call assert_equal('world', line)
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	619 call assert_equal(1, popup_getpos(winid).visible)
16859 0154363d3b98 patch 8.1.1431: popup window listed as "Scratch" Bram Moolenaar <Bram@vim.org> parents: 16857 diff changeset	620 " buffer is still listed and active
0154363d3b98 patch 8.1.1431: popup window listed as "Scratch" Bram Moolenaar <Bram@vim.org> parents: 16857 diff changeset	621 call assert_match(winbufnr(winid) .. 'u a.*\[Popup\]', execute('ls u'))
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	622
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	623 call popup_hide(winid)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	624 redraw
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	625 let line = join(map(range(1, 5), 'screenstring(1, v:val)'), '')
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	626 call assert_equal('hello', line)
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	627 call assert_equal(0, popup_getpos(winid).visible)
16859 0154363d3b98 patch 8.1.1431: popup window listed as "Scratch" Bram Moolenaar <Bram@vim.org> parents: 16857 diff changeset	628 " buffer is still listed but hidden
0154363d3b98 patch 8.1.1431: popup window listed as "Scratch" Bram Moolenaar <Bram@vim.org> parents: 16857 diff changeset	629 call assert_match(winbufnr(winid) .. 'u h.*\[Popup\]', execute('ls u'))
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	630
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	631 call popup_show(winid)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	632 redraw
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	633 let line = join(map(range(1, 5), 'screenstring(1, v:val)'), '')
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	634 call assert_equal('world', line)
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	635 call assert_equal(1, popup_getpos(winid).visible)
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	636
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	637
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	638 call popup_close(winid)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	639 redraw
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	640 let line = join(map(range(1, 5), 'screenstring(1, v:val)'), '')
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	641 call assert_equal('hello', line)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	642
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	643 " error is given for existing non-popup window
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	644 call assert_fails('call popup_hide(win_getid())', 'E993:')
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	645
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	646 " no error non-existing window
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	647 call popup_hide(1234234)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	648 call popup_show(41234234)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	649
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	650 bwipe!
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	651 endfunc
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	652
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	653 func Test_popup_move()
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	654 topleft vnew
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	655 call setline(1, 'hello')
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	656
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	657 let winid = popup_create('world', {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	658 \ 'line': 1,
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	659 \ 'col': 1,
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	660 \ 'minwidth': 20,
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	661 \})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	662 redraw
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	663 let line = join(map(range(1, 6), 'screenstring(1, v:val)'), '')
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	664 call assert_equal('world ', line)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	665
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	666 call popup_move(winid, {'line': 2, 'col': 2})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	667 redraw
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	668 let line = join(map(range(1, 6), 'screenstring(1, v:val)'), '')
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	669 call assert_equal('hello ', line)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	670 let line = join(map(range(1, 6), 'screenstring(2, v:val)'), '')
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	671 call assert_equal('~world', line)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	672
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	673 call popup_move(winid, {'line': 1})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	674 redraw
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	675 let line = join(map(range(1, 6), 'screenstring(1, v:val)'), '')
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	676 call assert_equal('hworld', line)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	677
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	678 call popup_close(winid)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	679
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	680 bwipe!
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	681 endfunc
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	682
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	683 func Test_popup_getpos()
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	684 let winid = popup_create('hello', {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	685 \ 'line': 2,
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	686 \ 'col': 3,
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	687 \ 'minwidth': 10,
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	688 \ 'minheight': 11,
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	689 \})
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	690 redraw
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	691 let res = popup_getpos(winid)
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	692 call assert_equal(2, res.line)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	693 call assert_equal(3, res.col)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	694 call assert_equal(10, res.width)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	695 call assert_equal(11, res.height)
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	696 call assert_equal(1, res.visible)
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	697
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	698 call popup_close(winid)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	699 endfunc
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	700
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	701 func Test_popup_width_longest()
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	702 let tests = [
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	703 \ [['hello', 'this', 'window', 'displays', 'all of its text'], 15],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	704 \ [['hello', 'this', 'window', 'all of its text', 'displays'], 15],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	705 \ [['hello', 'this', 'all of its text', 'window', 'displays'], 15],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	706 \ [['hello', 'all of its text', 'this', 'window', 'displays'], 15],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	707 \ [['all of its text', 'hello', 'this', 'window', 'displays'], 15],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	708 \ ]
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	709
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	710 for test in tests
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	711 let winid = popup_create(test[0], {'line': 2, 'col': 3})
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	712 redraw
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	713 let position = popup_getpos(winid)
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	714 call assert_equal(test[1], position.width)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	715 call popup_close(winid)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	716 endfor
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	717 endfunc
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	718
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	719 func Test_popup_wraps()
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	720 let tests = [
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	721 \ ['nowrap', 6, 1],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	722 \ ['a line that wraps once', 12, 2],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	723 \ ['a line that wraps two times', 12, 3],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	724 \ ]
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	725 for test in tests
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	726 let winid = popup_create(test[0],
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	727 \ {'line': 2, 'col': 3, 'maxwidth': 12})
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	728 redraw
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	729 let position = popup_getpos(winid)
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	730 call assert_equal(test[1], position.width)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	731 call assert_equal(test[2], position.height)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	732
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	733 call popup_close(winid)
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	734 call assert_equal({}, popup_getpos(winid))
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	735 endfor
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	736 endfunc
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	737
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	738 func Test_popup_getoptions()
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	739 let winid = popup_create('hello', {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	740 \ 'line': 2,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	741 \ 'col': 3,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	742 \ 'minwidth': 10,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	743 \ 'minheight': 11,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	744 \ 'maxwidth': 20,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	745 \ 'maxheight': 21,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	746 \ 'zindex': 100,
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	747 \ 'time': 5000,
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	748 \ 'fixed': 1
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	749 \})
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	750 redraw
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	751 let res = popup_getoptions(winid)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	752 call assert_equal(2, res.line)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	753 call assert_equal(3, res.col)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	754 call assert_equal(10, res.minwidth)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	755 call assert_equal(11, res.minheight)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	756 call assert_equal(20, res.maxwidth)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	757 call assert_equal(21, res.maxheight)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	758 call assert_equal(100, res.zindex)
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	759 call assert_equal(1, res.fixed)
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	760 if has('timers')
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	761 call assert_equal(5000, res.time)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	762 endif
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	763 call popup_close(winid)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	764
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	765 let winid = popup_create('hello', {})
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	766 redraw
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	767 let res = popup_getoptions(winid)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	768 call assert_equal(0, res.line)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	769 call assert_equal(0, res.col)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	770 call assert_equal(0, res.minwidth)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	771 call assert_equal(0, res.minheight)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	772 call assert_equal(0, res.maxwidth)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	773 call assert_equal(0, res.maxheight)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	774 call assert_equal(50, res.zindex)
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	775 call assert_equal(0, res.fixed)
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	776 if has('timers')
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	777 call assert_equal(0, res.time)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	778 endif
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	779 call popup_close(winid)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	780 call assert_equal({}, popup_getoptions(winid))
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	781 endfunc
16843 283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	782
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	783 func Test_popup_option_values()
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	784 new
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	785 " window-local
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	786 setlocal number
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	787 setlocal nowrap
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	788 " buffer-local
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	789 setlocal omnifunc=Something
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	790 " global/buffer-local
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	791 setlocal path=/there
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	792 " global/window-local
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	793 setlocal scrolloff=9
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	794
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	795 let winid = popup_create('hello', {})
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	796 call assert_equal(0, getwinvar(winid, '&number'))
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	797 call assert_equal(1, getwinvar(winid, '&wrap'))
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	798 call assert_equal('', getwinvar(winid, '&omnifunc'))
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	799 call assert_equal(&g:path, getwinvar(winid, '&path'))
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	800 call assert_equal(&g:scrolloff, getwinvar(winid, '&scrolloff'))
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	801
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	802 call popup_close(winid)
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	803 bwipe
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	804 endfunc
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	805
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	806 func Test_popup_atcursor()
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	807 topleft vnew
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	808 call setline(1, [
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	809 \ 'xxxxxxxxxxxxxxxxx',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	810 \ 'xxxxxxxxxxxxxxxxx',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	811 \ 'xxxxxxxxxxxxxxxxx',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	812 \])
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	813
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	814 call cursor(2, 2)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	815 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	816 let winid = popup_atcursor('vim', {})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	817 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	818 let line = join(map(range(1, 17), 'screenstring(1, v:val)'), '')
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	819 call assert_equal('xvimxxxxxxxxxxxxx', line)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	820 call popup_close(winid)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	821
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	822 call cursor(3, 4)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	823 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	824 let winid = popup_atcursor('vim', {})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	825 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	826 let line = join(map(range(1, 17), 'screenstring(2, v:val)'), '')
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	827 call assert_equal('xxxvimxxxxxxxxxxx', line)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	828 call popup_close(winid)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	829
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	830 call cursor(1, 1)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	831 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	832 let winid = popup_create('vim', {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	833 \ 'line': 'cursor+2',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	834 \ 'col': 'cursor+1',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	835 \})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	836 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	837 let line = join(map(range(1, 17), 'screenstring(3, v:val)'), '')
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	838 call assert_equal('xvimxxxxxxxxxxxxx', line)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	839 call popup_close(winid)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	840
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	841 call cursor(3, 3)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	842 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	843 let winid = popup_create('vim', {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	844 \ 'line': 'cursor-2',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	845 \ 'col': 'cursor-1',
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	846 \})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	847 redraw
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	848 let line = join(map(range(1, 17), 'screenstring(1, v:val)'), '')
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	849 call assert_equal('xvimxxxxxxxxxxxxx', line)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	850 call popup_close(winid)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	851
16857 4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	852 " just enough room above
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	853 call cursor(3, 3)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	854 redraw
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	855 let winid = popup_atcursor(['vim', 'is great'], {})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	856 redraw
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	857 let pos = popup_getpos(winid)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	858 call assert_equal(1, pos.line)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	859 call popup_close(winid)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	860
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	861 " not enough room above, popup goes below the cursor
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	862 call cursor(3, 3)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	863 redraw
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	864 let winid = popup_atcursor(['vim', 'is', 'great'], {})
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	865 redraw
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	866 let pos = popup_getpos(winid)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	867 call assert_equal(4, pos.line)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	868 call popup_close(winid)
4de94f6161f2 patch 8.1.1430: popup window option "wrap" not supported Bram Moolenaar <Bram@vim.org> parents: 16853 diff changeset	869
16902 23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	870 " cursor in first line, popup in line 2
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	871 call cursor(1, 1)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	872 redraw
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	873 let winid = popup_atcursor(['vim', 'is', 'great'], {})
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	874 redraw
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	875 let pos = popup_getpos(winid)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	876 call assert_equal(2, pos.line)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	877 call popup_close(winid)
23645f9a5ce2 patch 8.1.1452: line and col property of popup windows not properly checked Bram Moolenaar <Bram@vim.org> parents: 16898 diff changeset	878
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	879 bwipe!
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16849 diff changeset	880 endfunc
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	881
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	882 func Test_popup_filter()
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	883 new
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	884 call setline(1, 'some text')
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	885
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	886 func MyPopupFilter(winid, c)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	887 if a:c == 'e'
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	888 let g:eaten = 'e'
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	889 return 1
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	890 endif
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	891 if a:c == '0'
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	892 let g:ignored = '0'
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	893 return 0
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	894 endif
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	895 if a:c == 'x'
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	896 call popup_close(a:winid)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	897 return 1
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	898 endif
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	899 return 0
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	900 endfunc
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	901
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	902 let winid = popup_create('something', {'filter': 'MyPopupFilter'})
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	903 redraw
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	904
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	905 " e is consumed by the filter
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	906 call feedkeys('e', 'xt')
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	907 call assert_equal('e', g:eaten)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	908
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	909 " 0 is ignored by the filter
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	910 normal $
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	911 call assert_equal(9, getcurpos()[2])
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	912 call feedkeys('0', 'xt')
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	913 call assert_equal('0', g:ignored)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	914 call assert_equal(1, getcurpos()[2])
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	915
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	916 " x closes the popup
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	917 call feedkeys('x', 'xt')
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	918 call assert_equal('e', g:eaten)
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	919 call assert_equal(-1, winbufnr(winid))
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	920
998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	921 delfunc MyPopupFilter
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	922 call popup_clear()
16880 998603a243d7 patch 8.1.1441: popup window filter not yet implemented Bram Moolenaar <Bram@vim.org> parents: 16878 diff changeset	923 endfunc
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	924
17097 94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	925 func ShowDialog(key, result)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	926 let s:cb_res = 999
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	927 let winid = popup_dialog('do you want to quit (Yes/no)?', {
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	928 \ 'filter': 'popup_filter_yesno',
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	929 \ 'callback': 'QuitCallback',
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	930 \ })
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	931 redraw
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	932 call feedkeys(a:key, "xt")
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	933 call assert_equal(winid, s:cb_winid)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	934 call assert_equal(a:result, s:cb_res)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	935 endfunc
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	936
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	937 func Test_popup_dialog()
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	938 func QuitCallback(id, res)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	939 let s:cb_winid = a:id
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	940 let s:cb_res = a:res
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	941 endfunc
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	942
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	943 let winid = ShowDialog("y", 1)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	944 let winid = ShowDialog("Y", 1)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	945 let winid = ShowDialog("n", 0)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	946 let winid = ShowDialog("N", 0)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	947 let winid = ShowDialog("x", 0)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	948 let winid = ShowDialog("X", 0)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	949 let winid = ShowDialog("\<Esc>", 0)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	950 let winid = ShowDialog("\<C-C>", -1)
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	951
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	952 delfunc QuitCallback
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	953 endfunc
94007c802045 patch 8.1.1548: popup_dialog() is not implemented Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	954
17117 7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	955 func ShowMenu(key, result)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	956 let s:cb_res = 999
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	957 let winid = popup_menu(['one', 'two', 'something else'], {
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	958 \ 'callback': 'QuitCallback',
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	959 \ })
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	960 redraw
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	961 call feedkeys(a:key, "xt")
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	962 call assert_equal(winid, s:cb_winid)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	963 call assert_equal(a:result, s:cb_res)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	964 endfunc
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	965
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	966 func Test_popup_menu()
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	967 func QuitCallback(id, res)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	968 let s:cb_winid = a:id
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	969 let s:cb_res = a:res
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	970 endfunc
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	971
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	972 let winid = ShowMenu(" ", 1)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	973 let winid = ShowMenu("j \<CR>", 2)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	974 let winid = ShowMenu("JjK \<CR>", 2)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	975 let winid = ShowMenu("jjjjjj ", 3)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	976 let winid = ShowMenu("kkk ", 1)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	977 let winid = ShowMenu("x", -1)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	978 let winid = ShowMenu("X", -1)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	979 let winid = ShowMenu("\<Esc>", -1)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	980 let winid = ShowMenu("\<C-C>", -1)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	981
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	982 delfunc QuitCallback
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	983 endfunc
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	984
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	985 func Test_popup_menu_screenshot()
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	986 if !CanRunVimInTerminal()
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	987 throw 'Skipped: cannot make screendumps'
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	988 endif
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	989
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	990 let lines =<< trim END
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	991 call setline(1, range(1, 20))
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	992 hi PopupSelected ctermbg=lightblue
17119 b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	993 call popup_menu(['one', 'two', 'another'], {'callback': 'MenuDone', 'title': ' make a choice from the list '})
17117 7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	994 func MenuDone(id, res)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	995 echomsg "selected " .. a:res
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	996 endfunc
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	997 END
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	998 call writefile(lines, 'XtestPopupMenu')
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	999 let buf = RunVimInTerminal('-S XtestPopupMenu', {'rows': 10})
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1000 call VerifyScreenDump(buf, 'Test_popupwin_menu_01', {})
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1001
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1002 call term_sendkeys(buf, "jj")
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1003 call VerifyScreenDump(buf, 'Test_popupwin_menu_02', {})
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1004
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1005 call term_sendkeys(buf, " ")
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1006 call VerifyScreenDump(buf, 'Test_popupwin_menu_03', {})
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1007
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1008 " clean up
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1009 call StopVimInTerminal(buf)
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1010 call delete('XtestPopupMenu')
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1011 endfunc
7ef5283ace3c patch 8.1.1558: popup_menu() and popup_filter_menu() are not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17107 diff changeset	1012
17119 b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1013 func Test_popup_title()
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1014 if !CanRunVimInTerminal()
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1015 throw 'Skipped: cannot make screendumps'
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1016 endif
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1017
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1018 " Create a popup without title or border, a line of padding will be added to
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1019 " put the title on.
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1020 let lines =<< trim END
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1021 call setline(1, range(1, 20))
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1022 call popup_create(['one', 'two', 'another'], {'title': 'Title String'})
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1023 END
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1024 call writefile(lines, 'XtestPopupTitle')
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1025 let buf = RunVimInTerminal('-S XtestPopupTitle', {'rows': 10})
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1026 call VerifyScreenDump(buf, 'Test_popupwin_title', {})
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1027
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1028 " clean up
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1029 call StopVimInTerminal(buf)
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1030 call delete('XtestPopupTitle')
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1031
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1032 let winid = popup_create('something', {'title': 'Some Title'})
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1033 call assert_equal('Some Title', popup_getoptions(winid).title)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1034 call popup_setoptions(winid, {'title': 'Another Title'})
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1035 call assert_equal('Another Title', popup_getoptions(winid).title)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1036
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1037 call popup_clear()
17119 b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1038 endfunc
b439e096a011 patch 8.1.1559: popup window title property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17117 diff changeset	1039
16890 5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1040 func Test_popup_close_callback()
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1041 func PopupDone(id, result)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1042 let g:result = a:result
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1043 endfunc
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1044 let winid = popup_create('something', {'callback': 'PopupDone'})
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1045 redraw
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1046 call popup_close(winid, 'done')
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1047 call assert_equal('done', g:result)
5131023c5728 patch 8.1.1446: popup window callback not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16888 diff changeset	1048 endfunc
16892 60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1049
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1050 func Test_popup_empty()
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1051 let winid = popup_create('', {'padding': [2,2,2,2]})
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1052 redraw
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1053 let pos = popup_getpos(winid)
17107 0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1054 call assert_equal(5, pos.width)
16892 60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1055 call assert_equal(5, pos.height)
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1056
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1057 let winid = popup_create([], {'border': []})
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1058 redraw
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1059 let pos = popup_getpos(winid)
17107 0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1060 call assert_equal(3, pos.width)
16892 60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1061 call assert_equal(3, pos.height)
60c9ac14a2ec patch 8.1.1447: not allowed to create an empty popup Bram Moolenaar <Bram@vim.org> parents: 16890 diff changeset	1062 endfunc
16894 236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1063
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1064 func Test_popup_never_behind()
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1065 if !CanRunVimInTerminal()
16965 ba7727889385 patch 8.1.1483: skipped tests are not properly listed Bram Moolenaar <Bram@vim.org> parents: 16908 diff changeset	1066 throw 'Skipped: cannot make screendumps'
16894 236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1067 endif
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1068 " +-----------------------------+
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1069 " \| \| \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1070 " \| \| \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1071 " \| \| \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1072 " \| line1 \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1073 " \|------------line2------------\|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1074 " \| line3 \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1075 " \| line4 \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1076 " \| \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1077 " \| \|
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1078 " +-----------------------------+
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1079 let lines =<< trim END
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1080 only
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1081 split
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1082 vsplit
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1083 let info_window1 = getwininfo()[0]
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1084 let line = info_window1['height']
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1085 let col = info_window1['width']
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1086 call popup_create(['line1', 'line2', 'line3', 'line4'], {
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1087 \ 'line' : line,
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1088 \ 'col' : col,
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1089 \ })
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1090 END
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1091 call writefile(lines, 'XtestPopupBehind')
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1092 let buf = RunVimInTerminal('-S XtestPopupBehind', {'rows': 10})
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1093 call term_sendkeys(buf, "\<C-W>w")
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1094 call VerifyScreenDump(buf, 'Test_popupwin_behind', {})
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1095
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1096 " clean up
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1097 call StopVimInTerminal(buf)
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1098 call delete('XtestPopupBehind')
236c182c6300 patch 8.1.1448: statusline is sometimes drawn on top of popup Bram Moolenaar <Bram@vim.org> parents: 16892 diff changeset	1099 endfunc
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1100
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1101 func s:VerifyPosition( p, msg, line, col, width, height )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1102 call assert_equal( a:line, popup_getpos( a:p ).line, a:msg . ' (l)' )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1103 call assert_equal( a:col, popup_getpos( a:p ).col, a:msg . ' (c)' )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1104 call assert_equal( a:width, popup_getpos( a:p ).width, a:msg . ' (w)' )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1105 call assert_equal( a:height, popup_getpos( a:p ).height, a:msg . ' (h)' )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1106 endfunc
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1107
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1108 func Test_popup_position_adjust()
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1109 " Anything placed past 2 cells from of the right of the screen is moved to the
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1110 " left.
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1111 "
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1112 " When wrapping is disabled, we also shift to the left to display on the
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1113 " screen, unless fixed is set.
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1114
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1115 " Entries for cases which don't vary based on wrapping.
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1116 " Format is per tests described below
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1117 let both_wrap_tests = [
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1118 \ [ 'a', 5, &columns, 5, &columns - 2, 1, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1119 \ [ 'b', 5, &columns + 1, 5, &columns - 2, 1, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1120 \ [ 'c', 5, &columns - 1, 5, &columns - 2, 1, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1121 \ [ 'd', 5, &columns - 2, 5, &columns - 2, 1, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1122 \ [ 'e', 5, &columns - 3, 5, &columns - 3, 1, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1123 \
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1124 \ [ 'aa', 5, &columns, 5, &columns - 2, 2, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1125 \ [ 'bb', 5, &columns + 1, 5, &columns - 2, 2, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1126 \ [ 'cc', 5, &columns - 1, 5, &columns - 2, 2, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1127 \ [ 'dd', 5, &columns - 2, 5, &columns - 2, 2, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1128 \ [ 'ee', 5, &columns - 3, 5, &columns - 3, 2, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1129 \
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1130 \ [ 'aaa', 5, &columns, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1131 \ [ 'bbb', 5, &columns + 1, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1132 \ [ 'ccc', 5, &columns - 1, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1133 \ [ 'ddd', 5, &columns - 2, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1134 \ [ 'eee', 5, &columns - 3, 5, &columns - 3, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1135 \ ]
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1136
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1137 " these test groups are dicts with:
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1138 " - comment: something to identify the group of tests by
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1139 " - options: dict of options to merge with the row/col in tests
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1140 " - tests: list of cases. Each one is a list with elements:
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1141 " - text
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1142 " - row
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1143 " - col
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1144 " - expected row
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1145 " - expected col
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1146 " - expected width
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1147 " - expected height
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1148 let tests = [
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1149 \ {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1150 \ 'comment': 'left-aligned with wrapping',
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1151 \ 'options': {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1152 \ 'wrap': 1,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1153 \ 'pos': 'botleft',
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1154 \ },
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1155 \ 'tests': both_wrap_tests + [
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1156 \ [ 'aaaa', 5, &columns, 4, &columns - 2, 3, 2 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1157 \ [ 'bbbb', 5, &columns + 1, 4, &columns - 2, 3, 2 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1158 \ [ 'cccc', 5, &columns - 1, 4, &columns - 2, 3, 2 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1159 \ [ 'dddd', 5, &columns - 2, 4, &columns - 2, 3, 2 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1160 \ [ 'eeee', 5, &columns - 3, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1161 \ ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1162 \ },
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1163 \ {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1164 \ 'comment': 'left aligned without wrapping',
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1165 \ 'options': {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1166 \ 'wrap': 0,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1167 \ 'pos': 'botleft',
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1168 \ },
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1169 \ 'tests': both_wrap_tests + [
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1170 \ [ 'aaaa', 5, &columns, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1171 \ [ 'bbbb', 5, &columns + 1, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1172 \ [ 'cccc', 5, &columns - 1, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1173 \ [ 'dddd', 5, &columns - 2, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1174 \ [ 'eeee', 5, &columns - 3, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1175 \ ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1176 \ },
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1177 \ {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1178 \ 'comment': 'left aligned with fixed position',
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1179 \ 'options': {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1180 \ 'wrap': 0,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1181 \ 'fixed': 1,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1182 \ 'pos': 'botleft',
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1183 \ },
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1184 \ 'tests': both_wrap_tests + [
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1185 \ [ 'aaaa', 5, &columns, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1186 \ [ 'bbbb', 5, &columns + 1, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1187 \ [ 'cccc', 5, &columns - 1, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1188 \ [ 'dddd', 5, &columns - 2, 5, &columns - 2, 3, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1189 \ [ 'eeee', 5, &columns - 3, 5, &columns - 3, 4, 1 ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1190 \ ],
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1191 \ },
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1192 \ ]
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1193
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1194 for test_group in tests
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1195 for test in test_group.tests
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1196 let [ text, line, col, e_line, e_col, e_width, e_height ] = test
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1197 let options = {
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1198 \ 'line': line,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1199 \ 'col': col,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1200 \ }
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1201 call extend( options, test_group.options )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1202
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1203 let p = popup_create( text, options )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1204
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1205 let msg = string( extend( options, { 'text': text } ) )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1206 call s:VerifyPosition( p, msg, e_line, e_col, e_width, e_height )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1207 call popup_close( p )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1208 endfor
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1209 endfor
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1210
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1211 call popup_clear()
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1212 %bwipe!
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1213 endfunc
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1214
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1215 func Test_adjust_left_past_screen_width()
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1216 " width of screen
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1217 let X = join(map(range(&columns), {->'X'}), '')
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1218
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1219 let p = popup_create( X, { 'line': 1, 'col': 1, 'wrap': 0 } )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1220 call s:VerifyPosition( p, 'full width topleft', 1, 1, &columns, 1 )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1221
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1222 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1223 let line = join(map(range(1, &columns + 1), 'screenstring(1, v:val)'), '')
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1224 call assert_equal(X, line)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1225
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1226 call popup_close( p )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1227 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1228
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1229 " Same if placed on the right hand side
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1230 let p = popup_create( X, { 'line': 1, 'col': &columns, 'wrap': 0 } )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1231 call s:VerifyPosition( p, 'full width topright', 1, 1, &columns, 1 )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1232
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1233 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1234 let line = join(map(range(1, &columns + 1), 'screenstring(1, v:val)'), '')
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1235 call assert_equal(X, line)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1236
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1237 call popup_close( p )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1238 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1239
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1240 " Extend so > window width
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1241 let X .= 'x'
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1242
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1243 let p = popup_create( X, { 'line': 1, 'col': 1, 'wrap': 0 } )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1244 call s:VerifyPosition( p, 'full width + 1 topleft', 1, 1, &columns, 1 )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1245
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1246 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1247 let line = join(map(range(1, &columns + 1), 'screenstring(1, v:val)'), '')
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1248 call assert_equal(X[ : -2 ], line)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1249
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1250 call popup_close( p )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1251 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1252
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1253 " Shifted then truncated (the x is not visible)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1254 let p = popup_create( X, { 'line': 1, 'col': &columns - 3, 'wrap': 0 } )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1255 call s:VerifyPosition( p, 'full width + 1 topright', 1, 1, &columns, 1 )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1256
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1257 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1258 let line = join(map(range(1, &columns + 1), 'screenstring(1, v:val)'), '')
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1259 call assert_equal(X[ : -2 ], line)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1260
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1261 call popup_close( p )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1262 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1263
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1264 " Not shifted, just truncated
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1265 let p = popup_create( X,
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1266 \ { 'line': 1, 'col': 2, 'wrap': 0, 'fixed': 1 } )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1267 call s:VerifyPosition( p, 'full width + 1 fixed', 1, 2, &columns - 1, 1)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1268
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1269 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1270 let line = join(map(range(1, &columns + 1), 'screenstring(1, v:val)'), '')
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1271 let e_line = ' ' . X[ 1 : -2 ]
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1272 call assert_equal(e_line, line)
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1273
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1274 call popup_close( p )
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1275 redraw
52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1276
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1277 call popup_clear()
16896 52fc577a087d patch 8.1.1449: popup text truncated at end of screen Bram Moolenaar <Bram@vim.org> parents: 16894 diff changeset	1278 %bwipe!
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1279 endfunc
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1280
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1281 func Test_popup_moved()
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1282 new
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1283 call test_override('char_avail', 1)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1284 call setline(1, ['one word to move around', 'a WORD.and->some thing'])
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1285
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1286 exe "normal gg0/word\<CR>"
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1287 let winid = popup_atcursor('text', {'moved': 'any'})
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1288 redraw
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1289 call assert_equal(1, popup_getpos(winid).visible)
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1290 call assert_equal([4, 4], popup_getoptions(winid).moved)
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1291 " trigger the check for last_cursormoved by going into insert mode
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1292 call feedkeys("li\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1293 call assert_equal({}, popup_getpos(winid))
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1294 call popup_clear()
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1295
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1296 exe "normal gg0/word\<CR>"
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1297 let winid = popup_atcursor('text', {'moved': 'word'})
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1298 redraw
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1299 call assert_equal(1, popup_getpos(winid).visible)
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1300 call assert_equal([4, 7], popup_getoptions(winid).moved)
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1301 call feedkeys("hi\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1302 call assert_equal({}, popup_getpos(winid))
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1303 call popup_clear()
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1304
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1305 exe "normal gg0/word\<CR>"
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1306 let winid = popup_atcursor('text', {'moved': 'word'})
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1307 redraw
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1308 call assert_equal(1, popup_getpos(winid).visible)
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1309 call assert_equal([4, 7], popup_getoptions(winid).moved)
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1310 call feedkeys("li\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1311 call assert_equal(1, popup_getpos(winid).visible)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1312 call feedkeys("ei\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1313 call assert_equal(1, popup_getpos(winid).visible)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1314 call feedkeys("eli\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1315 call assert_equal({}, popup_getpos(winid))
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1316 call popup_clear()
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1317
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	1318 " WORD is the default
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1319 exe "normal gg0/WORD\<CR>"
16908 df06694b761b patch 8.1.1455: popup_atcursor() not completely implemented Bram Moolenaar <Bram@vim.org> parents: 16904 diff changeset	1320 let winid = popup_atcursor('text', {})
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1321 redraw
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1322 call assert_equal(1, popup_getpos(winid).visible)
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1323 call assert_equal([2, 15], popup_getoptions(winid).moved)
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1324 call feedkeys("eli\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1325 call assert_equal(1, popup_getpos(winid).visible)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1326 call feedkeys("wi\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1327 call assert_equal(1, popup_getpos(winid).visible)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1328 call feedkeys("Eli\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1329 call assert_equal({}, popup_getpos(winid))
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1330 call popup_clear()
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1331
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1332 exe "normal gg0/word\<CR>"
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1333 let winid = popup_atcursor('text', {'moved': [5, 10]})
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1334 redraw
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1335 call assert_equal(1, popup_getpos(winid).visible)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1336 call feedkeys("eli\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1337 call feedkeys("ei\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1338 call assert_equal(1, popup_getpos(winid).visible)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1339 call feedkeys("eli\<Esc>", 'xt')
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1340 call assert_equal({}, popup_getpos(winid))
17026 905e1b154058 patch 8.1.1513: all popup functionality is in functions, except :popupclear Bram Moolenaar <Bram@vim.org> parents: 17022 diff changeset	1341 call popup_clear()
16904 9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1342
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1343 bwipe!
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1344 call test_override('ALL', 0)
9138e2c60bf1 patch 8.1.1453: popup window "moved" property not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16902 diff changeset	1345 endfunc
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1346
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1347 func Test_notifications()
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1348 if !has('timers')
17089 8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 17077 diff changeset	1349 throw 'Skipped: timer feature not supported'
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1350 endif
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1351 if !CanRunVimInTerminal()
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1352 throw 'Skipped: cannot make screendumps'
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1353 endif
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1354
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1355 call writefile([
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1356 \ "call setline(1, range(1, 20))",
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1357 \ "hi Notification ctermbg=lightblue",
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1358 \ "call popup_notification('first notification', {})",
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1359 \], 'XtestNotifications')
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1360 let buf = RunVimInTerminal('-S XtestNotifications', {'rows': 10})
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1361 call VerifyScreenDump(buf, 'Test_popupwin_notify_01', {})
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1362
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1363 " second one goes below the first one
17077 2546930657a9 patch 8.1.1538: cannot specify highlighting for notifications Bram Moolenaar <Bram@vim.org> parents: 17075 diff changeset	1364 call term_sendkeys(buf, ":hi link PopupNotification Notification\<CR>")
2546930657a9 patch 8.1.1538: cannot specify highlighting for notifications Bram Moolenaar <Bram@vim.org> parents: 17075 diff changeset	1365 call term_sendkeys(buf, ":call popup_notification('another important notification', {})\<CR>")
17045 7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1366 call VerifyScreenDump(buf, 'Test_popupwin_notify_02', {})
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1367
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1368
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1369 " clean up
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1370 call StopVimInTerminal(buf)
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1371 call delete('XtestNotifications')
7fe328ad5573 patch 8.1.1522: poup_notification() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17043 diff changeset	1372 endfunc
17107 0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1373
17121 808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1374 func Test_popup_settext()
17107 0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1375 if !CanRunVimInTerminal()
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1376 throw 'Skipped: cannot make screendumps'
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1377 endif
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1378
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1379 let lines =<< trim END
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1380 let opts = {'wrap': 0}
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1381 let p = popup_create('test', opts)
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1382 call popup_settext(p, 'this is a text')
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1383 END
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1384
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1385 call writefile( lines, 'XtestPopupSetText' )
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1386 let buf = RunVimInTerminal('-S XtestPopupSetText', {'rows': 10})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1387 call VerifyScreenDump(buf, 'Test_popup_settext_01', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1388
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1389 " Setting to empty string clears it
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1390 call term_sendkeys(buf, ":call popup_settext(p, '')\<CR>")
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1391 call VerifyScreenDump(buf, 'Test_popup_settext_02', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1392
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1393 " Setting a list
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1394 call term_sendkeys(buf, ":call popup_settext(p, ['a','b','c'])\<CR>")
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1395 call VerifyScreenDump(buf, 'Test_popup_settext_03', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1396
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1397 " Shrinking with a list
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1398 call term_sendkeys(buf, ":call popup_settext(p, ['a'])\<CR>")
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1399 call VerifyScreenDump(buf, 'Test_popup_settext_04', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1400
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1401 " Growing with a list
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1402 call term_sendkeys(buf, ":call popup_settext(p, ['a','b','c'])\<CR>")
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1403 call VerifyScreenDump(buf, 'Test_popup_settext_03', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1404
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1405 " Empty list clears
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1406 call term_sendkeys(buf, ":call popup_settext(p, [])\<CR>")
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1407 call VerifyScreenDump(buf, 'Test_popup_settext_05', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1408
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1409 " Dicts
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1410 call term_sendkeys(buf, ":call popup_settext(p, [{'text': 'aaaa'}, {'text': 'bbbb'}, {'text': 'cccc'}])\<CR>")
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1411 call VerifyScreenDump(buf, 'Test_popup_settext_06', {})
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1412
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1413 " clean up
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1414 call StopVimInTerminal(buf)
0001d10a7661 patch 8.1.1553: not easy to change the text in a popup window Bram Moolenaar <Bram@vim.org> parents: 17101 diff changeset	1415 call delete('XtestPopupSetText')
17121 808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1416 endfunc
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1417
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1418 func Test_popup_hidden()
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1419 new
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1420
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1421 let winid = popup_atcursor('text', {'hidden': 1})
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1422 redraw
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1423 call assert_equal(0, popup_getpos(winid).visible)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1424 call popup_close(winid)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1425
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1426 let winid = popup_create('text', {'hidden': 1})
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1427 redraw
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1428 call assert_equal(0, popup_getpos(winid).visible)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1429 call popup_close(winid)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1430
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1431 func QuitCallback(id, res)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1432 let s:cb_winid = a:id
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1433 let s:cb_res = a:res
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1434 endfunc
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1435 let winid = popup_dialog('make a choice', {'hidden': 1,
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1436 \ 'filter': 'popup_filter_yesno',
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1437 \ 'callback': 'QuitCallback',
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1438 \ })
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1439 redraw
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1440 call assert_equal(0, popup_getpos(winid).visible)
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1441 call assert_equal(function('popup_filter_yesno'), popup_getoptions(winid).filter)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1442 call assert_equal(function('QuitCallback'), popup_getoptions(winid).callback)
17121 808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1443 exe "normal anot used by filter\<Esc>"
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1444 call assert_equal('not used by filter', getline(1))
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1445
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1446 call popup_show(winid)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1447 call feedkeys('y', "xt")
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1448 call assert_equal(1, s:cb_res)
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1449
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1450 bwipe!
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1451 delfunc QuitCallback
808ea76535a9 patch 8.1.1560: popup window hidden option not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17119 diff changeset	1452 endfunc
17123 efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1453
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1454 " Test options not checked elsewhere
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1455 func Test_set_get_options()
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1456 let winid = popup_create('some text', {'highlight': 'Beautiful'})
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1457 let options = popup_getoptions(winid)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1458 call assert_equal(1, options.wrap)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1459 call assert_equal(0, options.drag)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1460 call assert_equal('Beautiful', options.highlight)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1461
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1462 call popup_setoptions(winid, {'wrap': 0, 'drag': 1, 'highlight': 'Another'})
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1463 let options = popup_getoptions(winid)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1464 call assert_equal(0, options.wrap)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1465 call assert_equal(1, options.drag)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1466 call assert_equal('Another', options.highlight)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1467
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1468 call popup_close(winid)
efc6f5e3b543 patch 8.1.1561: popup_setoptions() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 17121 diff changeset	1469 endfunc
17151 ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1470
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1471 func Test_popupwin_garbage_collect()
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1472 func MyPopupFilter(x, winid, c)
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1473 " NOP
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1474 endfunc
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1475
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1476 let winid = popup_create('something', {'filter': function('MyPopupFilter', [{}])})
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1477 call test_garbagecollect_now()
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1478 redraw
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1479 " Must not crach caused by invalid memory access
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1480 call feedkeys('j', 'xt')
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1481 call assert_true(v:true)
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1482
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1483 call popup_close(winid)
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1484 delfunc MyPopupFilter
ebe9aab81898 patch 8.1.1575: callbacks may be garbage collected Bram Moolenaar <Bram@vim.org> parents: 17149 diff changeset	1485 endfunc

Mercurial > vim

annotate src/testdir/test_popupwin.vim @ 17151:ebe9aab81898 v8.1.1575