diff options
| author | John Wiegley <johnw@newartisans.com> | 2005-02-17 01:29:52 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2008-04-13 02:41:04 -0400 |
| commit | 5c25fc413cfdd0fa7e0fa0fcd00fdcc4dea33975 (patch) | |
| tree | e64389a35b3a0e53fc4918ee5611f18f47b92d7b /ledger.el | |
| parent | e75b9b800ea68c94245f449db798f3d824487ad8 (diff) | |
| download | fork-ledger-5c25fc413cfdd0fa7e0fa0fcd00fdcc4dea33975.tar.gz fork-ledger-5c25fc413cfdd0fa7e0fa0fcd00fdcc4dea33975.tar.bz2 fork-ledger-5c25fc413cfdd0fa7e0fa0fcd00fdcc4dea33975.zip | |
*** empty log message ***
Diffstat (limited to 'ledger.el')
| -rw-r--r-- | ledger.el | 10 |
1 files changed, 2 insertions, 8 deletions
@@ -146,14 +146,8 @@ Return the difference in the format of a time value." (insert (with-temp-buffer (setq exit-code - (apply #'ledger-run-ledger - ledger-buf "entry" - (mapcar - (function - (lambda (x) - (replace-regexp-in-string "\\([&$]\\)" "\\\\\\1" - (eval x)))) - args))) + (apply #'ledger-run-ledger ledger-buf "entry" + (mapcar 'eval args))) (if (= 0 exit-code) (if insert-year (buffer-substring 2 (point-max)) |