sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Indicate what the report name is in report buffers

Browse source 
* lisp/ledger.el: Indicate what the report name is in report buffers
This commit is contained in:
Jesse Alama 2009-02-21 17:13:29 -08:00 • committed by John Wiegley
parent 1799ed3a2a
commit ace68028f4
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ledger.el
View file

@ -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))