diff --git a/rainbow-delimiters.el b/rainbow-delimiters.el index 064cae3..5685fe1 100644 --- a/rainbow-delimiters.el +++ b/rainbow-delimiters.el @@ -362,6 +362,10 @@ The syntax table is constructed by the function (defun rainbow-delimiters-make-syntax-table (syntax-table) "Inherit SYNTAX-TABLE and add delimiters intended to be highlighted by mode." (let ((table (copy-syntax-table syntax-table))) + ;; Modify the entries only if the characters are not recognized as + ;; delimiters. This ensures that if the characters can be a part of + ;; multicharacter comment delimiter (e.g. {- -} in Haskell), we don't + ;; suddenly stop recognizing them as comments. (when (/= ?\( (char-syntax ?\()) (modify-syntax-entry ?\( "()" table)) (when (/= ?\( (char-syntax ?\[))