diff options
| author | Steve Purcell <steve@sanityinc.com> | 2014-12-09 19:31:17 +0000 |
|---|---|---|
| committer | Steve Purcell <steve@sanityinc.com> | 2014-12-09 19:38:00 +0000 |
| commit | 233313fb17269d39864e6bb217b2c2520f4e957d (patch) | |
| tree | cf03d03323145f1a8790d104b3eb284f8ca35c7f /lisp/ledger-context.el | |
| parent | 7579057bc0e9b2f501059abcbb369acaa21ab361 (diff) | |
| download | ledger-233313fb17269d39864e6bb217b2c2520f4e957d.tar.gz ledger-233313fb17269d39864e6bb217b2c2520f4e957d.tar.bz2 ledger-233313fb17269d39864e6bb217b2c2520f4e957d.zip | |
[emacs] Fix byte compilation warnings
Diffstat (limited to 'lisp/ledger-context.el')
| -rw-r--r-- | lisp/ledger-context.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ledger-context.el b/lisp/ledger-context.el index 7b10c552..dd393789 100644 --- a/lisp/ledger-context.el +++ b/lisp/ledger-context.el @@ -44,9 +44,11 @@ (defconst ledger-payee-string "\\(.*\\)") (defun ledger-get-regex-str (name) + "Get the ledger regex of type NAME." (symbol-value (intern (concat "ledger-" (symbol-name name) "-string")))) (defun ledger-line-regex (elements) + "Get a regex to match ELEMENTS on a single line." (concat (apply 'concat (mapcar 'ledger-get-regex-str elements)) "[ \t]*$")) (defmacro ledger-single-line-config (&rest elements) @@ -195,4 +197,4 @@ specified line, returns nil." (provide 'ledger-context) -;;; ledger-report.el ends here +;;; ledger-context.el ends here |