diff options
Diffstat (limited to 'lisp/ledger-report.el')
| -rw-r--r-- | lisp/ledger-report.el | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/lisp/ledger-report.el b/lisp/ledger-report.el index a8ed9060..0eb0e4a0 100644 --- a/lisp/ledger-report.el +++ b/lisp/ledger-report.el @@ -25,6 +25,11 @@ ;;; Code: +(declare-function ledger-read-string-with-default "ledger-mode" (prompt default)) +(declare-function ledger-xact-payee "ledger-xact" nil) +(declare-function ledger-read-account-with-prompt "ledger-mode" (prompt)) +(declare-function ledger-navigate-to-line "ledger-navigate" (line-number)) + (require 'easymenu) (eval-when-compile (require 'cl)) @@ -151,13 +156,13 @@ text that should replace the format specifier." "A mode for viewing ledger reports.") (defun ledger-report-tagname-format-specifier () - "Return a valid meta-data tag name" + "Return a valid meta-data tag name." ;; It is intended completion should be available on existing account ;; names, but it remains to be implemented. (ledger-read-string-with-default "Tag Name: " nil)) (defun ledger-report-tagvalue-format-specifier () - "Return a valid meta-data tag name" + "Return a valid meta-data tag name." ;; It is intended completion should be available on existing account ;; names, but it remains to be implemented. (ledger-read-string-with-default "Tag Value: " nil)) @@ -420,8 +425,8 @@ Optional EDIT the command." (customize-variable 'ledger-reports)) (defun ledger-report-edit-report () + "Edit the current report command in the mini buffer and re-run the report." (interactive) - "Edit the current report command in the mini buffer and re-run the report" (setq ledger-report-cmd (ledger-report-read-command ledger-report-cmd)) (ledger-report-redo)) |