From c448d316896dcec1e8daddd335ce5618c8a35e0b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 26 Sep 2005 00:03:43 +0000 Subject: [PATCH] (blink-matching-open): Don't no-op when point is BEGV+1. --- lisp/simple.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/simple.el b/lisp/simple.el index f06a279c9c2..760d8cde744 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -4236,7 +4236,7 @@ If nil, search stops at the beginning of the accessible portion of the buffer." (defun blink-matching-open () "Move cursor momentarily to the beginning of the sexp before point." (interactive) - (when (and (> (point) (1+ (point-min))) + (when (and (> (point) (point-min)) blink-matching-paren ;; Verify an even number of quoting characters precede the close. (= 1 (logand 1 (- (point) -- 2.39.2