diff options
| author | Richard M. Stallman | 2005-09-26 00:03:43 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-09-26 00:03:43 +0000 |
| commit | c448d316896dcec1e8daddd335ce5618c8a35e0b (patch) | |
| tree | 5dd432f8437d0be74c4a8a4c0544b0d9d8570062 | |
| parent | b3612973a791616b1a92277d5925605b544d1d13 (diff) | |
| download | emacs-c448d316896dcec1e8daddd335ce5618c8a35e0b.tar.gz emacs-c448d316896dcec1e8daddd335ce5618c8a35e0b.zip | |
(blink-matching-open): Don't no-op when point is BEGV+1.
| -rw-r--r-- | lisp/simple.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." | |||
| 4236 | (defun blink-matching-open () | 4236 | (defun blink-matching-open () |
| 4237 | "Move cursor momentarily to the beginning of the sexp before point." | 4237 | "Move cursor momentarily to the beginning of the sexp before point." |
| 4238 | (interactive) | 4238 | (interactive) |
| 4239 | (when (and (> (point) (1+ (point-min))) | 4239 | (when (and (> (point) (point-min)) |
| 4240 | blink-matching-paren | 4240 | blink-matching-paren |
| 4241 | ;; Verify an even number of quoting characters precede the close. | 4241 | ;; Verify an even number of quoting characters precede the close. |
| 4242 | (= 1 (logand 1 (- (point) | 4242 | (= 1 (logand 1 (- (point) |