Mercurial > vim
annotate runtime/indent/idlang.vim @ 25457:b95f9cc3d1b9 v8.2.3265
patch 8.2.3265: smartcase does not work correctly in very magic pattern
Commit: https://github.com/vim/vim/commit/78ba933d18439ff1a02f6be4c571e73ddceb3cd4
Author: Christian Brabandt <cb@256bit.org>
Date: Sun Aug 1 12:44:37 2021 +0200
patch 8.2.3265: smartcase does not work correctly in very magic pattern
Problem: Smartcase does not work correctly in very magic pattern.
Solution: Take the magicness into account when skipping over regexp items.
(Christian Brabandt, closes #8682, closes #7845)
| author | Bram Moolenaar <Bram@vim.org> |
|---|---|
| date | Sun, 01 Aug 2021 12:45:03 +0200 |
| parents | 63b0b7b79b25 |
| children | 9c221ad9634a |
| rev | line source |
|---|---|
| 7 | 1 " IDL (Interactive Data Language) indent file. |
| 2 " Language: IDL (ft=idlang) | |
| 11518 | 3 " Last change: 2017 Jun 13 |
| 7 | 4 " Maintainer: Aleksandar Jelenak <ajelenak AT yahoo.com> |
| 5 | |
| 6 " Only load this indent file when no other was loaded. | |
| 7 if exists("b:did_indent") | |
| 8 finish | |
| 9 endif | |
| 10 let b:did_indent = 1 | |
| 11 | |
|
3526
dd6c2497c997
Fix more 'cpo' issues in runtime files.
Bram Moolenaar <bram@vim.org>
parents:
7
diff
changeset
|
12 setlocal indentkeys=o,O,0=endif,0=ENDIF,0=endelse,0=ENDELSE,0=endwhile,0=ENDWHILE,0=endfor,0=ENDFOR,0=endrep,0=ENDREP |
| 7 | 13 |
| 14 setlocal indentexpr=GetIdlangIndent(v:lnum) | |
| 15 | |
| 16 " Only define the function once. | |
| 17 if exists("*GetIdlangIndent") | |
| 18 finish | |
| 19 endif | |
| 20 | |
| 21 function GetIdlangIndent(lnum) | |
| 22 " First non-empty line above the current line. | |
| 23 let pnum = prevnonblank(v:lnum-1) | |
| 24 " v:lnum is the first non-empty line -- zero indent. | |
| 25 if pnum == 0 | |
| 26 return 0 | |
| 27 endif | |
| 28 " Second non-empty line above the current line. | |
| 29 let pnum2 = prevnonblank(pnum-1) | |
| 30 | |
| 31 " Current indent. | |
| 32 let curind = indent(pnum) | |
| 33 | |
| 34 " Indenting of continued lines. | |
| 35 if getline(pnum) =~ '\$\s*\(;.*\)\=$' | |
| 36 if getline(pnum2) !~ '\$\s*\(;.*\)\=$' | |
| 11518 | 37 let curind = curind+shiftwidth() |
| 7 | 38 endif |
| 39 else | |
| 40 if getline(pnum2) =~ '\$\s*\(;.*\)\=$' | |
| 11518 | 41 let curind = curind-shiftwidth() |
| 7 | 42 endif |
| 43 endif | |
| 44 | |
| 45 " Indenting blocks of statements. | |
| 46 if getline(v:lnum) =~? '^\s*\(endif\|endelse\|endwhile\|endfor\|endrep\)\>' | |
| 47 if getline(pnum) =~? 'begin\>' | |
| 11518 | 48 elseif indent(v:lnum) > curind-shiftwidth() |
| 49 let curind = curind-shiftwidth() | |
| 7 | 50 else |
| 51 return -1 | |
| 52 endif | |
| 53 elseif getline(pnum) =~? 'begin\>' | |
| 11518 | 54 if indent(v:lnum) < curind+shiftwidth() |
| 55 let curind = curind+shiftwidth() | |
| 7 | 56 else |
| 57 return -1 | |
| 58 endif | |
| 59 endif | |
| 60 return curind | |
| 61 endfunction | |
| 62 |