" Vim filetype plugin file" Language:	aspvbs" Maintainer:	Dan Sharp <dwsharp at hotmail dot com>" Last Changed: 2004 Jun 28" URL:		http://mywebpage.netscape.com/sharppeople/vim/ftplugin if exists("b:did_ftplugin") | finish | endif " Make sure the continuation lines below do not cause problems in" compatibility mode.let s:save_cpo = &cposet cpo-=C " Define some defaults in case the included ftplugins don't set them.let s:undo_ftplugin = ""let s:browsefilter = "HTML Files (*.html, *.htm)\t*.htm*\n" .	    \	     "All Files (*.*)\t*.*\n"let s:match_words = "" runtime! ftplugin/html.vim ftplugin/html_*.vim ftplugin/html/*.vimlet b:did_ftplugin = 1 " Override our defaults if these were set by an included ftplugin.if exists("b:undo_ftplugin")    let s:undo_ftplugin = b:undo_ftpluginendifif exists("b:browsefilter")    let s:browsefilter = b:browsefilterendifif exists("b:match_words")    let s:match_words = b:match_wordsendif " ASP:  Active Server Pages (with Visual Basic Script)" thanks to Gontran BAERTSif exists("loaded_matchit")  let s:notend = '\%(\<end\s\+\)\@<!'  let b:match_ignorecase = 1  let b:match_words =  \ s:notend . '\<if\>\%(.\{-}then\s\+\w\)\@!:\<elseif\>:^\s*\<else\>:\<end\s\+\<if\>,' .  \ s:notend . '\<select\s\+case\>:\<case\>:\<case\s\+else\>:\<end\s\+select\>,' .  \ '^\s*\<sub\>:\<end\s\+sub\>,' .  \ '^\s*\<function\>:\<end\s\+function\>,' .  \ '\<class\>:\<end\s\+class\>,' .  \ '^\s*\<do\>:\<loop\>,' .  \ '^\s*\<for\>:\<next\>,' .  \ '\<while\>:\<wend\>,' .  \ s:match_wordsendif " Change the :browse e filter to primarily show ASP-related files.if has("gui_win32")    let  b:browsefilter="ASP Files (*.asp)\t*.asp\n" . s:browsefilterendif let b:undo_ftplugin = "unlet! b:match_words b:match_ignorecase b:browsefilter | " . s:undo_ftplugin " Restore the saved compatibility options.let &cpo = s:save_cpo