From c613687be4a79df9fe2e3ef12b4fe3fecd07a591 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 4 Aug 2010 20:04:29 +0200 Subject: [PATCH] * lisp/simple.el (exchange-dot-and-mark): Mark obsolete, finally. --- lisp/ChangeLog | 4 ++++ lisp/simple.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 00f6fcfac02..cd9e142f8e7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2010-08-04 Stefan Monnier + + * simple.el (exchange-dot-and-mark): Mark obsolete, finally. + 2010-08-03 Juanma Barranquero * progmodes/which-func.el (which-func-format): Split help-echo text diff --git a/lisp/simple.el b/lisp/simple.el index 6c8725a813f..d0c27656e41 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3819,7 +3819,8 @@ Does not set point. Does nothing if mark ring is empty." (setq mark-ring (cdr mark-ring))) (deactivate-mark)) -(defalias 'exchange-dot-and-mark 'exchange-point-and-mark) +(define-obsolete-function-alias + 'exchange-dot-and-mark 'exchange-point-and-mark "23.3") (defun exchange-point-and-mark (&optional arg) "Put the mark where point is now, and point where the mark is now. This command works even when the mark is not active, -- 2.11.4.GIT