/[emacs]/emacs/lisp/simple.el
ViewVC logotype

Diff of /emacs/lisp/simple.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.751 by deego, Sun Sep 18 12:25:02 2005 UTC revision 1.752 by rms, Mon Sep 26 00:03:43 2005 UTC
# Line 4236  If nil, search stops at the beginning of Line 4236  If nil, search stops at the beginning of
4236  (defun blink-matching-open ()  (defun blink-matching-open ()
4237    "Move cursor momentarily to the beginning of the sexp before point."    "Move cursor momentarily to the beginning of the sexp before point."
4238    (interactive)    (interactive)
4239    (when (and (> (point) (1+ (point-min)))    (when (and (> (point) (point-min))
4240               blink-matching-paren               blink-matching-paren
4241               ;; Verify an even number of quoting characters precede the close.               ;; Verify an even number of quoting characters precede the close.
4242               (= 1 (logand 1 (- (point)               (= 1 (logand 1 (- (point)

Legend:
Removed from v.1.751  
changed lines
  Added in v.1.752

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26