(blink-matching-open): Don't no-op when point is BEGV+1.

This commit is contained in:
Richard M. Stallman 2005-09-26 00:03:43 +00:00
parent b3612973a7
commit c448d31689

View file

@ -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)