Mercurial > vim
annotate runtime/indent/teraterm.vim @ 28459:52ef65c0637f v8.2.4754
patch 8.2.4754: using cached values after unsetting some environment variables
Commit: https://github.com/vim/vim/commit/7714231bb5b15f7c85453f3945c108478de1d08a
Author: LemonBoy <thatlemon@gmail.com>
Date: Fri Apr 15 20:50:46 2022 +0100
patch 8.2.4754: using cached values after unsetting some environment variables
Problem: Still using cached values after unsetting some known environment
variables.
Solution: Take care of the side effects. (closes #10194)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Fri, 15 Apr 2022 22:00:03 +0200 |
parents | ebedba7a4898 |
children |
rev | line source |
---|---|
6951 | 1 " Vim indent file |
2 " Language: Tera Term Language (TTL) | |
14668 | 3 " Based on Tera Term Version 4.100 |
6951 | 4 " Maintainer: Ken Takata |
5 " URL: https://github.com/k-takata/vim-teraterm | |
26050 | 6 " Last Change: 2021-10-18 |
6951 | 7 " Filenames: *.ttl |
8 " License: VIM License | |
9 | |
10 if exists("b:did_indent") | |
11 finish | |
12 endif | |
13 let b:did_indent = 1 | |
14 | |
15 setlocal nosmartindent | |
16 setlocal noautoindent | |
17 setlocal indentexpr=GetTeraTermIndent(v:lnum) | |
18 setlocal indentkeys=!^F,o,O,e | |
19 setlocal indentkeys+==elseif,=endif,=loop,=next,=enduntil,=endwhile | |
20 | |
26050 | 21 let b:undo_indent = "setl ai< inde< indk< si<" |
22 | |
6951 | 23 if exists("*GetTeraTermIndent") |
24 finish | |
25 endif | |
26 | |
27 function! GetTeraTermIndent(lnum) | |
28 let l:prevlnum = prevnonblank(a:lnum-1) | |
29 if l:prevlnum == 0 | |
30 " top of file | |
31 return 0 | |
32 endif | |
33 | |
34 " grab the previous and current line, stripping comments. | |
35 let l:prevl = substitute(getline(l:prevlnum), ';.*$', '', '') | |
36 let l:thisl = substitute(getline(a:lnum), ';.*$', '', '') | |
37 let l:previ = indent(l:prevlnum) | |
38 | |
39 let l:ind = l:previ | |
40 | |
9908
2b6654519a7c
commit https://github.com/vim/vim/commit/7571d55f7dcc009a375b2124cce2c8b21f361234
Christian Brabandt <cb@256bit.org>
parents:
6951
diff
changeset
|
41 if l:prevl =~ '^\s*if\>.*\<then\>' |
6951 | 42 " previous line opened a block |
11518 | 43 let l:ind += shiftwidth() |
6951 | 44 endif |
45 if l:prevl =~ '^\s*\%(elseif\|else\|do\|until\|while\|for\)\>' | |
46 " previous line opened a block | |
11518 | 47 let l:ind += shiftwidth() |
6951 | 48 endif |
49 if l:thisl =~ '^\s*\%(elseif\|else\|endif\|enduntil\|endwhile\|loop\|next\)\>' | |
50 " this line closed a block | |
11518 | 51 let l:ind -= shiftwidth() |
6951 | 52 endif |
53 | |
54 return l:ind | |
55 endfunction | |
56 | |
57 " vim: ts=8 sw=2 sts=2 |