diff --git a/rc/base/haskell.kak b/rc/base/haskell.kak
index 6a16aa14..341602e2 100644
--- a/rc/base/haskell.kak
+++ b/rc/base/haskell.kak
@@ -12,10 +12,10 @@ hook global BufCreate .*[.](hs) %{
 # ‾‾‾‾‾‾‾‾‾‾‾‾
 
 add-highlighter -group / regions -default code haskell \
-    string   '"'      (?<!\\)(\\\\)*"      ''  \
-    comment  (--[^>]) $                    ''  \
-    comment \{-       -\}                  \{- \
-    macro   ^\h*?\K#  (?<!\\)\n            ''
+    string   %{(?<!')"} (?<!\\)(\\\\)*"      ''  \
+    comment  (--[^>])   $                    ''  \
+    comment \{-         -\}                  \{- \
+    macro   ^\h*?\K#    (?<!\\)\n            ''
 
 add-highlighter -group /haskell/string  fill string
 add-highlighter -group /haskell/comment fill comment