diff options
| author | Craig Earls <enderw88@gmail.com> | 2014-11-30 19:47:14 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2014-11-30 19:47:14 -0700 |
| commit | 3988de14bb3bc053de9f3dddcfa1356555913a5e (patch) | |
| tree | 990fe661fd1887e41ab9c5ee2fe940a4754bbcf2 /lisp/ledger-complete.el | |
| parent | a6d8599688a5a5657827e09a7ab98b060c2b9541 (diff) | |
| download | fork-ledger-3988de14bb3bc053de9f3dddcfa1356555913a5e.tar.gz fork-ledger-3988de14bb3bc053de9f3dddcfa1356555913a5e.tar.bz2 fork-ledger-3988de14bb3bc053de9f3dddcfa1356555913a5e.zip | |
Cleaned up commodities and completion code.
Diffstat (limited to 'lisp/ledger-complete.el')
| -rw-r--r-- | lisp/ledger-complete.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/ledger-complete.el b/lisp/ledger-complete.el index bc4b1854..fd79656a 100644 --- a/lisp/ledger-complete.el +++ b/lisp/ledger-complete.el @@ -157,9 +157,7 @@ (ledger-accounts))))) (defun ledger-trim-trailing-whitespace (str) - (let ((s str)) - (when (string-match "[ \t]*$" s) - (replace-match "" nil nil s)))) + (replace-regexp-in-string "[ \t]*$" "" str)) (defun ledger-fully-complete-xact () "Completes a transaction if there is another matching payee in the buffer. |