(save-excursion
(goto-char start)
(when (and (re-search-backward "[()]" nil t)
- (eq (char-after) ?\()
+ (= (following-char) ?\()
(goto-char end)
(or (not (re-search-forward "[()]" nil t))
- (eq (char-after (1- (point))) ?\()))
+ (= (char-after (1- (point))) ?\()))
t)))
(defvar gnus-article-buffer)