[elpa] externals/auctex e293844 07/30: ; Silence the compiler

[Tassilo Horn]

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

    ; Silence the compiler
    
    * style/exam.el (LaTeX-exam-insert-item):
    * style/ifluatex.el (LaTeX-ifluatex-set-exit-mark): Use
    `with-no-warnings' around variables defined at run time.
---
 style/exam.el     | 29 +++++++++++++++--------------
 style/ifluatex.el |  5 +++--
 2 files changed, 18 insertions(+), 16 deletions(-)

diff --git a/style/exam.el b/style/exam.el
index 3ecc38d..a1ce1b5 100644
--- a/style/exam.el
+++ b/style/exam.el
@@ -51,20 +51,21 @@
 (defun LaTeX-exam-insert-item ()
   "Insert a new item in an environment from exam class.
 Item inserted depends on the environment."
-  (TeX-insert-macro
-   (cond ((string= environment "questions")
-          "question")
-         ((string= environment "parts")
-          "part")
-         ((string= environment "subparts")
-          "subpart")
-         ((string= environment "subsubparts")
-          "subsubpart")
-        ((member environment '("choices" "oneparchoices"
-                               "checkboxes" "oneparcheckboxes"))
-         "choice")
-         ;; Fallback
-         (t "item"))))
+  (with-no-warnings
+    (TeX-insert-macro
+     (cond ((string= environment "questions")
+            "question")
+           ((string= environment "parts")
+            "part")
+           ((string= environment "subparts")
+            "subpart")
+           ((string= environment "subsubparts")
+            "subsubpart")
+          ((member environment '("choices" "oneparchoices"
+                                 "checkboxes" "oneparcheckboxes"))
+           "choice")
+           ;; Fallback
+           (t "item")))))
 
 (defun LaTeX-exam-insert-label (_optional &optional name type)
   "Indent the line and query/insert a label incl. the \"\\label\" macro.
diff --git a/style/ifluatex.el b/style/ifluatex.el
index 20d3c8d..736e5ca 100644
--- a/style/ifluatex.el
+++ b/style/ifluatex.el
@@ -1,6 +1,6 @@
 ;;; ifluatex.el --- AUCTeX style for `ifluatex.sty' version 1.3.
 
-;; Copyright (C) 2014, 2016, 2018 Free Software Foundation, Inc.
+;; Copyright (C) 2014, 2016, 2018, 2020 Free Software Foundation, Inc.
 
 ;; Author: Davide G. M. Salvetti <salve@debian.org>
 ;; Maintainer: auctex-devel@gnu.org
@@ -36,7 +36,8 @@
 
 (defun LaTeX-ifluatex-set-exit-mark (_optional)
   "Discard OPTIONAL and set exit-mark to current point."
-  (set-marker exit-mark (point)))
+  (with-no-warnings
+    (set-marker exit-mark (point))))
 
 (TeX-add-style-hook
     "ifluatex"