4320 |
;; The cdr might hold a new paren-class info rather than |
;; The cdr might hold a new paren-class info rather than |
4321 |
;; a matching-char info, in which case the two CDRs |
;; a matching-char info, in which case the two CDRs |
4322 |
;; should match. |
;; should match. |
4323 |
(eq matching-paren (cdr (syntax-after oldpos))))) |
(eq matching-paren (cdr (syntax-after (1- oldpos)))))) |
4324 |
(message "Mismatched parentheses")) |
(message "Mismatched parentheses")) |
4325 |
((not blinkpos) |
((not blinkpos) |
4326 |
(if (not blink-matching-paren-distance) |
(if (not blink-matching-paren-distance) |