diff options
| author | Jesse Alama <alama@stanford.edu> | 2009-02-21 17:13:29 -0800 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2009-02-24 16:12:18 -0400 |
| commit | ace68028f485311eb592d013be88304ca9bc67a0 (patch) | |
| tree | 84d9f3a9902b35e5de36bdf94a7e8b8cb1cd8041 | |
| parent | 1799ed3a2adf1af7ed08b3b3ded3594a4c0e184e (diff) | |
| download | ledger-ace68028f485311eb592d013be88304ca9bc67a0.tar.gz ledger-ace68028f485311eb592d013be88304ca9bc67a0.tar.bz2 ledger-ace68028f485311eb592d013be88304ca9bc67a0.zip | |
Indicate what the report name is in report buffers
* lisp/ledger.el: Indicate what the report name is in report buffers
| -rw-r--r-- | lisp/ledger.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ledger.el b/lisp/ledger.el index 33d77926..0b04c0aa 100644 --- a/lisp/ledger.el +++ b/lisp/ledger.el @@ -960,7 +960,8 @@ the default." (defun ledger-do-report (cmd) "Run a report command line." (goto-char (point-min)) - (insert (format "Report: %s\n" cmd) + (insert (format "Report: %s\n" ledger-report-name) + (format "Command: %s\n" cmd) (make-string (- (window-width) 1) ?=) "\n") (shell-command cmd t nil)) |