[AUCTeX-diffs] GNU AUCTeX branch, master, updated. 4fed4a7244db3e56685bd1192741c6445f2a74bc

[Ikumi Keita]

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, master has been updated
       via  4fed4a7244db3e56685bd1192741c6445f2a74bc (commit)
       via  38f9d72455226e3f59048360d15c349c7cf7b1b9 (commit)
       via  49720cea6e3ffb4cf84453c4852435496593373b (commit)
      from  dcfdd6973d5471f68d9df9b530c0c4a2687febf4 (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 4fed4a7244db3e56685bd1192741c6445f2a74bc
Author: Ikumi Keita <address@hidden>
Date:   Mon Jan 7 19:05:33 2019 +0900

    Remove combatibility code for older emasen
    
    * tex.el (put): Don't put unnecessary property on
    `TeX-source-correlate-mode'.
    (TeX-clean): Remove fallback code for emacs 21.

diff --git a/tex.el b/tex.el
index 5303ece..3c3f176 100644
--- a/tex.el
+++ b/tex.el
@@ -1851,9 +1851,6 @@ SyncTeX are recognized."
 (make-obsolete 'TeX-source-specials-mode 'TeX-source-correlate-mode "11.86")
 (defalias 'tex-source-correlate-mode 'TeX-source-correlate-mode)
 (put 'TeX-source-correlate-mode 'safe-local-variable #'booleanp)
-;; We do not want the custom variable to require tex.el.  This is only
-;; necessary if AUCTeX was compiled with Emacs 21.
-(put 'TeX-source-correlate-mode 'custom-requests nil)
 (setq minor-mode-map-alist
       (delq (assq 'TeX-source-correlate-mode minor-mode-map-alist)
            minor-mode-map-alist))
@@ -2215,14 +2212,11 @@ output files."
                  (directory-files (or master-dir ".") nil regexp))))
     (if files
        (when (or (not TeX-clean-confirm)
-                 (condition-case nil
-                     (dired-mark-pop-up " *Deletions*" 'delete
-                                        (if (> (length files) 1)
-                                            files
-                                          (cons t files))
-                                        'y-or-n-p "Delete files? ")
-                   (wrong-type-argument ; e.g. with Emacs 21
-                    (y-or-n-p (format "Delete %S? " (car files))))))
+                 (dired-mark-pop-up " *Deletions*" 'delete
+                                    (if (> (length files) 1)
+                                        files
+                                      (cons t files))
+                                    'y-or-n-p "Delete files? "))
          (dolist (file files)
            (delete-file (concat master-dir file))))
       (message "No files to be deleted"))))

commit 38f9d72455226e3f59048360d15c349c7cf7b1b9
Author: Ikumi Keita <address@hidden>
Date:   Mon Jan 7 18:26:22 2019 +0900

    Remove compatibility code for older emacsen
    
    * font-latex.el (put):
    * tex-style.el (put):
    Use `booleanp' instead of `TeX-booleanp'.
    * tex.el (put): Use `booleanp' instead of `TeX-booleanp'.
    (TeX-booleanp): Remove.

diff --git a/font-latex.el b/font-latex.el
index 6d07ba8..bd504a8 100644
--- a/font-latex.el
+++ b/font-latex.el
@@ -857,7 +857,7 @@ script operators ^ and _ are not displayed."
   :group 'font-latex)
 (put 'font-latex-fontify-script 'safe-local-variable
      (lambda (val)
-       (or (TeX-booleanp val)
+       (or (booleanp val)
           (memq val '(multi-level invisible)))))
 
 (defcustom font-latex-fontify-script-max-level 3
diff --git a/tex-style.el b/tex-style.el
index 5971c9e..b1c32a4 100644
--- a/tex-style.el
+++ b/tex-style.el
@@ -234,7 +234,7 @@ It can be a list of themes or a function.  If it is the 
symbol
 This variable is intended to be used as a file local variable to
 override the autodetection of the biblatex backend.")
 (make-variable-buffer-local 'LaTeX-biblatex-use-Biber)
-(put 'LaTeX-biblatex-use-Biber 'safe-local-variable 'TeX-booleanp)
+(put 'LaTeX-biblatex-use-Biber 'safe-local-variable #'booleanp)
 
 ;; style/comment.el
 
diff --git a/tex.el b/tex.el
index 6acf13f..5303ece 100644
--- a/tex.el
+++ b/tex.el
@@ -1850,7 +1850,7 @@ SyncTeX are recognized."
 (defalias 'TeX-source-specials-mode 'TeX-source-correlate-mode)
 (make-obsolete 'TeX-source-specials-mode 'TeX-source-correlate-mode "11.86")
 (defalias 'tex-source-correlate-mode 'TeX-source-correlate-mode)
-(put 'TeX-source-correlate-mode 'safe-local-variable 'TeX-booleanp)
+(put 'TeX-source-correlate-mode 'safe-local-variable #'booleanp)
 ;; We do not want the custom variable to require tex.el.  This is only
 ;; necessary if AUCTeX was compiled with Emacs 21.
 (put 'TeX-source-correlate-mode 'custom-requests nil)
@@ -1995,7 +1995,7 @@ enabled and the `synctex' binary is available."
   :group 'TeX-command
   :set 'TeX-mode-set
   :type 'boolean)
-(put 'TeX-PDF-mode 'safe-local-variable 'TeX-booleanp)
+(put 'TeX-PDF-mode 'safe-local-variable #'booleanp)
 
 (define-minor-mode TeX-PDF-mode
   "Minor mode for using PDFTeX.
@@ -2093,7 +2093,7 @@ Programs should not use this variable directly but the 
function
   :group 'TeX-command
   :type 'boolean)
 (make-variable-buffer-local 'TeX-PDF-via-dvips-ps2pdf)
-(put 'TeX-PDF-via-dvips-ps2pdf 'safe-local-variable 'TeX-booleanp)
+(put 'TeX-PDF-via-dvips-ps2pdf 'safe-local-variable #'booleanp)
 (make-obsolete-variable 'TeX-PDF-via-dvips-ps2pdf 'TeX-PDF-from-DVI "11.90")
 
 (defun TeX-PDF-from-DVI ()
@@ -4634,10 +4634,6 @@ See `match-data' for details."
       (buffer-substring-no-properties (match-beginning n) (match-end n))
     ""))
 
-(defun TeX-booleanp (arg)
-  "Return non-nil if ARG is t or nil."
-  (memq arg '(t nil)))
-
 (defun TeX-looking-at-backward (regexp &optional limit)
   "Return non-nil if the text before point matches REGEXP.
 Optional second argument LIMIT gives a max number of characters

commit 49720cea6e3ffb4cf84453c4852435496593373b
Author: Ikumi Keita <address@hidden>
Date:   Mon Jan 7 18:10:45 2019 +0900

    Remove compatibility code for older emacsen
    
    * context.el (ConTeXt-mode-common-initialization):
    * latex.el (TeX-latex-mode):
    * plain-tex.el (TeX-plain-tex-mode, ams-tex-mode):
    * tex-info.el (TeX-texinfo-mode):
    Use `run-mode-hooks' instead of `TeX-run-mode-hooks'.
    * tex.el (TeX-run-mode-hooks): Remove.

diff --git a/context.el b/context.el
index 5622d8a..db2f86f 100644
--- a/context.el
+++ b/context.el
@@ -1782,7 +1782,7 @@ i.e. you do _not_ have to cater for this yourself by 
adding \\\\' or $."
   ;; run hooks
   (setq TeX-command-default "ConTeXt")
   (setq TeX-sentinel-default-function 'TeX-ConTeXt-sentinel)
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'ConTeXt-mode-hook))
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'ConTeXt-mode-hook))
 
 (defun context-guess-current-interface ()
   "Guess what ConTeXt interface the current buffer is using."
diff --git a/latex.el b/latex.el
index 3b8cc5c..d260006 100644
--- a/latex.el
+++ b/latex.el
@@ -5926,7 +5926,7 @@ of `LaTeX-mode-hook'."
                       (apply #'append
                              (mapcar #'cdr LaTeX-provided-class-options)))))
            nil t)
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'LaTeX-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'LaTeX-mode-hook)
   (when (fboundp 'LaTeX-preview-setup)
     (LaTeX-preview-setup))
   (TeX-set-mode-name)
diff --git a/plain-tex.el b/plain-tex.el
index 4be0e3d..af1a74d 100644
--- a/plain-tex.el
+++ b/plain-tex.el
@@ -138,7 +138,7 @@ of `plain-TeX-mode-hook'."
   (add-hook 'tool-bar-mode-on-hook 'plain-TeX-maybe-install-toolbar nil t)
   (when (and (boundp 'tool-bar-mode) tool-bar-mode)
     (plain-TeX-maybe-install-toolbar))
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'plain-TeX-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'plain-TeX-mode-hook)
   (TeX-set-mode-name))
 
 (defun plain-TeX-common-initialization ()
@@ -314,7 +314,7 @@ of `AmS-TeX-mode-hook'."
 
   (setq TeX-base-mode-name "AmS-TeX")
   (setq TeX-command-default "AmSTeX")
-  (TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'AmS-TeX-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'AmS-TeX-mode-hook)
   (TeX-set-mode-name))
 
 (defcustom AmSTeX-clean-intermediate-suffixes
diff --git a/tex-info.el b/tex-info.el
index 71e97c2..b1fd236 100644
--- a/tex-info.el
+++ b/tex-info.el
@@ -853,7 +853,7 @@ value of `Texinfo-mode-hook'."
   (if (and (boundp 'reftex-mode) reftex-mode)
       (Texinfo-reftex-hook))
 
-  (TeX-run-mode-hooks 'text-mode-hook 'Texinfo-mode-hook)
+  (run-mode-hooks 'text-mode-hook 'Texinfo-mode-hook)
   (TeX-set-mode-name))
 
 (defcustom Texinfo-clean-intermediate-suffixes nil
diff --git a/tex.el b/tex.el
index 625dd60..6acf13f 100644
--- a/tex.el
+++ b/tex.el
@@ -4665,9 +4665,6 @@ to look backward for."
     (skip-chars-backward " \t\n")
     (bobp)))
 
-(defalias 'TeX-run-mode-hooks
-  (if (fboundp 'run-mode-hooks) 'run-mode-hooks 'run-hooks))
-
 (defun TeX-add-to-alist (alist-var new-alist)
   "Add NEW-ALIST to the ALIST-VAR.
 If an element with the same key as the key of an element of

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

Summary of changes:
 context.el    |  2 +-
 font-latex.el |  2 +-
 latex.el      |  2 +-
 plain-tex.el  |  4 ++--
 tex-info.el   |  2 +-
 tex-style.el  |  2 +-
 tex.el        | 29 ++++++++---------------------
 7 files changed, 15 insertions(+), 28 deletions(-)


hooks/post-receive
-- 
GNU AUCTeX