[AUCTeX-diffs] GNU AUCTeX branch, lexical-binding-attempt-1, updated. da14207f1dfb20327aedb58dee0753b9f684ea74

[Arash Esbati]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU AUCTeX".

The branch, lexical-binding-attempt-1 has been updated
       via  da14207f1dfb20327aedb58dee0753b9f684ea74 (commit)
      from  caf52d762545178268f5448c464e58cffaf5d5d2 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit da14207f1dfb20327aedb58dee0753b9f684ea74
Author: Arash Esbati <arash@gnu.org>
Date:   Sat Sep 5 23:10:58 2020 +0200

    ; Silence the compiler
    
    * latex.el (TeX-arg-conditional, TeX-arg-verb, TeX-arg-pair): Mark
    unused parameters and adjust docstrings accordingly.

diff --git a/latex.el b/latex.el
index f74c76d..0032157 100644
--- a/latex.el
+++ b/latex.el
@@ -1961,14 +1961,12 @@ It will setup BibTeX to store keys in an auto file."
 
 ;;; Macro Argument Hooks
 
-(defun TeX-arg-conditional (optional expr then else)
+(defun TeX-arg-conditional (_optional expr then else)
   "Implement if EXPR THEN ELSE.
 
-If OPTIONAL is non-nil, insert the resulting value as an optional
-argument, otherwise as a mandatory one.
-
-If EXPR evaluate to true, parse THEN as an argument list, else parse
-ELSE as an argument list."
+If EXPR evaluate to true, parse THEN as an argument list, else
+parse ELSE as an argument list.  The compatibility argument
+OPTIONAL is ignored."
   (TeX-parse-arguments (if (eval expr) then else)))
 
 (defun TeX-arg-eval (optional &rest args)
@@ -2673,10 +2671,9 @@ the list of defined pagestyles."
   :group 'LaTeX-macro
   :type 'character)
 
-(defun TeX-arg-verb (optional &optional _ignore)
+(defun TeX-arg-verb (_optional &optional _ignore)
   "Prompt for delimiter and text.
-If OPTIONAL is non-nil, insert the resulting value as an optional
-argument, otherwise as a mandatory one.  IGNORE is ignored."
+The compatibility argument OPTIONAL and IGNORE are ignored."
   (let ((del (read-quoted-char
              (concat "Delimiter (default "
                      (char-to-string LaTeX-default-verb-delimiter) "): "))))
@@ -2721,16 +2718,13 @@ argument in delimiters like \"\| \|\" or braces \"\{ 
\}\"."
     (unless (= del ?\{)
       (setq LaTeX-default-verb-delimiter del))))
 
-(defun TeX-arg-pair (optional first second)
+(defun TeX-arg-pair (_optional first second)
   "Insert a pair of number, prompted by FIRST and SECOND.
 
 The numbers are surounded by parenthesizes and separated with a
-comma.
-
-If OPTIONAL is non-nil, insert the resulting value as an optional
-argument, otherwise as a mandatory one."
+comma.  The compatibility argument OPTIONAL is ignored."
   (insert "(" (TeX-read-string (concat first  ": ")) ","
-             (TeX-read-string (concat second ": ")) ")"))
+         (TeX-read-string (concat second ": ")) ")"))
 
 (defun TeX-arg-size (optional)
   "Insert width and height as a pair.

-----------------------------------------------------------------------

Summary of changes:
 latex.el | 24 +++++++++---------------
 1 file changed, 9 insertions(+), 15 deletions(-)


hooks/post-receive
-- 
GNU AUCTeX