diff options
| author | Stefan Monnier | 2005-01-18 20:50:43 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2005-01-18 20:50:43 +0000 |
| commit | 14b495ffb1fc5d9bf47b9eec56b8a2f1cc588690 (patch) | |
| tree | 9720361aac4982e7cc087322df43925c36be28b6 | |
| parent | 926787bea1175eaba471430d08b1210e492168a7 (diff) | |
| download | emacs-14b495ffb1fc5d9bf47b9eec56b8a2f1cc588690.tar.gz emacs-14b495ffb1fc5d9bf47b9eec56b8a2f1cc588690.zip | |
(blink-matching-open): Strip extra info from syntax.
| -rw-r--r-- | lisp/simple.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 82dd693ad34..fbcb776c7dc 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | ;;; simple.el --- basic editing commands for Emacs | 1 | ;;; simple.el --- basic editing commands for Emacs |
| 2 | 2 | ||
| 3 | ;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 1999, | 3 | ;; Copyright (C) 1985, 1986, 1987, 1993, 1994, 1995, 1996, 1997, 1998, 1999, |
| 4 | ;; 2000, 2001, 2002, 2003, 2004 | 4 | ;; 2000, 2001, 2002, 2003, 2004, 2005 |
| 5 | ;; Free Software Foundation, Inc. | 5 | ;; Free Software Foundation, Inc. |
| 6 | 6 | ||
| 7 | ;; Maintainer: FSF | 7 | ;; Maintainer: FSF |
| @@ -4001,7 +4001,7 @@ when it is off screen)." | |||
| 4001 | (setq matching-paren | 4001 | (setq matching-paren |
| 4002 | (let ((syntax (syntax-after blinkpos))) | 4002 | (let ((syntax (syntax-after blinkpos))) |
| 4003 | (and (consp syntax) | 4003 | (and (consp syntax) |
| 4004 | (eq (car syntax) 4) | 4004 | (eq (logand (car syntax) 255) 4) |
| 4005 | (cdr syntax))) | 4005 | (cdr syntax))) |
| 4006 | mismatch | 4006 | mismatch |
| 4007 | (or (null matching-paren) | 4007 | (or (null matching-paren) |