>> I attach a patch based on the above idea.
> Added trivial fix for coherency (provided -> match).
Sorry for noise, I had to change "options" to "option", too.
Bye,
Ikumi Keita
diff -r c52403a42881 latex.el
--- a/latex.el Wed Dec 21 22:58:09 2016 +0900
+++ b/latex.el Fri Feb 03 00:21:58 2017 +0900
@@ -1799,9 +1799,10 @@
(list (cons style options)))))
;; The third argument if "class" indicates LaTeX2e features.
- (cond ((equal class "class")
+ (cond ((or (string-equal class "class")
+ (string-equal class "Class"))
(add-to-list 'TeX-auto-file "latex2e"))
- ((equal class "style")
+ ((string-equal class "style")
(add-to-list 'TeX-auto-file "latex2"))))))
;; Cleanup optional arguments
diff -r c52403a42881 tex.el
--- a/tex.el Wed Dec 21 22:58:09 2016 +0900
+++ b/tex.el Fri Feb 03 00:21:58 2017 +0900
@@ -1167,18 +1167,18 @@
(mode-io-correlate
TeX-source-correlate-mode)
(paper-landscape
- (and (fboundp 'LaTeX-provided-class-options)
+ (and (fboundp 'LaTeX-match-class-option)
(LaTeX-match-class-option "\\`landscape\\'")))
(paper-portrait
- (not (and (fboundp 'LaTeX-provided-class-options)
+ (not (and (fboundp 'LaTeX-match-class-option)
(LaTeX-match-class-option "\\`landscape\\'"))))
(paper-a4
- (let ((regex "\\`a4paper\\|a4dutch\\|a4wide\\|sem-a4\\'"))
+ (let ((regex "\\`\\(?:a4paper\\|a4dutch\\|a4wide\\|sem-a4\\)\\'"))
(or (TeX-match-style regex)
(and (fboundp 'LaTeX-match-class-option)
(LaTeX-match-class-option regex)))))
(paper-a5
- (let ((regex "\\`a5paper\\|a5comb\\'"))
+ (let ((regex "\\`\\(?:a5paper\\|a5comb\\)\\'"))
(or (TeX-match-style regex)
(and (fboundp 'LaTeX-match-class-option)
(LaTeX-match-class-option regex)))))
_______________________________________________
bug-auctex mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/bug-auctex
