Mercurial > vim

comparison runtime/autoload/dist/ft.vim @ 27845:e63514ae0c29 v8.2.4448

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.4448: filetype detection is failing Commit: https://github.com/vim/vim/commit/b2c72359dce4c4027dc0c05844eb2e76ea947014 Author: Bram Moolenaar <Bram@vim.org> Date: Tue Feb 22 21:17:40 2022 +0000 patch 8.2.4448: filetype detection is failing Problem: Filetype detection is failing. Solution: Do not use "s:" where it is no longer allowed.
author Bram Moolenaar <Bram@vim.org>
date Tue, 22 Feb 2022 22:30:03 +0100
parents ce72087b601f
children 834d3fba1e7c
comparison
equal deleted inserted replaced
27844:e8b205c42b18 27845:e63514ae0c29
81 81
82 if match(lines, fb_preproc) > -1 || match(lines, fb_comment) > -1 || match(lines, fb_keywords) > -1 82 if match(lines, fb_preproc) > -1 || match(lines, fb_comment) > -1 || match(lines, fb_keywords) > -1
83 setf freebasic 83 setf freebasic
84 elseif match(lines, qb64_preproc) > -1 84 elseif match(lines, qb64_preproc) > -1
85 setf qb64 85 setf qb64
86 elseif match(lines, s:ft_visual_basic_content) > -1 86 elseif match(lines, ft_visual_basic_content) > -1
87 setf vb 87 setf vb
88 else 88 else
89 setf basic 89 setf basic
90 endif 90 endif
91 enddef 91 enddef
239 return 239 return
240 endif 240 endif
241 241
242 var lines = getline(1, min([line("$"), 5])) 242 var lines = getline(1, min([line("$"), 5]))
243 243
244 if match(lines, s:ft_visual_basic_content) > -1 244 if match(lines, ft_visual_basic_content) > -1
245 setf vb 245 setf vb
246 else 246 else
247 setf form 247 setf form
248 endif 248 endif
249 enddef 249 enddef
432 setf aspvbs 432 setf aspvbs
433 elseif lines =~ "<?" 433 elseif lines =~ "<?"
434 setf php 434 setf php
435 # Pascal supports // comments but they're vary rarely used for file 435 # Pascal supports // comments but they're vary rarely used for file
436 # headers so assume POV-Ray 436 # headers so assume POV-Ray
437 elseif lines =~ '^\s*\%({\|(\*\)' || lines =~? s:ft_pascal_keywords 437 elseif lines =~ '^\s*\%({\|(\*\)' || lines =~? ft_pascal_keywords
438 setf pascal 438 setf pascal
439 else 439 else
440 FTasmsyntax() 440 FTasmsyntax()
441 if exists("b:asmsyntax") 441 if exists("b:asmsyntax")
442 exe "setf " .. fnameescape(b:asmsyntax) 442 exe "setf " .. fnameescape(b:asmsyntax)
494 # Look for either an opening comment or a program start. 494 # Look for either an opening comment or a program start.
495 # If not found, assume Progress. 495 # If not found, assume Progress.
496 var lnum = 1 496 var lnum = 1
497 while lnum <= 10 && lnum < line('$') 497 while lnum <= 10 && lnum < line('$')
498 var line = getline(lnum) 498 var line = getline(lnum)
499 if line =~ s:ft_pascal_comments || line =~? s:ft_pascal_keywords 499 if line =~ ft_pascal_comments || line =~? ft_pascal_keywords
500 setf pascal 500 setf pascal
501 return 501 return
502 elseif line !~ '^\s*$' || line =~ '^/\*' 502 elseif line !~ '^\s*$' || line =~ '^/\*'
503 # Not an empty line: Doesn't look like valid Pascal code. 503 # Not an empty line: Doesn't look like valid Pascal code.
504 # Or it looks like a Progress /* comment 504 # Or it looks like a Progress /* comment
512 export def FTpp() 512 export def FTpp()
513 if exists("g:filetype_pp") 513 if exists("g:filetype_pp")
514 exe "setf " .. g:filetype_pp 514 exe "setf " .. g:filetype_pp
515 else 515 else
516 var line = getline(nextnonblank(1)) 516 var line = getline(nextnonblank(1))
517 if line =~ s:ft_pascal_comments || line =~? s:ft_pascal_keywords 517 if line =~ ft_pascal_comments || line =~? ft_pascal_keywords
518 setf pascal 518 setf pascal
519 else 519 else
520 setf puppet 520 setf puppet
521 endif 521 endif
522 endif 522 endif
683 setf hog 683 setf hog
684 return 684 return
685 endtry 685 endtry
686 var dir = expand('<amatch>:p:h') 686 var dir = expand('<amatch>:p:h')
687 for line in config_lines 687 for line in config_lines
688 if line =~ s:ft_rules_udev_rules_pattern 688 if line =~ ft_rules_udev_rules_pattern
689 var udev_rules = substitute(line, s:ft_rules_udev_rules_pattern, '\1', "") 689 var udev_rules = substitute(line, ft_rules_udev_rules_pattern, '\1', "")
690 if dir == udev_rules 690 if dir == udev_rules
691 setf udevrules 691 setf udevrules
692 endif 692 endif
693 break 693 break
694 endif 694 endif