(blink-matching-open): Strip extra info from syntax.

diff --git a/lisp/simple.el b/lisp/simple.el
index 82dd693ad34402bdb2fd964f16fe8f8672628f37..fbcb776c7dcedc6456a12a72d6bcc58a43929ba9 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1,7 +1,7 @@
 ;;; simple.el --- basic editing commands for Emacs
 
 ;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
-;;               2000, 2001, 2002, 2003, 2004
+;;               2000, 2001, 2002, 2003, 2004, 2005
 ;;        Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
@@ -4001,7 +4001,7 @@ when it is off screen)."
                (setq matching-paren
                      (let ((syntax (syntax-after blinkpos)))
                        (and (consp syntax)
-                            (eq (car syntax) 4)
+                            (eq (logand (car syntax) 255) 4)
                             (cdr syntax)))
                      mismatch
                      (or (null matching-paren)