Mercurial > vim

diff src/testdir/test_filetype.vim @ 27493:3af3dee7e5d9 v8.2.4274

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.4274: Basic and form filetype detection is incomplete Commit: https://github.com/vim/vim/commit/c570e9cf68c0fe30366e82c96be460047dd659b9 Author: Doug Kearns <dougkearns@gmail.com> Date: Mon Jan 31 17:09:14 2022 +0000 patch 8.2.4274: Basic and form filetype detection is incomplete Problem: Basic and form filetype detection is incomplete. Solution: Add a separate function for .frm files. (Doug Kearns, closes https://github.com/vim/vim/issues/9675)
author Bram Moolenaar <Bram@vim.org>
date Mon, 31 Jan 2022 18:15:03 +0100
parents 31b0d8898489
children ce72087b601f
line wrap: on
line diff
--- a/src/testdir/test_filetype.vim
+++ b/src/testdir/test_filetype.vim
@@ -183,6 +183,7 @@ let s:filename_checks = {
     \ 'fgl': ['file.4gl', 'file.4gh', 'file.m4gl'],
     \ 'fish': ['file.fish'],
     \ 'focexec': ['file.fex', 'file.focexec'],
+    \ 'form': ['file.frm'],
     \ 'forth': ['file.ft', 'file.fth'],
     \ 'fortran': ['file.f', 'file.for', 'file.fortran', 'file.fpp', 'file.ftn', 'file.f77', 'file.f90', 'file.f95', 'file.f03', 'file.f08'],
     \ 'fpcmake': ['file.fpc'],
@@ -1278,4 +1279,31 @@ func Test_bas_file()
   filetype off
 endfunc
 
+func Test_frm_file()
+  filetype on
+
+  call writefile(['looks like FORM'], 'Xfile.frm')
+  split Xfile.frm
+  call assert_equal('form', &filetype)
+  bwipe!
+
+  " Test dist#ft#FTfrm()
+
+  let g:filetype_frm = 'form'
+  split Xfile.frm
+  call assert_equal('form', &filetype)
+  bwipe!
+  unlet g:filetype_frm
+
+  " Visual Basic
+
+  call writefile(['Begin VB.Form Form1'], 'Xfile.frm')
+  split Xfile.frm
+  call assert_equal('vb', &filetype)
+  bwipe!
+
+  call delete('Xfile.frm')
+  filetype off
+endfunc
+
 " vim: shiftwidth=2 sts=2 expandtab