# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 751238705 0
# Node ID a3a72fce114301a2555990fb925d6405ad7ed847
# Parent  6de32c7b60450a9d20b29b2bae2c5b45a5a15fd7
(blink-matching-open): Treat / syntax like \ syntax.

diff -r 6de32c7b6045 -r a3a72fce1143 lisp/simple.el
--- a/lisp/simple.el	Thu Oct 21 17:56:09 1993 +0000
+++ b/lisp/simple.el	Thu Oct 21 21:25:05 1993 +0000
@@ -2115,7 +2115,7 @@
   "Move cursor momentarily to the beginning of the sexp before point."
   (interactive)
   (and (> (point) (1+ (point-min)))
-       (/= (char-syntax (char-after (- (point) 2))) ?\\ )
+       (not (memq (char-syntax (char-after (- (point) 2))) '(?/ ?\\ )))
        blink-matching-paren
        (let* ((oldpos (point))
 	      (blinkpos)