From a37d19b4159f9db1f2f16d9f0438e23de762e039 Mon Sep 17 00:00:00 2001 From: Fanael Linithien Date: Tue, 2 Sep 2014 18:16:53 +0200 Subject: [PATCH] Add a comment explaining the previous change. --- rainbow-delimiters.el | 4 ++++ 1 file changed, 4 insertions(+) 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 ?\[))