aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorStefan Monnier <[email protected]>2005-01-18 20:50:43 +0000
committerStefan Monnier <[email protected]>2005-01-18 20:50:43 +0000
commit14b495ffb1fc5d9bf47b9eec56b8a2f1cc588690 (patch)
tree9720361aac4982e7cc087322df43925c36be28b6 /lisp
parent926787bea1175eaba471430d08b1210e492168a7 (diff)
(blink-matching-open): Strip extra info from syntax.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/simple.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 82dd693ad3..fbcb776c7d 100644
--- 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)