Mercurial > vim
view runtime/indent/tilde.vim @ 9890:064effd222a3 v7.4.2219
commit https://github.com/vim/vim/commit/f5a39447a8ebe162ee62caa2ee502cd0e65eecaa
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Aug 16 21:04:41 2016 +0200
patch 7.4.2219
Problem: Recursive call to substitute gets stuck in sandbox. (Nikolai
Pavlov)
Solution: Handle the recursive call. (Christian Brabandt, closes https://github.com/vim/vim/issues/950)
Add a test.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 16 Aug 2016 21:15:06 +0200 |
parents | 3fc0f57ecb91 |
children | 63b0b7b79b25 |
line wrap: on
line source
"Description: Indent scheme for the tilde weblanguage "Author: Tobias Rundström <tobi@tobi.nu> "URL: http://tilde.tildesoftware.net "Last Change: May 8 09:15:09 CEST 2002 if exists ("b:did_indent") finish endif let b:did_indent = 1 setlocal autoindent setlocal indentexpr=GetTildeIndent(v:lnum) setlocal indentkeys=o,O,) if exists("*GetTildeIndent") finish endif function GetTildeIndent(lnum) let plnum = prevnonblank(v:lnum-1) if plnum == 0 return 0 endif if getline(v:lnum) =~ '^\s*\~\(endif\|else\|elseif\|end\)\>' return indent(v:lnum) - &sw endif 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\)\>' return indent(plnum) + &sw else return -1 endif endfunction