| 
									
										
										
										
											2014-07-10 22:01:47 +02:00
										 |  |  | " Vim indent file | 
					
						
							|  |  |  | " Language:	Rrst | 
					
						
							|  |  |  | " Author:	Jakson Alves de Aquino <jalvesaq@gmail.com> | 
					
						
							| 
									
										
										
										
											2016-03-12 12:57:59 +01:00
										 |  |  | " Homepage:     https://github.com/jalvesaq/R-Vim-runtime | 
					
						
							|  |  |  | " Last Change:	Tue Apr 07, 2015  04:38PM | 
					
						
							| 
									
										
										
										
											2014-07-10 22:01:47 +02:00
										 |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | " Only load this indent file when no other was loaded. | 
					
						
							|  |  |  | if exists("b:did_indent") | 
					
						
							|  |  |  |   finish | 
					
						
							|  |  |  | endif | 
					
						
							|  |  |  | runtime indent/r.vim | 
					
						
							|  |  |  | let s:RIndent = function(substitute(&indentexpr, "()", "", "")) | 
					
						
							|  |  |  | let b:did_indent = 1 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | setlocal indentkeys=0{,0},:,!^F,o,O,e | 
					
						
							|  |  |  | setlocal indentexpr=GetRrstIndent() | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | if exists("*GetRrstIndent") | 
					
						
							|  |  |  |   finish | 
					
						
							|  |  |  | endif | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | function GetRstIndent() | 
					
						
							|  |  |  |   let pline = getline(v:lnum - 1) | 
					
						
							|  |  |  |   let cline = getline(v:lnum) | 
					
						
							|  |  |  |   if prevnonblank(v:lnum - 1) < v:lnum - 1 || cline =~ '^\s*[-\+\*]\s' || cline =~ '^\s*\d\+\.\s\+' | 
					
						
							|  |  |  |     return indent(v:lnum) | 
					
						
							|  |  |  |   elseif pline =~ '^\s*[-\+\*]\s' | 
					
						
							|  |  |  |     return indent(v:lnum - 1) + 2 | 
					
						
							|  |  |  |   elseif pline =~ '^\s*\d\+\.\s\+' | 
					
						
							|  |  |  |     return indent(v:lnum - 1) + 3 | 
					
						
							|  |  |  |   endif | 
					
						
							|  |  |  |   return indent(prevnonblank(v:lnum - 1)) | 
					
						
							|  |  |  | endfunction | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | function GetRrstIndent() | 
					
						
							|  |  |  |   if getline(".") =~ '^\.\. {r .*}$' || getline(".") =~ '^\.\. \.\.$' | 
					
						
							|  |  |  |     return 0 | 
					
						
							|  |  |  |   endif | 
					
						
							|  |  |  |   if search('^\.\. {r', "bncW") > search('^\.\. \.\.$', "bncW") | 
					
						
							|  |  |  |     return s:RIndent() | 
					
						
							|  |  |  |   else | 
					
						
							|  |  |  |     return GetRstIndent() | 
					
						
							|  |  |  |   endif | 
					
						
							|  |  |  | endfunction | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | " vim: sw=2 |