diff options
| author | Craig Earls <enderw88@gmail.com> | 2014-09-05 21:45:36 -0700 |
|---|---|---|
| committer | Craig Earls <enderw88@gmail.com> | 2014-09-05 21:45:36 -0700 |
| commit | 991d162fb0a17305f8f43d9bf1f566d8227b54ec (patch) | |
| tree | 5aa872551f753843ac862e5d9114591038cd8407 /lisp/ledger-fonts.el | |
| parent | e2c07931eda0dd157203f09dc5b05b1efb2b9efc (diff) | |
| download | fork-ledger-991d162fb0a17305f8f43d9bf1f566d8227b54ec.tar.gz fork-ledger-991d162fb0a17305f8f43d9bf1f566d8227b54ec.tar.bz2 fork-ledger-991d162fb0a17305f8f43d9bf1f566d8227b54ec.zip | |
jit-lock is now calling ledger-fontify-buffer-part, but font-lock-fontify-region is still being called and fighting with it.
Diffstat (limited to 'lisp/ledger-fonts.el')
| -rw-r--r-- | lisp/ledger-fonts.el | 84 |
1 files changed, 42 insertions, 42 deletions
diff --git a/lisp/ledger-fonts.el b/lisp/ledger-fonts.el index 5725db09..0c3b9861 100644 --- a/lisp/ledger-fonts.el +++ b/lisp/ledger-fonts.el @@ -228,48 +228,48 @@ :group 'ledger-faces) -;; (defvar ledger-font-lock-keywords -;; `( ;; (,ledger-other-entries-regex 1 -;; ;; ledger-font-other-face) -;; (,ledger-comment-regex 0 -;; 'ledger-font-comment-face) -;; (,ledger-amount-regex 0 -;; 'ledger-font-posting-amount-face) -;; (,ledger-multiline-comment-regex 0 'ledger-font-comment-face) -;; (,ledger-payee-pending-regex 2 -;; 'ledger-font-payee-pending-face) ; Works -;; (,ledger-payee-cleared-regex 2 -;; 'ledger-font-payee-cleared-face) ; Works -;; (,ledger-payee-uncleared-regex 2 -;; 'ledger-font-payee-uncleared-face) ; Works -;; (,ledger-account-cleared-regex 2 -;; 'ledger-font-posting-account-cleared-face) ; Works -;; (,ledger-account-pending-regex 2 -;; 'ledger-font-posting-account-pending-face) ; Works -;; (,ledger-account-any-status-regex 2 -;; 'ledger-font-posting-account-face) ; Works -;; (,ledger-other-entries-regex 1 -;; 'ledger-font-other-face)) -;; "Expressions to highlight in Ledger mode.") - -(defvar ledger-font-lock-keywords - `(("account" . ledger-font-account-directive-face) - ("apply" . ledger-font-apply-directive-face) - ("alias" . ledger-font-alias-directive-face) - ("assert" . ledger-font-assert-directive-face) - ("bucket" . ledger-font-bucket-directive-face) - ("capture" . ledger-font-capture-directive-face) - ("check" . ledger-font-check-directive-face) - ("commodity" . ledger-font-commodity-directive-face) - ("define" . ledger-font-define-directive-face) - ("end" . ledger-font-end-directive-face) - ("expr" . ledger-font-expr-directive-face) - ("fixed" . ledger-font-fixed-directive-face) - ("include" . ledger-font-include-directive-face) - ("payee" . ledger-font-payee-directive-face) - ("tag" . ledger-font-tag-directive-face) - ("year" . ledger-font-year-directive-face)) - "Expressions to highlight in Ledger mode.") + ;; (defvar ledger-font-lock-keywords + ;; `( ;; (,ledger-other-entries-regex 1 + ;; ;; ledger-font-other-face) + ;; (,ledger-comment-regex 0 + ;; 'ledger-font-comment-face) + ;; (,ledger-amount-regex 0 + ;; 'ledger-font-posting-amount-face) + ;; (,ledger-multiline-comment-regex 0 'ledger-font-comment-face) + ;; (,ledger-payee-pending-regex 2 + ;; 'ledger-font-payee-pending-face) ; Works + ;; (,ledger-payee-cleared-regex 2 + ;; 'ledger-font-payee-cleared-face) ; Works + ;; (,ledger-payee-uncleared-regex 2 + ;; 'ledger-font-payee-uncleared-face) ; Works + ;; (,ledger-account-cleared-regex 2 + ;; 'ledger-font-posting-account-cleared-face) ; Works + ;; (,ledger-account-pending-regex 2 + ;; 'ledger-font-posting-account-pending-face) ; Works + ;; (,ledger-account-any-status-regex 2 + ;; 'ledger-font-posting-account-face) ; Works + ;; (,ledger-other-entries-regex 1 + ;; 'ledger-font-other-face)) + ;; "Expressions to highlight in Ledger mode.") + + (defvar ledger-font-lock-keywords + `(("account" . ledger-font-account-directive-face) + ("apply" . ledger-font-apply-directive-face) + ("alias" . ledger-font-alias-directive-face) + ("assert" . ledger-font-assert-directive-face) + ("bucket" . ledger-font-bucket-directive-face) + ("capture" . ledger-font-capture-directive-face) + ("check" . ledger-font-check-directive-face) + ("commodity" . ledger-font-commodity-directive-face) + ("define" . ledger-font-define-directive-face) + ("end" . ledger-font-end-directive-face) + ("expr" . ledger-font-expr-directive-face) + ("fixed" . ledger-font-fixed-directive-face) + ("include" . ledger-font-include-directive-face) + ("payee" . ledger-font-payee-directive-face) + ("tag" . ledger-font-tag-directive-face) + ("year" . ledger-font-year-directive-face)) + "Expressions to highlight in Ledger mode.") |