Mercurial > vim
comparison runtime/indent/tilde.vim @ 7:3fc0f57ecb91 v7.0001
updated for version 7.0001
| author | vimboss |
|---|---|
| date | Sun, 13 Jun 2004 20:20:40 +0000 |
| parents | |
| children | 63b0b7b79b25 |
comparison
equal
deleted
inserted
replaced
| 6:c2daee826b8f | 7:3fc0f57ecb91 |
|---|---|
| 1 "Description: Indent scheme for the tilde weblanguage | |
| 2 "Author: Tobias Rundström <tobi@tobi.nu> | |
| 3 "URL: http://tilde.tildesoftware.net | |
| 4 "Last Change: May 8 09:15:09 CEST 2002 | |
| 5 | |
| 6 if exists ("b:did_indent") | |
| 7 finish | |
| 8 endif | |
| 9 | |
| 10 let b:did_indent = 1 | |
| 11 | |
| 12 setlocal autoindent | |
| 13 setlocal indentexpr=GetTildeIndent(v:lnum) | |
| 14 setlocal indentkeys=o,O,) | |
| 15 | |
| 16 if exists("*GetTildeIndent") | |
| 17 finish | |
| 18 endif | |
| 19 | |
| 20 function GetTildeIndent(lnum) | |
| 21 let plnum = prevnonblank(v:lnum-1) | |
| 22 | |
| 23 if plnum == 0 | |
| 24 return 0 | |
| 25 endif | |
| 26 | |
| 27 if getline(v:lnum) =~ '^\s*\~\(endif\|else\|elseif\|end\)\>' | |
| 28 return indent(v:lnum) - &sw | |
| 29 endif | |
| 30 | |
| 31 if getline(plnum) =~ '^\s*\~\(if\|foreach\|foreach_row\|xml_loop\|file_loop\|file_write\|file_append\|imap_loopsections\|imap_index\|imap_list\|ldap_search\|post_loopall\|post_loop\|file_loop\|sql_loop_num\|sql_dbmsselect\|search\|sql_loop\|post\|for\|function_define\|silent\|while\|setvalbig\|mail_create\|systempipe\|mail_send\|dual\|elseif\|else\)\>' | |
| 32 return indent(plnum) + &sw | |
| 33 else | |
| 34 return -1 | |
| 35 endif | |
| 36 endfunction |