summaryrefslogtreecommitdiff
path: root/lisp/ledger-xact.el
diff options
context:
space:
mode:
authorCraig Earls <enderw88@gmail.com>2013-09-20 07:26:44 -0700
committerCraig Earls <enderw88@gmail.com>2013-09-20 07:26:44 -0700
commitbee6605e084777261f1536e4e65f76bb94eca06c (patch)
tree678bddcb8dc8bfd87d352084c3dece144a0974ed /lisp/ledger-xact.el
parent9f3afc26f5e7863ed8beac3a411dab8becc7bff9 (diff)
parentd30c3fb869b8c4f7740eefec573fadedbe21b7d1 (diff)
downloadfork-ledger-bee6605e084777261f1536e4e65f76bb94eca06c.tar.gz
fork-ledger-bee6605e084777261f1536e4e65f76bb94eca06c.tar.bz2
fork-ledger-bee6605e084777261f1536e4e65f76bb94eca06c.zip
Merge branch 'master' into ledger-mode-automatic-transactions
Diffstat (limited to 'lisp/ledger-xact.el')
-rw-r--r--lisp/ledger-xact.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ledger-xact.el b/lisp/ledger-xact.el
index fac040e6..7f2200a4 100644
--- a/lisp/ledger-xact.el
+++ b/lisp/ledger-xact.el
@@ -150,7 +150,9 @@ MOMENT is an encoded date"
(backward-paragraph 2)
(re-search-forward ledger-iso-date-regexp)
(replace-match date)
- (ledger-next-amount)))
+ (ledger-next-amount)
+ (if (re-search-forward "[-0-9]")
+ (goto-char (match-beginning 0)))))
(defun ledger-delete-current-transaction (pos)
"Delete the transaction surrounging point."