summaryrefslogtreecommitdiff
path: root/lisp/progmodes/prolog.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2022-08-23 04:54:57 +0200
committerStefan Kangas <stefankangas@gmail.com>2022-08-23 04:54:57 +0200
commitb7e867b841f47dcff3aeaef9b5608a237386ce70 (patch)
tree57154cb336fcfdf9fbf80e4c6bb24b07a0432b66 /lisp/progmodes/prolog.el
parente425b7d231d02e76ec3e3790418121fc07877e70 (diff)
downloademacs-b7e867b841f47dcff3aeaef9b5608a237386ce70.tar.gz
emacs-b7e867b841f47dcff3aeaef9b5608a237386ce70.tar.bz2
emacs-b7e867b841f47dcff3aeaef9b5608a237386ce70.zip
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
Diffstat (limited to 'lisp/progmodes/prolog.el')
-rw-r--r--lisp/progmodes/prolog.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el
index 6437bbd4c1c..f8edc2b1f7b 100644
--- a/lisp/progmodes/prolog.el
+++ b/lisp/progmodes/prolog.el
@@ -2282,12 +2282,12 @@ between them)."
(backward-paragraph)
(unless (bobp) (forward-line))
(if (string-match "^/\\*[^a-zA-Z]*$" (thing-at-point 'line))
- (narrow-to-region (point-at-eol) (point-max))))
+ (narrow-to-region (line-end-position) (point-max))))
(save-excursion
(forward-paragraph)
(forward-line -1)
(if (string-match "^[^a-zA-Z]*\\*/$" (thing-at-point 'line))
- (narrow-to-region (point-min) (point-at-bol))))
+ (narrow-to-region (point-min) (line-beginning-position))))
(let ((fill-prefix (prolog-guess-fill-prefix)))
(fill-paragraph nil))))
)))