Loading ...
Sorry, an error occurred while loading the content.

31984art/lisp/scheme, plugins and patches for {filetype,scripts}.vim

Expand Messages
  • Dorai Sitaram
    Apr 5, 2003
      Here are two patches to filetype.vim and
      scripts.vim respectively. Their purpose:

      1. Recognize *.art files as ft=art

      2. Recognize *.ss files as ft=scheme

      3. Identify Scheme scripts as ft=scheme based on
      either having a first line with a #! line containing
      'scheme', or having either the first or second line
      contain 'scheme'.

      I've also provided ftplugin/art.vim, ftplugin/lisp.vim,
      ftplugin/scheme.vim, and syntax/art.vim in
      http://www.ccs.neu.edu/~dorai/vimplugins/vimplugins.html
      (download link is just below title).

      Patches for filetype.vim and scripts.vim follow:


      *** filetype.vim.new Sat Apr 5 22:03:40 2003
      --- filetype.vim Mon May 6 16:22:49 2002
      ***************
      *** 97,105 ****
      " Arc Macro Language
      au BufNewFile,BufRead *.aml setf aml

      - " ART-IM, ART*Enterprise
      - au BufNewFile,BufRead *.art setf art
      -
      " ASN.1
      au BufNewFile,BufRead *.asn,*.asn1 setf asn

      --- 97,102 ----
      ***************
      *** 1049,1055 ****
      au BufNewFile,BufRead .zsh*,.zlog*,.zprofile,.zfbfmarks,.zcompdump* setf zsh

      " Scheme
      ! au BufNewFile,BufRead *.scm,*.ss setf scheme

      " Screen RC
      au BufNewFile,BufRead .screenrc,screenrc setf screen
      --- 1046,1052 ----
      au BufNewFile,BufRead .zsh*,.zlog*,.zprofile,.zfbfmarks,.zcompdump* setf zsh

      " Scheme
      ! au BufNewFile,BufRead *.scm setf scheme

      " Screen RC
      au BufNewFile,BufRead .screenrc,screenrc setf screen




      *** scripts.vim.new Sat Apr 5 22:07:36 2003
      --- scripts.vim Sat Apr 5 22:04:04 2003
      ***************
      *** 114,123 ****
      elseif s:name =~ 'wml'
      set ft=wml

      - " Scheme scripts
      - elseif s:name =~ 'scheme'
      - set ft=scheme
      -
      endif
      unlet s:name

      --- 114,119 ----
      ***************
      *** 263,272 ****
      elseif s:line1 =~ '^==\d\+== valgrind'
      set ft=valgrind

      - " Scheme scripts
      - elseif s:line1 =~ 'scheme' || s:line2 =~ 'scheme'
      - set ft=scheme
      -
      " CVS diff
      else
      let lnum = 1
      --- 259,264 ----
    • Show all 10 messages in this topic