branch: elpa/haskell-ts-mode
commit 113e443752e5352dfafbe7aead8b3a20c4fdbdd5
Author: Pranshu Sharma <pranshusharma...@gmail.com>
Commit: Pranshu Sharma <pranshusharma...@gmail.com>

    Fix quasiquotes
---
 haskell-ts-mode.el | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/haskell-ts-mode.el b/haskell-ts-mode.el
index d31ec5a6ed..65d3bed6fa 100644
--- a/haskell-ts-mode.el
+++ b/haskell-ts-mode.el
@@ -48,7 +48,7 @@
       '(("\\" . "λ")
        ("/=" . "≠")))
 
-(defvar haskell-ts-font-lock
+(setq haskell-ts-font-lock
       (treesit-font-lock-rules
        :language 'haskell
        :feature 'parens
@@ -100,8 +100,11 @@
        `((pragma) @font-lock-preprocessor-face)
        :language 'haskell
        :feature 'str
+       :override t
        `((char) @font-lock-string-face
-        (string) @font-lock-string-face)))
+        (string) @font-lock-string-face
+        (quasiquote (quoter) @font-lock-type-face)
+        (quasiquote (quasiquote_body) @font-lock-preprocessor-face))))
 
 (defvar haskell-ts-indent-rules
       `((haskell

Reply via email to