sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

vim. parse comments at eol in parse_body()

Browse source
This commit is contained in:
Johann Klähn 2010-09-15 21:18:23 +02:00
parent 2a82edb9f0
commit 4d56417f75
1 changed files with 18 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
contrib/vim/ftplugin/ledger.vim
View file

@ -316,6 +316,9 @@ function! s:transaction.from_lnum(lnum) dict "{{{2
endif endif
call remove(parts, 0) call remove(parts, 0)
endfor endfor
" FIXME: this will break comments at the end of this 'head' line
" they need 2 spaces in front of the semicolon
let trans['description'] = join(parts) let trans['description'] = join(parts)
return trans return trans
endf "}}} endf "}}}
@ -344,11 +347,18 @@ function! s:transaction.parse_body(...) dict "{{{2
return [] return []
endif endif
let lnum = head + 1 let lnum = head
let tags = {} let tags = {}
let postings = [] let postings = []
while lnum <= tail while lnum <= tail
let line = getline(lnum) let line = split(getline(lnum), '\s*\%(\t\| \);', 1)
if line[0] =~ '^\s\+[^[:blank:];]'
" posting
" FIXME: replaces original spacing in amount with single spaces
let parts = split(line[0], '\%(\t\| \)\s*')
call add(postings, {'account': parts[0], 'amount': join(parts[1:], ' ')})
end
" where are tags to be stored? " where are tags to be stored?
if empty(postings) if empty(postings)
@ -362,22 +372,17 @@ function! s:transaction.parse_body(...) dict "{{{2
let tag_container = postings[-1]['tags'] let tag_container = postings[-1]['tags']
endif endif
if line =~ '^\s\+[^[:blank:];]' let comment = join(line[1:], ' ;')
" posting if comment =~ '^\s*:'
" FIXME: comments at the eol
" FIXME: replaces original spacing in amount with single spaces
let parts = split(line, '\(\t\|\s\{2,}\)')
call add(postings, {'account': parts[0], 'amount': join(parts[1:])})
elseif line =~ '^\s\+;\s*:'
" tags without values " tags without values
for t in s:findall(line, ':\zs[^:[:blank:]]\([^:]*[^:[:blank:]]\)\?\ze:') for t in s:findall(comment, ':\zs[^:[:blank:]]\([^:]*[^:[:blank:]]\)\?\ze:')
let tag_container[t] = '' let tag_container[t] = ''
endfor endfor
elseif line =~ '^\s\+;\s*[^:[:blank:]][^:]\+:' elseif comment =~ '^\s*[^:[:blank:]][^:]\+:'
" tag with value " tag with value
let key = matchstr(line, '^\s\+;\s*\zs[^:]\+\ze:') let key = matchstr(comment, '^\s*\zs[^:]\+\ze:')
if ! empty(key) if ! empty(key)
let val = matchstr(line, ':\s*\zs.*\ze\s*$') let val = matchstr(comment, ':\s*\zs.*\ze\s*$')
let tag_container[key] = val let tag_container[key] = val
endif endif
endif endif