diff options
| author | Craig Earls <enderw88@gmail.com> | 2014-08-24 18:37:24 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2014-08-24 18:37:24 -0700 |
| commit | 4deaeb02c9dfb3f1bf51e998b85b0a433ac9f212 (patch) | |
| tree | 718b833e5ff63e7e40fc8c580ad718f1fb6f2ad6 /lisp/ledger-regex.el | |
| parent | ce3102923658ce53194832b524d455b24a38af3f (diff) | |
| download | ledger-4deaeb02c9dfb3f1bf51e998b85b0a433ac9f212.tar.gz ledger-4deaeb02c9dfb3f1bf51e998b85b0a433ac9f212.tar.bz2 ledger-4deaeb02c9dfb3f1bf51e998b85b0a433ac9f212.zip | |
Set up fontification independent of font-lock.
Basic functionality in place. need to test further and expand detail fortification.
Diffstat (limited to 'lisp/ledger-regex.el')
| -rw-r--r-- | lisp/ledger-regex.el | 22 |
1 files changed, 21 insertions, 1 deletions
diff --git a/lisp/ledger-regex.el b/lisp/ledger-regex.el index bb080b94..49a2b114 100644 --- a/lisp/ledger-regex.el +++ b/lisp/ledger-regex.el @@ -329,7 +329,27 @@ ledger-iso-date-regexp "\\([ *!]+\\)" ;; mark "\\((.*)\\)?" ;; code - "\\(.*\\)" ;; desc + "\\([[:word:] ]+\\)" ;; desc "\\)")) +(defconst ledger-xact-start-regex + (concat ledger-iso-date-regexp ;; subexp 1 + " ?\\([ *!]\\)" ;; mark, subexp 5 + " ?\\((.*)\\)?" ;; code, subexp 6 + " ?\\([[:word:] ]+\\)" ;; desc, subexp 7 + "\\(\n\\|;.*\\)" ;; comment, subexp 8 + )) + +(defconst ledger-posting-regex + (concat "^[ \t]+" ;; initial white space + "\\(" + "\\([[:word:]: ]*?\n?\\) " ;; account, subexpr 2 + "\\(.*?\\)" ;; amount, subexpr 3 + "\\(\n\\|\\(;.*\\)\\)" ;; comment, subexpr 5 + "\\)")) + +(defconst ledger-directive-start-regex + "[=~;#%|\\*[A-Za-z]") + + (provide 'ledger-regex) |