From: Stefan Kangas <stefankangas@gmail.com>
Date: Mon, 29 Aug 2022 17:26:39 +0000 (+0200)
Subject: Improve point-at-{bol,eol} obsoletion message
X-Git-Tag: emacs-29.0.90~1856^2~836
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9f692bcd84e2b6e450e154361e1058186e6481a8;p=emacs.git

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.
---

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