summaryrefslogtreecommitdiff
path: root/lisp/ldg-post.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2013-04-29 16:38:48 -0500
committerJohn Wiegley <johnw@newartisans.com>2013-04-29 16:38:48 -0500
commitc4853dcfd887cef637419574b8c57eb306593569 (patch)
tree93dacaa6192bdd16f80e144270dbdc3a063981aa /lisp/ldg-post.el
parent59550b7f66c31592160749c5177074f63d19fa9d (diff)
parent2dee0a1ef9a86c8e3fab2d91a6e07874cf90b042 (diff)
downloadfork-ledger-c4853dcfd887cef637419574b8c57eb306593569.tar.gz
fork-ledger-c4853dcfd887cef637419574b8c57eb306593569.tar.bz2
fork-ledger-c4853dcfd887cef637419574b8c57eb306593569.zip
Merge remote-tracking branch 'origin/next'
Diffstat (limited to 'lisp/ldg-post.el')
-rw-r--r--lisp/ldg-post.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ldg-post.el b/lisp/ldg-post.el
index 37722fbc..7e4a631c 100644
--- a/lisp/ldg-post.el
+++ b/lisp/ldg-post.el
@@ -217,7 +217,7 @@ BEG, END, and LEN control how far it can align."
(let ((end-of-amount (re-search-forward "[-.,0-9]+" (line-end-position) t)))
;; determine if there is an amount to edit
(if end-of-amount
- (let ((val (ledger-commodity-string-number-decimalize (match-string 0) :from-user)))
+ (let ((val (ledger-string-to-number (match-string 0))))
(goto-char (match-beginning 0))
(delete-region (match-beginning 0) (match-end 0))
(calc)