mirror of
https://github.com/neovim/neovim.git
synced 2024-12-24 13:15:09 -07:00
vim-patch:8.2.4714: using g:filetype_dat and g:filetype_src not tested
Problem: Using g:filetype_dat and g:filetype_src not tested.
Solution: Add a test. (Patrick Meiser-Knosowski, closes vim/vim#10117)
a8034a4886
This commit is contained in:
parent
8f95f3ea06
commit
18ed556bbd
@ -875,22 +875,32 @@ endfunc
|
||||
func Test_dat_file()
|
||||
filetype on
|
||||
|
||||
" KRL header start with "&WORD", but is not always present.
|
||||
call writefile(['&ACCESS'], 'datfile.dat')
|
||||
split datfile.dat
|
||||
call assert_equal('krl', &filetype)
|
||||
bwipe!
|
||||
call delete('datfile.dat')
|
||||
|
||||
" KRL defdat with leading spaces, for KRL file extension is not case
|
||||
" sensitive.
|
||||
call writefile([' DEFDAT datfile'], 'datfile.Dat')
|
||||
split datfile.Dat
|
||||
call assert_equal('krl', &filetype)
|
||||
bwipe!
|
||||
call delete('datfile.Dat')
|
||||
|
||||
call writefile(['', 'defdat datfile'], 'datfile.DAT')
|
||||
" KRL defdat with embedded spaces, file starts with empty line(s).
|
||||
call writefile(['', 'defdat datfile public'], 'datfile.DAT')
|
||||
split datfile.DAT
|
||||
call assert_equal('krl', &filetype)
|
||||
bwipe!
|
||||
|
||||
" User may overrule file inspection
|
||||
let g:filetype_dat = 'dat'
|
||||
split datfile.DAT
|
||||
call assert_equal('dat', &filetype)
|
||||
bwipe!
|
||||
call delete('datfile.DAT')
|
||||
|
||||
filetype off
|
||||
@ -1460,22 +1470,31 @@ endfunc
|
||||
func Test_src_file()
|
||||
filetype on
|
||||
|
||||
" KRL header start with "&WORD", but is not always present.
|
||||
call writefile(['&ACCESS'], 'srcfile.src')
|
||||
split srcfile.src
|
||||
call assert_equal('krl', &filetype)
|
||||
bwipe!
|
||||
call delete('srcfile.src')
|
||||
|
||||
" KRL def with leading spaces, for KRL file extension is not case sensitive.
|
||||
call writefile([' DEF srcfile()'], 'srcfile.Src')
|
||||
split srcfile.Src
|
||||
call assert_equal('krl', &filetype)
|
||||
bwipe!
|
||||
call delete('srcfile.Src')
|
||||
|
||||
" KRL global def with embedded spaces, file starts with empty line(s).
|
||||
call writefile(['', 'global def srcfile()'], 'srcfile.SRC')
|
||||
split srcfile.SRC
|
||||
call assert_equal('krl', &filetype)
|
||||
bwipe!
|
||||
|
||||
" User may overrule file inspection
|
||||
let g:filetype_src = 'src'
|
||||
split srcfile.SRC
|
||||
call assert_equal('src', &filetype)
|
||||
bwipe!
|
||||
call delete('srcfile.SRC')
|
||||
|
||||
filetype off
|
||||
|
Loading…
Reference in New Issue
Block a user