From b7e867b841f47dcff3aeaef9b5608a237386ce70 Mon Sep 17 00:00:00 2001 From: Stefan Kangas <stefankangas@gmail.com> Date: Tue, 23 Aug 2022 04:54:57 +0200 Subject: Make point-at-eol and point-at-bol obsolete * lisp/subr.el (point-at-eol, point-at-bol): Make XEmacs compat aliases obsolete in favor of `pos-bol'/'line-beginning-position' or 'pos-eol'/'line-end-position'. Update callers. Ref: https://lists.gnu.org/r/emacs-devel/2022-08/msg00853.html --- lisp/progmodes/elisp-mode.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/progmodes/elisp-mode.el') diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el index 0c4a9bfdbea..4617a01947c 100644 --- a/lisp/progmodes/elisp-mode.el +++ b/lisp/progmodes/elisp-mode.el @@ -1899,7 +1899,7 @@ or elsewhere, return a 1-line docstring." ;; go to the arg after `&rest'. (if (and key-have-value (save-excursion - (not (re-search-forward ":.*" (point-at-eol) t))) + (not (re-search-forward ":.*" (line-end-position) t))) (string-match "&rest \\([^ ()]*\\)" args)) (setq index nil ; Skip next block based on positional args. start (match-beginning 1) -- cgit v1.2.3