diff options
| author | Craig Earls <enderw88@gmail.com> | 2014-11-11 19:54:43 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2014-11-11 19:54:43 -0700 |
| commit | a3f3aa304fcfb19fc716c5eaf33a6e152bb3aa71 (patch) | |
| tree | ec3c8cd1d61b19c69ed50137a20e4c42eeb24a4c /lisp/ledger-regex.el | |
| parent | e54d7392bfafa51e657f92ee1a1feb68f7f2b123 (diff) | |
| download | ledger-a3f3aa304fcfb19fc716c5eaf33a6e152bb3aa71.tar.gz ledger-a3f3aa304fcfb19fc716c5eaf33a6e152bb3aa71.tar.bz2 ledger-a3f3aa304fcfb19fc716c5eaf33a6e152bb3aa71.zip | |
Smash a bug that cause the status on a posting with no amount to bleed into the next line.
Diffstat (limited to 'lisp/ledger-regex.el')
| -rw-r--r-- | lisp/ledger-regex.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/ledger-regex.el b/lisp/ledger-regex.el index 238cfc66..b13647b5 100644 --- a/lisp/ledger-regex.el +++ b/lisp/ledger-regex.el @@ -333,7 +333,8 @@ "\\)")) (defconst ledger-xact-start-regex - (concat ledger-iso-date-regexp ;; subexp 1 + (concat "^" ledger-iso-date-regexp ;; subexp 1 + ;; "\\(=" ledger-iso-date-regexp "\\)?" " ?\\([ *!]\\)" ;; mark, subexp 5 " ?\\((.*)\\)?" ;; code, subexp 6 " ?\\([^;\n]+\\)" ;; desc, subexp 7 @@ -343,7 +344,7 @@ (defconst ledger-posting-regex (concat "^[ \t]+ ?" ;; initial white space "\\([*!]\\)? ?" ;; state, subexpr 1 - "\\(.+?\\(\n\\|[ \t][ \t]\\)\\)" ;; account, subexpr 2 + "\\([[:print:]]+\\([ \t][ \t]\\)\\)" ;; account, subexpr 2 "\\([^;\n]*\\)" ;; amount, subexpr 4 "\\(.*\\)" ;; comment, subexpr 5 )) |