[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp.el
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp.el |
Date: |
Mon, 19 Nov 2001 17:06:10 -0500 |
Index: emacs/lisp/emacs-lisp/lisp.el
diff -u emacs/lisp/emacs-lisp/lisp.el:1.42 emacs/lisp/emacs-lisp/lisp.el:1.43
--- emacs/lisp/emacs-lisp/lisp.el:1.42 Tue Oct 24 07:22:48 2000
+++ emacs/lisp/emacs-lisp/lisp.el Mon Nov 19 17:06:10 2001
@@ -72,10 +72,14 @@
(defun mark-sexp (&optional arg)
"Set mark ARG sexps from point.
The place mark goes is the same place \\[forward-sexp] would
-move to with the same argument."
+move to with the same argument.
+If this command is repeated, it marks the next ARG sexps after the ones
+already marked."
(interactive "p")
(push-mark
(save-excursion
+ (if (and (eq last-command this-command) (mark t))
+ (goto-char (mark)))
(forward-sexp (or arg 1))
(point))
nil t))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/emacs-lisp/lisp.el,
Stefan Monnier <=