From 2c07d4152a38cdd7f22392ddf39a737cbbdc3555 Mon Sep 17 00:00:00 2001
From: George Kettleborough <g.kettleborough@member.fsf.org>
Date: Mon, 15 Apr 2013 21:42:20 +0100
Subject: Fix completion on payees

---
 lisp/ldg-mode.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/lisp/ldg-mode.el b/lisp/ldg-mode.el
index 86889dda..6bad10d2 100644
--- a/lisp/ldg-mode.el
+++ b/lisp/ldg-mode.el
@@ -75,8 +75,12 @@ Can indent, complete or align depending on context."
     (if (= (point) (line-beginning-position))
         (indent-to ledger-post-account-alignment-column)
       (save-excursion
-        (re-search-backward ledger-account-or-metadata-regex
-                            (line-beginning-position) t))
+        (re-search-backward
+         (macroexpand
+          `(rx (or (regex ,ledger-account-any-status-regex)
+                   (regex ,ledger-metadata-regex)
+                   (regex ,ledger-payee-any-status-regex))))
+         (line-beginning-position) t))
       (when (= (point) (match-end 0))
         (ledger-pcomplete interactively))))
   (ledger-post-align-postings))
-- 
cgit v1.2.3