branch: externals/auctex
commit 52d6a546f6829e6334b6d619db6c5434843ccd80
Author: Ikumi Keita <[email protected]>
Commit: Ikumi Keita <[email protected]>
Make `TeX-clean' to work in ams-tex-mode
* plain-tex.el (AmSTeX-clean-intermediate-suffixes,
AmSTeX-clean-output-suffixes): New customize options.
(AmS-TeX-mode-hook): Move from tex.el.
(AmSTeX-mode-command-menu, AmSTeX-mode-menu): Fix doc strings.
(): Update copyright year.
* tex.el (TeX-mode-prefix): Add an entry for AmS-TeX.
(AmS-TeX-mode-hook): Move to plain-tex.el.
---
plain-tex.el | 26 +++++++++++++++++++++++---
tex.el | 6 +-----
2 files changed, 24 insertions(+), 8 deletions(-)
diff --git a/plain-tex.el b/plain-tex.el
index 99df58a..4c26abf 100644
--- a/plain-tex.el
+++ b/plain-tex.el
@@ -1,6 +1,6 @@
;;; plain-tex.el --- Support for plain TeX documents.
-;; Copyright (C) 2010, 2013, 2016-2017 Free Software Foundation, Inc.
+;; Copyright (C) 2010, 2013, 2016-2018 Free Software Foundation, Inc.
;; Maintainer: [email protected]
;; Keywords: tex
@@ -282,14 +282,19 @@ i.e. you do _not_ have to cater for this yourself by
adding \\\\' or $."
;; Menu for AmSTeX mode
(easy-menu-define AmSTeX-mode-command-menu
AmSTeX-mode-map
- "Command menu used in AmsTeX mode."
+ "Command menu used in AmSTeX mode."
(TeX-mode-specific-command-menu 'ams-tex-mode))
(easy-menu-define AmSTeX-mode-menu
AmSTeX-mode-map
- "Menu used in AMS-TeX mode."
+ "Menu used in AmSTeX mode."
(cons "AmS-TeX" plain-TeX-menu-entries))
+(defcustom AmS-TeX-mode-hook nil
+ "A hook run in AmS-TeX mode buffers."
+ :type 'hook
+ :group 'TeX-misc)
+
;;;###autoload
(defun ams-tex-mode ()
"Major mode in AUCTeX for editing AmS-TeX files.
@@ -315,6 +320,21 @@ of `AmS-TeX-mode-hook'."
(TeX-run-mode-hooks 'text-mode-hook 'TeX-mode-hook 'AmS-TeX-mode-hook)
(TeX-set-mode-name))
+(defcustom AmSTeX-clean-intermediate-suffixes
+ TeX-clean-default-intermediate-suffixes
+ "List of regexps matching suffixes of intermediate files to be deleted.
+The regexps will be anchored at the end of the file name to be matched,
+i.e. you do _not_ have to cater for this yourself by adding \\\\' or $."
+ :type '(repeat regexp)
+ :group 'TeX-command)
+
+(defcustom AmSTeX-clean-output-suffixes TeX-clean-default-output-suffixes
+ "List of regexps matching suffixes of output files to be deleted.
+The regexps will be anchored at the end of the file name to be matched,
+i.e. you do _not_ have to cater for this yourself by adding \\\\' or $."
+ :type '(repeat regexp)
+ :group 'TeX-command)
+
(provide 'plain-tex)
;;; plain-tex.el ends here
diff --git a/tex.el b/tex.el
index d9a0b93..51480d0 100644
--- a/tex.el
+++ b/tex.el
@@ -109,11 +109,6 @@ If nil, none is specified."
:type 'hook
:group 'TeX-misc)
-(defcustom AmS-TeX-mode-hook nil
- "A hook run in AmS-TeX mode buffers."
- :type 'hook
- :group 'TeX-misc)
-
;; This is the major configuration variable. Most sites will only need to
;; change the second string in each entry, which is the name of a command to
;; send to the shell. If you use other formatters like AMSLaTeX or AMSTeX, you
@@ -1038,6 +1033,7 @@ If RESET is non-nil, `TeX-command-next' is reset to
If no mode is given the current major mode is used."
(cdr (assoc (or mode major-mode) '((plain-tex-mode . "plain-TeX")
(latex-mode . "LaTeX")
+ (ams-tex-mode . "AmSTeX")
(doctex-mode . "docTeX")
(texinfo-mode . "Texinfo")
(context-mode . "ConTeXt")))))
