diff options
| author | Craig Earls <enderw88@gmail.com> | 2013-04-04 12:35:43 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2013-04-04 12:35:43 -0700 |
| commit | 896d1cc3ec22659f296efa03c962abe69e5dd6e1 (patch) | |
| tree | b6b51ee7e068d90e3394fb89802f306c3cdacc61 /lisp/ldg-sort.el | |
| parent | 712665e5b4b748c554174a13d5a66f5cab1c97fd (diff) | |
| parent | 2e78e61be7ba6aa73c56c157405e45ed30990b31 (diff) | |
| download | fork-ledger-896d1cc3ec22659f296efa03c962abe69e5dd6e1.tar.gz fork-ledger-896d1cc3ec22659f296efa03c962abe69e5dd6e1.tar.bz2 fork-ledger-896d1cc3ec22659f296efa03c962abe69e5dd6e1.zip | |
Merge branch 'next' into ledger-mode-automatic-transactions
Diffstat (limited to 'lisp/ldg-sort.el')
| -rw-r--r-- | lisp/ldg-sort.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/ldg-sort.el b/lisp/ldg-sort.el index 5119db5d..f426a7ef 100644 --- a/lisp/ldg-sort.el +++ b/lisp/ldg-sort.el @@ -28,9 +28,8 @@ (defun ledger-next-record-function () "Move point to next transaction." - (if (re-search-forward - (concat "^[0-9/.=-]+\\(\\s-+\\*\\)?\\(\\s-+(.*?)\\)?\\s-+" - "\\(.+?\\)\\(\t\\|\n\\| [ \t]\\)") nil t) + (if (re-search-forward ledger-payee-any-status-regex + nil t) (goto-char (match-beginning 0)) (goto-char (point-max)))) |