summaryrefslogtreecommitdiff
path: root/lisp/ledger-report.el
diff options
context:
space:
mode:
authorPeter Feigl <peter.feigl@jku.at>2015-02-05 10:38:51 +0100
committerPeter Feigl <peter.feigl@jku.at>2015-02-05 10:38:51 +0100
commit04ed74a261ccb859cd0e6c4f2631d77dc017a69e (patch)
treeb0dfe171b4ad59a653db71ffa2211c144bd98091 /lisp/ledger-report.el
parentdf9e308a0feed12676e2b6ba098f6677ed56d9d5 (diff)
downloadledger-04ed74a261ccb859cd0e6c4f2631d77dc017a69e.tar.gz
ledger-04ed74a261ccb859cd0e6c4f2631d77dc017a69e.tar.bz2
ledger-04ed74a261ccb859cd0e6c4f2631d77dc017a69e.zip
cleaning up elisp byte compiler warnings
Diffstat (limited to 'lisp/ledger-report.el')
-rw-r--r--lisp/ledger-report.el11
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))