>From 91ba1c3dee055ac4617445b944f28af63408f90c Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Tue, 8 Sep 2015 16:04:06 +0200 Subject: [PATCH] lisp/paren.el (show-paren--default): Ignore fails in comments --- lisp/paren.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/paren.el b/lisp/paren.el index 30314c2..adf2849 100644 --- a/lisp/paren.el +++ b/lisp/paren.el @@ -210,7 +210,9 @@ Where HERE-BEG..HERE-END is expected to be near point.") ;; If found a "matching" paren, see if it is the right ;; kind of paren to match the one we started at. (if (not (integerp pos)) - (if mismatch (list here-beg here-end nil nil t)) + (if mismatch + (unless (nth 4 (syntax-ppss)) + (list here-beg here-end nil nil t))) (let ((beg (min pos outside)) (end (max pos outside))) (unless (eq (syntax-class (syntax-after beg)) 8) (setq mismatch -- 2.5.1