Mercurial > emacs

diff lisp/simple.el @ 67092:e2a1dbb7d8f3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(blink-matching-open): Fix off-by-one in last change.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 23 Nov 2005 15:05:18 +0000
parents ac8622e9be6d
children 23ddbc106655
line wrap: on
line diff
--- a/lisp/simple.el	Wed Nov 23 07:20:09 2005 +0000
+++ b/lisp/simple.el	Wed Nov 23 15:05:18 2005 +0000
@@ -4320,7 +4320,7 @@
                    ;; The cdr might hold a new paren-class info rather than
                    ;; a matching-char info, in which case the two CDRs
                    ;; should match.
-                   (eq matching-paren (cdr (syntax-after oldpos)))))
+                   (eq matching-paren (cdr (syntax-after (1- oldpos))))))
 	  (message "Mismatched parentheses"))
 	 ((not blinkpos)
 	  (if (not blink-matching-paren-distance)