Mercurial > vim
comparison runtime/ftplugin/aspvbs.vim @ 7:3fc0f57ecb91 v7.0001
updated for version 7.0001
| author | vimboss |
|---|---|
| date | Sun, 13 Jun 2004 20:20:40 +0000 |
| parents | |
| children | 4424b47a0797 |
comparison
equal
deleted
inserted
replaced
| 6:c2daee826b8f | 7:3fc0f57ecb91 |
|---|---|
| 1 " Vim filetype plugin file | |
| 2 " Language: aspvbs | |
| 3 " Maintainer: Dan Sharp <dwsharp at hotmail dot com> | |
| 4 " Last Changed: 2003 Sep 29 | |
| 5 " URL: http://mywebpage.netscape.com/sharppeople/vim/ftplugin | |
| 6 | |
| 7 if exists("b:did_ftplugin") | finish | endif | |
| 8 | |
| 9 " Make sure the continuation lines below do not cause problems in | |
| 10 " compatibility mode. | |
| 11 let s:save_cpo = &cpo | |
| 12 set cpo-=C | |
| 13 | |
| 14 " Define some defaults in case the included ftplugins don't set them. | |
| 15 let s:undo_ftplugin = "" | |
| 16 let s:browsefilter = "HTML Files (*.html, *.htm)\t*.htm*\n" . | |
| 17 \ "All Files (*.*)\t*.*\n" | |
| 18 let s:match_words = "" | |
| 19 | |
| 20 runtime! ftplugin/html.vim ftplugin/html_*.vim ftplugin/html/*.vim | |
| 21 let b:did_ftplugin = 1 | |
| 22 | |
| 23 " Override our defaults if these were set by an included ftplugin. | |
| 24 if exists("b:undo_ftplugin") | |
| 25 let s:undo_ftplugin = b:undo_ftplugin | |
| 26 endif | |
| 27 if exists("b:browsefilter") | |
| 28 let s:browsefilter = b:browsefilter | |
| 29 endif | |
| 30 if exists("b:match_words") | |
| 31 let s:match_words = b:match_words | |
| 32 endif | |
| 33 | |
| 34 " ASP: Active Server Pages (with Visual Basic Script) | |
| 35 " thanks to Gontran BAERTS | |
| 36 if exists("loaded_matchit") | |
| 37 let s:notend = '\%(\<end\s\+\)\@<!' | |
| 38 let b:match_words = | |
| 39 \ s:notend . '\<If\>:^\s\+\<Else\>:\<ElseIf\>:\<end\s\+\<if\>,' . | |
| 40 \ s:notend . '\<Select\s\+\<Case\>:\<Case\>:\<Case\s\+\<Else\>:\<End\s\+\<Select\>,' . | |
| 41 \ '^\s*\<Sub\>:\<End\s\+\<Sub\>,' . | |
| 42 \ '^\s*\<Function\>:\<End\s\+\<Function\>,' . | |
| 43 \ '\<Class\>:\<End\s\+\<Class\>,' . | |
| 44 \ '^\s*\<Do\>:\<Loop\>,' . | |
| 45 \ '^\s*\<For\>:\<Next\>,' . | |
| 46 \ '\<While\>:\<Wend\>,' . | |
| 47 \ s:match_words | |
| 48 endif | |
| 49 | |
| 50 " Change the :browse e filter to primarily show ASP-related files. | |
| 51 if has("gui_win32") | |
| 52 let b:browsefilter="ASP Files (*.asp)\t*.asp\n" . s:browsefilter | |
| 53 endif | |
| 54 | |
| 55 let b:undo_ftplugin = "unlet! b:match_words b:browsefilter | " . s:undo_ftplugin | |
| 56 | |
| 57 " Restore the saved compatibility options. | |
| 58 let &cpo = s:save_cpo |