Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 1 | " Vim indent file |
| 2 | " Language: Rmd |
| 3 | " Author: Jakson Alves de Aquino <jalvesaq@gmail.com> |
Bram Moolenaar | 77cdfd1 | 2016-03-12 12:57:59 +0100 | [diff] [blame] | 4 | " Homepage: https://github.com/jalvesaq/R-Vim-runtime |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 5 | " Last Change: Sun Aug 19, 2018 09:14PM |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 6 | |
| 7 | |
| 8 | " Only load this indent file when no other was loaded. |
| 9 | if exists("b:did_indent") |
| 10 | finish |
| 11 | endif |
| 12 | runtime indent/r.vim |
| 13 | let s:RIndent = function(substitute(&indentexpr, "()", "", "")) |
| 14 | let b:did_indent = 1 |
| 15 | |
| 16 | setlocal indentkeys=0{,0},:,!^F,o,O,e |
| 17 | setlocal indentexpr=GetRmdIndent() |
| 18 | |
| 19 | if exists("*GetRmdIndent") |
| 20 | finish |
| 21 | endif |
| 22 | |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 23 | let s:cpo_save = &cpo |
| 24 | set cpo&vim |
| 25 | |
| 26 | function s:GetMdIndent() |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 27 | let pline = getline(v:lnum - 1) |
| 28 | let cline = getline(v:lnum) |
| 29 | if prevnonblank(v:lnum - 1) < v:lnum - 1 || cline =~ '^\s*[-\+\*]\s' || cline =~ '^\s*\d\+\.\s\+' |
| 30 | return indent(v:lnum) |
| 31 | elseif pline =~ '^\s*[-\+\*]\s' |
| 32 | return indent(v:lnum - 1) + 2 |
| 33 | elseif pline =~ '^\s*\d\+\.\s\+' |
| 34 | return indent(v:lnum - 1) + 3 |
| 35 | endif |
| 36 | return indent(prevnonblank(v:lnum - 1)) |
| 37 | endfunction |
| 38 | |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 39 | function s:GetYamlIndent() |
| 40 | let pline = getline(v:lnum - 1) |
| 41 | if pline =~ ':\s*$' |
Bram Moolenaar | a6c27c4 | 2019-05-09 19:16:22 +0200 | [diff] [blame] | 42 | return indent(v:lnum) + shiftwidth() |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 43 | elseif pline =~ '^\s*- ' |
| 44 | return indent(v:lnum) + 2 |
| 45 | endif |
| 46 | return indent(prevnonblank(v:lnum - 1)) |
| 47 | endfunction |
| 48 | |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 49 | function GetRmdIndent() |
Bram Moolenaar | 541f92d | 2015-06-19 13:27:23 +0200 | [diff] [blame] | 50 | if getline(".") =~ '^[ \t]*```{r .*}$' || getline(".") =~ '^[ \t]*```$' |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 51 | return 0 |
| 52 | endif |
Bram Moolenaar | 541f92d | 2015-06-19 13:27:23 +0200 | [diff] [blame] | 53 | if search('^[ \t]*```{r', "bncW") > search('^[ \t]*```$', "bncW") |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 54 | return s:RIndent() |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 55 | elseif v:lnum > 1 && search('^---$', "bnW") == 1 && |
| 56 | \ (search('^---$', "nW") > v:lnum || search('^...$', "nW") > v:lnum) |
| 57 | return s:GetYamlIndent() |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 58 | else |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 59 | return s:GetMdIndent() |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 60 | endif |
| 61 | endfunction |
| 62 | |
Bram Moolenaar | fc65cab | 2018-08-28 22:58:02 +0200 | [diff] [blame] | 63 | let &cpo = s:cpo_save |
| 64 | unlet s:cpo_save |
| 65 | |
Bram Moolenaar | db6ea06 | 2014-07-10 22:01:47 +0200 | [diff] [blame] | 66 | " vim: sw=2 |