Don't use font lock in ledger mode

1 files changed, 12 insertions, 0 deletions

diff --git a/init.el b/init.el
index ec452dd..a815c01 100644
--- a/init.el
+++ b/init.el
@@ -1864,6 +1864,18 @@
       (setq truncate-lines km/writeroom-old-truncate-lines)))
   (add-hook 'writeroom-mode-hook #'km/writeroom-setup))
 
+(use-package ledger-mode
+  :init
+  (and (boundp 'font-lock-global-modes)
+       (pcase font-lock-global-modes
+         ('t
+          (setq font-lock-global-modes '(not ledger-mode)))
+         (`(not . ,_)
+          (add-to-list 'font-lock-global-modes 'ledger-mode t))
+         (`(,_ . ,_)
+          (setq font-lock-global-modes
+                (delq 'ledger-mode font-lock-global-modes))))))
+
 
 ;;; Language modes