diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-06-05 16:41:11 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-06-05 16:41:11 -0700 |
| commit | 7540647f012433cfdd3217dc4b77d1b2e9c2f764 (patch) | |
| tree | f43cd763c2a02fda5ca152b46f70da44cb6e1486 /lisp/ldg-regex.el | |
| parent | e0b02afd60e2e4e33ad370a6354a89db506798ce (diff) | |
| download | ledger-7540647f012433cfdd3217dc4b77d1b2e9c2f764.tar.gz ledger-7540647f012433cfdd3217dc4b77d1b2e9c2f764.tar.bz2 ledger-7540647f012433cfdd3217dc4b77d1b2e9c2f764.zip | |
Dramatic improvements to account completion speeds.
Diffstat (limited to 'lisp/ldg-regex.el')
| -rw-r--r-- | lisp/ldg-regex.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/ldg-regex.el b/lisp/ldg-regex.el index 487a2449..ab875579 100644 --- a/lisp/ldg-regex.el +++ b/lisp/ldg-regex.el @@ -70,6 +70,9 @@ (defconst ledger-account-any-status-regex "^[ \t]+\\([*!]\\s-+\\)?\\([[(]?.+?\\)\\(\t\\|\n\\| [ \t]\\)") +(defun ledger-account-any-status-with-seed-regex (seed) + (concat "^[ \t]+\\([*!]\\s-+\\)?\\([[(]?" seed ".+?\\)\\(\t\\|\n\\| [ \t]\\)")) + (defconst ledger-account-pending-regex "\\(^[ \t]+\\)\\(!\\s-*.*?\\)\\( \\|\t\\|$\\)") |