From 9f692bcd84e2b6e450e154361e1058186e6481a8 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Mon, 29 Aug 2022 19:26:39 +0200 Subject: [PATCH] Improve point-at-{bol,eol} obsoletion message * lisp/subr.el (point-at-eol, point-at-bol): Mention 'pos-eol' and 'pos-bol' in obsoletion message. --- lisp/subr.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/subr.el b/lisp/subr.el index 36f5e2fee49..2ffc594997c 100644 --- a/lisp/subr.el +++ b/lisp/subr.el @@ -1913,8 +1913,10 @@ be a list of the form returned by `event-start' and `event-end'." (defalias 'mkdir #'make-directory) ;; These were the XEmacs names, now obsolete: -(define-obsolete-function-alias 'point-at-eol #'line-end-position "29.1") -(define-obsolete-function-alias 'point-at-bol #'line-beginning-position "29.1") +(defalias 'point-at-eol #'line-end-position) +(make-obsolete 'point-at-eol "use `line-end-position' or `pos-eol' instead." "29.1") +(defalias 'point-at-bol #'line-beginning-position) +(make-obsolete 'point-at-bol "use `line-beginning-position' or `pos-bol' instead." "29.1") (define-obsolete-function-alias 'user-original-login-name #'user-login-name "28.1") ;; These are in obsolete/autoload.el, but are commonly used by -- 2.39.2