diff options
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 |