[elpa] externals/auctex ec3877ea7f 74/77: Pacify Emacs 29 compiler warnings

[Tassilo Horn]

branch: externals/auctex
commit ec3877ea7f86cf5424e84899a0b34489d2569305
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    Pacify Emacs 29 compiler warnings
    
    * context.el (ConTeXt-outline-name):
    * tex-bar.el (TeX-bar-TeX-buttons, TeX-bar-LaTeX-buttons): Use
    `line-beginning-position' instead of `point-at-bol' and
    `line-end-position' instead of `point-at-eol' which are obsolete
    with Emacs 29.
---
 context.el | 4 ++--
 tex-bar.el | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/context.el b/context.el
index de47b9da23..50fb1adfee 100644
--- a/context.el
+++ b/context.el
@@ -1144,9 +1144,9 @@ An optional fourth (or sixth) element means always 
replace if t."
 (defun ConTeXt-outline-name ()
   "Guess a name for the current header line."
   (save-excursion
-    (if (re-search-forward "{\\([^\}]*\\)}" (point-at-eol) t)
+    (if (re-search-forward "{\\([^}]*\\)}" (line-end-position) t)
         (match-string 1)
-      (buffer-substring-no-properties (point) (point-at-eol)))))
+      (buffer-substring-no-properties (point) (line-end-position)))))
 
 ;; This imenu also includes commented out chapters. Perhaps a feature
 ;; for LaTeX, not sure we want or need that for ConTeXt.
diff --git a/tex-bar.el b/tex-bar.el
index a9863f8893..9df6c8700e 100644
--- a/tex-bar.el
+++ b/tex-bar.el
@@ -202,7 +202,7 @@ format of the argument MEANING-ALIST in the mentioned 
function."
         (insert (format "\n\n`%s' provides the following buttons:\n  " (car 
i)))
         (dolist (j (cdr i))
           (insert (format " %s" j)))
-        (fill-region (point-at-bol) (point-at-eol))))
+        (fill-region (line-beginning-position) (line-end-position))))
     (display-buffer "*TeX tool bar buttons*" t)))
 
 ;;; Installation of the tool bar
@@ -342,7 +342,7 @@ format of the argument MEANING-ALIST in the mentioned 
function."
         (insert (format "\n\n`%s' provides the following buttons:\n  " (car 
i)))
         (dolist (j (cdr i))
           (insert (format " %s" j)))
-        (fill-region (point-at-bol) (point-at-eol))))
+        (fill-region (line-beginning-position) (line-end-position))))
     (display-buffer "*TeX tool bar buttons*" t)))
 
 ;;; Installation of the tool bar