Mercurial > vim
view runtime/indent/tilde.vim @ 7831:d621ab23fd19 v7.4.1212
commit https://github.com/vim/vim/commit/c1ab67674aa0dfdcf9f0e9701ac248e3eb41b19c
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jan 30 19:45:49 2016 +0100
patch 7.4.1212
Problem: Can't build with Motif.
Solution: Fix function declaration.(Dominique Pelle)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sat, 30 Jan 2016 20:00:03 +0100 |
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