Mercurial > vim
comparison src/testdir/test_gui.vim @ 9756:00d753ea19a9 v7.4.2153
commit https://github.com/vim/vim/commit/877e95779869c5426102aa491f67d99904c8534c
Author: Bram Moolenaar <Bram@vim.org>
Date: Thu Aug 4 20:05:50 2016 +0200
patch 7.4.2153
Problem: GUI test isn't testing much.
Solution: Turn into a new style test. Execute a shell command.
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Thu, 04 Aug 2016 20:15:06 +0200 |
| parents | |
| children | 96667173293d |
comparison
equal
deleted
inserted
replaced
| 9755:18485302ec7f | 9756:00d753ea19a9 |
|---|---|
| 1 " Tests specifically for the GUI | |
| 2 | |
| 3 if !has('gui') || ($DISPLAY == "" && !has('gui_running')) | |
| 4 finish | |
| 5 endif | |
| 6 | |
| 7 " For KDE set a font, empty 'guifont' may cause a hang. | |
| 8 func SetUp() | |
| 9 if has("gui_kde") | |
| 10 set guifont=Courier\ 10\ Pitch/8/-1/5/50/0/0/0/0/0 | |
| 11 endif | |
| 12 endfunc | |
| 13 | |
| 14 " Test for resetting "secure" flag after GUI has started. | |
| 15 " Must be run first. | |
| 16 func Test_1_set_secure() | |
| 17 set exrc secure | |
| 18 gui -f | |
| 19 call assert_equal(1, has('gui_running')) | |
| 20 endfunc | |
| 21 | |
| 22 func Test_shell_command() | |
| 23 new | |
| 24 r !echo 'hello' | |
| 25 call assert_equal('hello', getline(2)) | |
| 26 bwipe! | |
| 27 call assert_true(1, match(execute('winpos'), 'Window position: X \d\+, Y \d\+') >= 0) | |
| 28 endfunc |