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

Fix bug 1059, ledger mode deletes character if a posting is cleared but there are less that four space between the account and the amount.

Browse source
This commit is contained in:
Craig Earls 2014-06-24 20:48:20 -07:00
parent 3b20d9a11f
commit 8afc183730
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ledger-state.el
View file

@ -104,7 +104,8 @@ dropped."
(when (not (eq (ledger-state-from-char (char-after)) 'comment)) (when (not (eq (ledger-state-from-char (char-after)) 'comment))
(insert (ledger-char-from-state cur-status) " ") (insert (ledger-char-from-state cur-status) " ")
(if (search-forward " " (line-end-position) t) (if (search-forward " " (line-end-position) t)
(delete-char 2))) (if (looking-at " ")
(delete-char 2))))
(forward-line)) (forward-line))
(setq new-status nil))) (setq new-status nil)))