diff options
| author | John Wiegley <johnw@newartisans.com> | 2009-06-02 19:28:36 +0100 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2009-06-02 19:28:36 +0100 |
| commit | 9b6c946ea20733f3869c1ae051428eb52a57c0e2 (patch) | |
| tree | 9f0b775654c0addd9b63bd37e6a83e1edcf9098f /lisp | |
| parent | c79fd9e72de4c2355ddb867bf269973bdd2cfd00 (diff) | |
| download | ledger-9b6c946ea20733f3869c1ae051428eb52a57c0e2.tar.gz ledger-9b6c946ea20733f3869c1ae051428eb52a57c0e2.tar.bz2 ledger-9b6c946ea20733f3869c1ae051428eb52a57c0e2.zip | |
Simplified a call to (error) in ledger.el
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ledger.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/ledger.el b/lisp/ledger.el index a649250d..6c91c29e 100644 --- a/lisp/ledger.el +++ b/lisp/ledger.el @@ -225,9 +225,7 @@ Return the difference in the format of a time value." (mapcar 'eval args))) (goto-char (point-min)) (if (looking-at "Error: ") - (progn - (message (buffer-string)) - (error)) + (error (buffer-string)) (buffer-string))) "\n")))) |