emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/auctex 9ba765e 04/43: Remove TeX-deactivate-mark


From: Tassilo Horn
Subject: [elpa] externals/auctex 9ba765e 04/43: Remove TeX-deactivate-mark
Date: Tue, 20 Mar 2018 11:34:05 -0400 (EDT)

branch: externals/auctex
commit 9ba765e557dc1d9b6e67245f81e3529a6b037f38
Author: Mosè Giordano <address@hidden>
Commit: Mosè Giordano <address@hidden>

    Remove TeX-deactivate-mark
    
    * tex.el (TeX-deactivate-mark): Remove function.
    (TeX-argument-insert):
    * latex.el (LaTeX-env-item):
    * style/currvita.el (LaTeX-currvita-env-with-label):
    * style/dinbrief.el (LaTeX-dinbrief-insert):
    (LaTeX-dinbrief-env-recipient):
    * style/enumitem.el (LaTeX-enumitem-env-with-opts):
    * style/moodle.el (LaTeX-moodle-question-env-with-args):
    * style/tcolorboxlib-raster.el (LaTeX-tcolorbox-lib-raster-env-item): 
Replace
      `TeX-deactivate-mark' with `deactivate-mark'.
---
 latex.el                     |  2 +-
 style/currvita.el            |  2 +-
 style/dinbrief.el            |  4 ++--
 style/enumitem.el            |  2 +-
 style/moodle.el              |  2 +-
 style/tcolorboxlib-raster.el |  2 +-
 tex.el                       | 11 +----------
 7 files changed, 8 insertions(+), 17 deletions(-)

diff --git a/latex.el b/latex.el
index 8c340e3..fe905d6 100644
--- a/latex.el
+++ b/latex.el
@@ -959,7 +959,7 @@ If nil, act like the empty string is given, but do not 
prompt."
   ;; Deactivate the mark here in order to prevent `TeX-parse-macro'
   ;; from swapping point and mark and the \item ending up right after
   ;; \begin{...}.
-  (TeX-deactivate-mark)
+  (deactivate-mark)
   (LaTeX-insert-item)
   ;; The inserted \item may have outdented the first line to the
   ;; right.  Fill it, if appropriate.
diff --git a/style/currvita.el b/style/currvita.el
index 0973190..127d68e 100644
--- a/style/currvita.el
+++ b/style/currvita.el
@@ -51,7 +51,7 @@
   ;; Deactivate the mark here in order to prevent `TeX-parse-macro'
   ;; from swapping point and mark and the \item ending up right after
   ;; \begin{...}.
-  (TeX-deactivate-mark)
+  (deactivate-mark)
   (LaTeX-insert-item)
   ;; The inserted \item may have outdented the first line to the
   ;; right.  Fill it, if appropriate.
diff --git a/style/dinbrief.el b/style/dinbrief.el
index 6455e82..2ec5611 100644
--- a/style/dinbrief.el
+++ b/style/dinbrief.el
@@ -67,7 +67,7 @@
 
 (defmacro LaTeX-dinbrief-insert (&rest args)
   "Insert text ignoring active markers."
-  `(progn (if (TeX-mark-active) (TeX-deactivate-mark))
+  `(progn (if (TeX-mark-active) (deactivate-mark))
      (insert ,@args)))
 
 (defun LaTeX-dinbrief-style ()
@@ -123,7 +123,7 @@
            (newline-and-indent)
          (if (not (zerop (length retouradr)))
              (progn
-               (if (TeX-mark-active) (TeX-deactivate-mark))
+               (if (TeX-mark-active) (deactivate-mark))
                (LaTeX-dinbrief-insert TeX-esc "backaddress" TeX-grop retouradr 
TeX-grcl)
                (newline-and-indent)))))
       (LaTeX-dinbrief-insert TeX-esc "enabledraftstandard")
diff --git a/style/enumitem.el b/style/enumitem.el
index 699dbe6..f347446 100644
--- a/style/enumitem.el
+++ b/style/enumitem.el
@@ -206,7 +206,7 @@ key-val and the first item."
   ;; Deactivate the mark here in order to prevent `TeX-parse-macro'
   ;; from swapping point and mark and the \item ending up right after
   ;; \begin{...}.
-  (TeX-deactivate-mark)
+  (deactivate-mark)
   (LaTeX-insert-item)
   ;; The inserted \item may have outdented the first line to the
   ;; right.  Fill it, if appropriate.
diff --git a/style/moodle.el b/style/moodle.el
index c304481..92c623c 100644
--- a/style/moodle.el
+++ b/style/moodle.el
@@ -114,7 +114,7 @@
   ;; Deactivate the mark here in order to prevent `TeX-parse-macro'
   ;; from swapping point and mark and the \item ending up right after
   ;; \begin{...}.
-  (TeX-deactivate-mark)
+  (deactivate-mark)
   ;; Query and insert the question text.
   (let ((qtext (TeX-read-string (TeX-argument-prompt nil nil "Question 
Text"))))
     (when (and qtext (not (string= qtext "")))
diff --git a/style/tcolorboxlib-raster.el b/style/tcolorboxlib-raster.el
index 2bf33ee..822e267 100644
--- a/style/tcolorboxlib-raster.el
+++ b/style/tcolorboxlib-raster.el
@@ -104,7 +104,7 @@
   ;; Deactivate the mark here in order to prevent `TeX-parse-macro'
   ;; from swapping point and mark and the \item ending up right after
   ;; \begin{...}.
-  (TeX-deactivate-mark)
+  (deactivate-mark)
   (LaTeX-insert-item)
   ;; The inserted \item may have outdented the first line to the
   ;; right.  Fill it, if appropriate.
diff --git a/tex.el b/tex.el
index 0fc2a86..ab872b3 100644
--- a/tex.el
+++ b/tex.el
@@ -3619,7 +3619,7 @@ See `TeX-parse-macro' for details."
                             (prin1-to-string head))))))
          (t (error "Unknown argument type %s" (prin1-to-string arg))))
     (when (and insert-flag (not optional) (TeX-active-mark))
-      (TeX-deactivate-mark))))
+      (deactivate-mark))))
 
 (defun TeX-argument-insert (name optional &optional prefix)
   "Insert NAME surrounded by curly braces.
@@ -4832,15 +4832,6 @@ to look backward for."
     (skip-chars-backward " \t\n")
     (bobp)))
 
-(defun TeX-deactivate-mark ()
-  "Deactivate the mark.
-This is a compatibility function which works both in Emacs and
-XEmacs.  In XEmacs the region is deactivated instead of the
-mark which is sort of equivalent."
-  (if (featurep 'xemacs)
-      (zmacs-deactivate-region)
-    (deactivate-mark)))
-
 (defalias 'TeX-run-mode-hooks
   (if (fboundp 'run-mode-hooks) 'run-mode-hooks 'run-hooks))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]