From 7540647f012433cfdd3217dc4b77d1b2e9c2f764 Mon Sep 17 00:00:00 2001 From: Craig Earls Date: Wed, 5 Jun 2013 16:41:11 -0700 Subject: Dramatic improvements to account completion speeds. --- lisp/ldg-regex.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lisp/ldg-regex.el') 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\\|$\\)") -- cgit v1.2.3