master a401c3fc: Silence the compiler for the "main" branch

[Arash Esbati]

branch: master
commit a401c3fcc678541384b0cda915069c7998729fe0
Author: Arash Esbati <arash@gnu.org>
Commit: Arash Esbati <arash@gnu.org>

    Silence the compiler for the "main" branch
    
    * latex.el:
    * plain-tex.el:
    * tex.el: Declare functions which are reported as not known to
    be defined when compiling the "main" branch.
    
    * style/pstricks.el (LaTeX-pst-env-pspicture): Use
    `TeX-read-key-val' instead of `multi-prompt-key-value'.
---
 latex.el          | 12 ++++++------
 plain-tex.el      |  3 +++
 style/pstricks.el |  9 +++++----
 tex.el            | 14 ++++++++------
 4 files changed, 22 insertions(+), 16 deletions(-)

diff --git a/latex.el b/latex.el
index 9e769e97..e2d2d88e 100644
--- a/latex.el
+++ b/latex.el
@@ -39,12 +39,12 @@
     (require 'subr-x)))
 
 ;; Silence the compiler for functions:
-(declare-function outline-level "ext:outline"
-                  nil)
-(declare-function outline-mark-subtree "ext:outline"
-                  nil)
-(declare-function turn-off-filladapt-mode "ext:filladapt"
-                  nil)
+(declare-function multi-prompt "multi-prompt")
+(declare-function multi-prompt-key-value "multi-prompt")
+(declare-function LaTeX-install-toolbar "tex-bar" nil)
+(declare-function outline-level "ext:outline" nil)
+(declare-function outline-mark-subtree "ext:outline" nil)
+(declare-function turn-off-filladapt-mode "ext:filladapt" nil)
 
 ;; Silence the compiler for variables:
 (defvar outline-heading-alist)
diff --git a/plain-tex.el b/plain-tex.el
index 5691859d..2b777869 100644
--- a/plain-tex.el
+++ b/plain-tex.el
@@ -30,6 +30,9 @@
 
 (require 'tex)
 
+;; Silence the compiler for functions:
+(declare-function TeX-install-toolbar "tex-bar" nil)
+
 ;;; Tool bar
 
 (defcustom plain-TeX-enable-toolbar t
diff --git a/style/pstricks.el b/style/pstricks.el
index b5b93df6..f40db099 100644
--- a/style/pstricks.el
+++ b/style/pstricks.el
@@ -1,6 +1,6 @@
 ;;; pstricks.el --- AUCTeX style for the `pstricks' package.  -*- 
lexical-binding: t; -*-
 
-;; Copyright (C) 2007-2022  Free Software Foundation, Inc.
+;; Copyright (C) 2007-2024  Free Software Foundation, Inc.
 
 ;; Author: Holger Sparr <holger.sparr@gmx.net>
 ;; Maintainer: auctex-devel@gnu.org
@@ -652,9 +652,10 @@ package PNAME"
 ;;; Environments
 (defun LaTeX-pst-env-pspicture (env)
   "Create new pspicure environment."
-  (let ((opt (multi-prompt-key-value
-              (TeX-argument-prompt t "Options" nil)
-              '(("showgrid") ("shift"))))
+  (let ((opt (TeX-read-key-val t
+                               '(("showgrid" ("true" "false"))
+                                 ("shift"))
+                               "Options"))
         (p0 (LaTeX-pst-what "point" "Lower left (default 0,0)" "0,0"))
         (p1 (LaTeX-pst-what "point" "Upper right (default 1,1)" "1,1"))
         corn)
diff --git a/tex.el b/tex.el
index 325f883b..9fb533ff 100644
--- a/tex.el
+++ b/tex.el
@@ -54,11 +54,13 @@
                   (bus service path interface method &rest args))
 (declare-function dbus-register-signal "ext:dbus"
                   (bus service path interface signal handler &rest args))
+(declare-function font-latex-setup "font-latex" nil)
 (declare-function LaTeX-environment-list "latex" nil)
 (declare-function LaTeX-bibliography-list "latex" nil)
 (declare-function LaTeX-completion-label-annotation-function "latex" (label))
 (declare-function LaTeX-completion-label-list "latex" nil)
 (declare-function LaTeX-section-name "latex" (level))
+(declare-function TeX-fold-mode "tex-fold" (&optional arg))
 (declare-function comint-exec "ext:comint"
                   (buffer name command startfile switches))
 (declare-function comint-mode "ext:comint" nil)
@@ -801,12 +803,12 @@ emacs 24.1 and is then later run by emacs 24.5."
 (advice-add 'hack-one-local-variable :after #'TeX--call-minor-mode)
 (defun TeX--call-minor-mode (var val &rest _)
   "Call minor mode function if minor mode variable is found."
-    ;; Instead of checking for each mode explicitly `minor-mode-list'
-    ;; could be used.  But this may make the byte compiler pop up.
-    (when (memq var '(TeX-PDF-mode
-                      TeX-source-correlate-mode TeX-interactive-mode
-                      TeX-fold-mode LaTeX-math-mode))
-      (funcall var (if (symbol-value val) 1 0))))
+  ;; Instead of checking for each mode explicitly `minor-mode-list'
+  ;; could be used.  But this may make the byte compiler pop up.
+  (when (memq var '(TeX-PDF-mode
+                    TeX-source-correlate-mode TeX-interactive-mode
+                    TeX-fold-mode LaTeX-math-mode))
+    (funcall var (if (symbol-value val) 1 0))))
 
 (defvar TeX-overlay-priority-step 16
   "Numerical difference of priorities between nested overlays.