[elpa] externals/auctex 5abc3d7f68 17/23: Change some `mark-active' to `(TeX-active-mark)'

[Tassilo Horn]

branch: externals/auctex
commit 5abc3d7f68ddc69cf3d15bca524db57a30c6f52b
Author: Paul Nelson <ultrono@gmail.com>
Commit: Arash Esbati <arash@gnu.org>

    Change some `mark-active' to `(TeX-active-mark)'
    
    * tex-fold.el (TeX-fold-post-command):
    * preview.el.in (LaTeX-preview-setup):
    * tex.el (TeX-mode-specific-command-menu-entries):
    Change `mark-active' to `(TeX-active-mark)' where appropriate.
    (bug#70369)
---
 preview.el.in | 4 ++--
 tex-fold.el   | 2 +-
 tex.el        | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/preview.el.in b/preview.el.in
index d46aadb2f1..c9d1184f07 100644
--- a/preview.el.in
+++ b/preview.el.in
@@ -3066,14 +3066,14 @@ to add the preview functionality."
         ["(or toggle) at point" preview-at-point]
         ["for environment" preview-environment]
         ["for section" preview-section]
-        ["for region" preview-region mark-active]
+        ["for region" preview-region (TeX-active-mark)]
         ["for buffer" preview-buffer]
         ["for document" preview-document]
         "---"
         "Remove previews"
         ["at point" preview-clearout-at-point]
         ["from section" preview-clearout-section]
-        ["from region" preview-clearout mark-active]
+        ["from region" preview-clearout (TeX-active-mark)]
         ["from buffer" preview-clearout-buffer]
         ["from document" preview-clearout-document]
         "---"
diff --git a/tex-fold.el b/tex-fold.el
index fadc145a13..3328320468 100644
--- a/tex-fold.el
+++ b/tex-fold.el
@@ -911,7 +911,7 @@ Return non-nil if called by one of the commands in LIST."
                         (TeX-fold-auto-reveal-p TeX-fold-auto-reveal))
                 ;; Open new overlays.
                 (dolist (ol (nconc (when (and TeX-fold-unfold-around-mark
-                                              mark-active)
+                                              (TeX-active-mark))
                                      (overlays-at (mark)))
                                    (overlays-at (point))))
                   (when (eq (overlay-get ol 'category) 'TeX-fold)
diff --git a/tex.el b/tex.el
index c4e4104e77..20ee691edb 100644
--- a/tex.el
+++ b/tex.el
@@ -5153,7 +5153,7 @@ Brace insertion is only done if point is in a math 
construct and
                        (<= (prefix-numeric-value prefix-arg) 0)
                      (and (boundp 'TeX-command-region-begin)
                           (markerp TeX-command-region-begin)))
-                   mark-active)
+                   (TeX-active-mark))
        ;;:visible (eq TeX-command-current 'TeX-command-region)
        :style toggle
        :selected (and (boundp 'TeX-command-region-begin)