diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ledger-xact.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ledger-xact.el b/lisp/ledger-xact.el index 9629dca0..e6269580 100644 --- a/lisp/ledger-xact.el +++ b/lisp/ledger-xact.el @@ -151,7 +151,8 @@ MOMENT is an encoded date" (re-search-forward ledger-iso-date-regexp) (replace-match date) (ledger-next-amount) - (forward-char 2))) + (if (re-search-forward "[-0-9]") + (goto-char (match-beginning 0))))) (defun ledger-delete-current-transaction (pos) "Delete the transaction surrounging point." |