mirror of
https://github.com/vim/vim.git
synced 2025-07-26 11:04:33 -04:00
patch 8.2.2611: conditions for startup tests are not exactly right
Problem: Conditions for startup tests are not exactly right. Solution: Check for type of GUI instead of MS-Windows. (Ozaki Kiichi, closes #7976)
This commit is contained in:
parent
1e448465e1
commit
f8c52e8d08
@ -3542,8 +3542,11 @@ usage(void)
|
||||
#endif // FEAT_GUI_X11
|
||||
#ifdef FEAT_GUI_GTK
|
||||
mch_msg(_("\nArguments recognised by gvim (GTK+ version):\n"));
|
||||
main_msg(_("-background <color>\tUse <color> for the background (also: -bg)"));
|
||||
main_msg(_("-foreground <color>\tUse <color> for normal text (also: -fg)"));
|
||||
main_msg(_("-font <font>\t\tUse <font> for normal text (also: -fn)"));
|
||||
main_msg(_("-geometry <geom>\tUse <geom> for initial geometry (also: -geom)"));
|
||||
main_msg(_("-iconic\t\tStart Vim iconified"));
|
||||
main_msg(_("-reverse\t\tUse reverse video (also: -rv)"));
|
||||
main_msg(_("-display <display>\tRun Vim on <display> (also: --display)"));
|
||||
main_msg(_("--role <role>\tSet a unique role to identify the main window"));
|
||||
|
@ -199,4 +199,29 @@ func CheckNotAsan()
|
||||
endif
|
||||
endfunc
|
||||
|
||||
" Command to check for satisfying any of the conditions.
|
||||
" e.g. CheckAnyOf Feature:bsd Feature:sun Linux
|
||||
command -nargs=+ CheckAnyOf call CheckAnyOf(<f-args>)
|
||||
func CheckAnyOf(...)
|
||||
let excp = []
|
||||
for arg in a:000
|
||||
try
|
||||
exe 'Check' .. substitute(arg, ':', ' ', '')
|
||||
return
|
||||
catch /^Skipped:/
|
||||
let excp += [substitute(v:exception, '^Skipped:\s*', '', '')]
|
||||
endtry
|
||||
endfor
|
||||
throw 'Skipped: ' .. join(excp, '; ')
|
||||
endfunc
|
||||
|
||||
" Command to check for satisfying all of the conditions.
|
||||
" e.g. CheckAllOf Unix Gui Option:ballooneval
|
||||
command -nargs=+ CheckAllOf call CheckAllOf(<f-args>)
|
||||
func CheckAllOf(...)
|
||||
for arg in a:000
|
||||
exe 'Check' .. substitute(arg, ':', ' ', '')
|
||||
endfor
|
||||
endfunc
|
||||
|
||||
" vim: shiftwidth=2 sts=2 expandtab
|
||||
|
@ -109,9 +109,8 @@ func Test_pack_in_rtp_when_plugins_run()
|
||||
endfunc
|
||||
|
||||
func Test_help_arg()
|
||||
if !has('unix') && has('gui_running')
|
||||
throw 'Skipped: does not work with gvim on MS-Windows'
|
||||
endif
|
||||
" This does not work with a GUI-only binary, such as on MS-Windows.
|
||||
CheckAnyOf Unix NotGui
|
||||
|
||||
if RunVim([], [], '--help >Xtestout')
|
||||
let lines = readfile('Xtestout')
|
||||
@ -426,7 +425,7 @@ endfunction
|
||||
" Test the -reverse and +reverse arguments (for GUI only).
|
||||
func Test_reverse()
|
||||
CheckCanRunGui
|
||||
CheckNotMSWindows
|
||||
CheckAnyOf Feature:gui_gtk Feature:gui_motif Feature:gui_athena
|
||||
|
||||
let after =<< trim [CODE]
|
||||
call writefile([&background], "Xtest_reverse")
|
||||
@ -447,7 +446,7 @@ endfunc
|
||||
" Test the -background and -foreground arguments (for GUI only).
|
||||
func Test_background_foreground()
|
||||
CheckCanRunGui
|
||||
CheckNotMSWindows
|
||||
CheckAnyOf Feature:gui_gtk Feature:gui_motif Feature:gui_athena
|
||||
|
||||
" Is there a better way to check the effect of -background & -foreground
|
||||
" other than merely looking at &background (dark or light)?
|
||||
@ -496,7 +495,7 @@ endfunc
|
||||
" Test the -geometry argument (for GUI only).
|
||||
func Test_geometry()
|
||||
CheckCanRunGui
|
||||
CheckNotMSWindows
|
||||
CheckAnyOf Feature:gui_gtk Feature:gui_motif Feature:gui_athena
|
||||
|
||||
if has('gui_motif') || has('gui_athena')
|
||||
" FIXME: With GUI Athena or Motif, the value of getwinposx(),
|
||||
@ -528,7 +527,7 @@ endfunc
|
||||
" Test the -iconic argument (for GUI only).
|
||||
func Test_iconic()
|
||||
CheckCanRunGui
|
||||
CheckNotMSWindows
|
||||
CheckAnyOf Feature:gui_gtk Feature:gui_motif Feature:gui_athena
|
||||
|
||||
call RunVim([], [], '-f -g -iconic -cq')
|
||||
|
||||
|
@ -750,6 +750,8 @@ static char *(features[]) =
|
||||
|
||||
static int included_patches[] =
|
||||
{ /* Add new patch number below this line */
|
||||
/**/
|
||||
2611,
|
||||
/**/
|
||||
2610,
|
||||
/**/
|
||||
|
Loading…
x
Reference in New Issue
Block a user