[elpa] 107/299: Add counters and pagestyle to some class styles.

[Stefan Monnier]

monnier pushed a commit to branch externals/auctex
in repository elpa.

commit 4a25e74029875f3ea153f8546b91001a10782222
Author: Mosè Giordano <address@hidden>
Date:   Fri Apr 19 15:37:53 2013 +0200

    Add counters and pagestyle to some class styles.
    
    * style/article.el ("article"): Add counters and pagestyles.
    
    * style/beamer.el ("beamer"): Ditto.
    
    * style/book.el ("book"): Ditto.
    
    * style/letter.el (LaTeX-letter-class-options): New variable.
    ("letter"): Add pagestyles.
    
    * style/report.el ("report"): Add counters and pagestyles.
    
    * style/slides.el (LaTeX-slides-class-options): New variable.
    ("slides"): Add counters and pagestyles.
---
 ChangeLog        |   16 ++++++++++++++++
 style/article.el |    5 ++++-
 style/beamer.el  |    4 ++++
 style/book.el    |    5 ++++-
 style/letter.el  |    9 ++++++++-
 style/report.el  |    5 ++++-
 style/slides.el  |   12 ++++++++++--
 7 files changed, 50 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 78b9e8a..60f1186 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,19 @@
+2013-04-19  Mos� Giordano  <address@hidden>
+
+       * style/article.el ("article"): Add counters and pagestyles.
+
+       * style/beamer.el ("beamer"): Ditto.
+
+       * style/book.el ("book"): Ditto.
+
+       * style/letter.el (LaTeX-letter-class-options): New variable.
+       ("letter"): Add pagestyles.
+
+       * style/report.el ("report"): Add counters and pagestyles.
+
+       * style/slides.el (LaTeX-slides-class-options): New variable.
+       ("slides"): Add counters and pagestyles.
+
 2013-04-18  Mos� Giordano  <address@hidden>
 
        * style/beamer.el: Update copyright years and remove trailing
diff --git a/style/article.el b/style/article.el
index 420dde6..ca6281f 100644
--- a/style/article.el
+++ b/style/article.el
@@ -11,6 +11,9 @@
 (TeX-add-style-hook
  "article"
  (lambda ()
-   (LaTeX-largest-level-set "section")))
+   (LaTeX-largest-level-set "section")
+   (LaTeX-add-counters "part" "section" "subsection" "subsubsection" 
"paragraph"
+                      "subparagraph" "figure" "table")
+   (LaTeX-add-pagestyles "headings" "myheadings")))
 
 ;;; article.el ends here
diff --git a/style/beamer.el b/style/beamer.el
index 5d05465..4f0c639 100644
--- a/style/beamer.el
+++ b/style/beamer.el
@@ -157,6 +157,10 @@
                          (format "[%s]" width))))))
     "semiverbatim")
 
+   (LaTeX-add-counters "lecture" "part" "section" "subsection" "subsubsection"
+                      "subsectionslide" "framenumber" "figure" "table"
+                      "beamerpauses")
+   (LaTeX-add-pagestyles "navigation")
    (make-local-variable 'LaTeX-indent-environment-list)
    (add-to-list 'LaTeX-indent-environment-list
                '("semiverbatim" current-indentation))
diff --git a/style/book.el b/style/book.el
index 0f84cc9..e8e3f31 100644
--- a/style/book.el
+++ b/style/book.el
@@ -12,6 +12,9 @@
 (TeX-add-style-hook
  "book"
  (lambda () 
-   (LaTeX-largest-level-set "chapter")))
+   (LaTeX-largest-level-set "chapter")
+   (LaTeX-add-counters "part" "chapter" "section" "subsection" "subsubsection"
+                      "paragraph" "subparagraph" "figure" "table")
+   (LaTeX-add-pagestyles "headings" "myheadings")))
 
 ;;; book.el ends here
diff --git a/style/letter.el b/style/letter.el
index fa269a4..76ec022 100644
--- a/style/letter.el
+++ b/style/letter.el
@@ -1,6 +1,6 @@
 ;;; letter.el - Special code for letter style.
 
-;; Copyright (C) 1993, 2012  Free Software Foundation, Inc.
+;; Copyright (C) 1993, 2012, 2013  Free Software Foundation, Inc.
 
 ;; Author: Per Abrahamsen <address@hidden>
 ;; Maintainer: address@hidden
@@ -25,6 +25,12 @@
 
 ;;; Code:
 
+(defvar LaTeX-letter-class-options
+  '("a4paper" "a5paper" "b5paper" "letterpaper" "legalpaper" "executivepaper"
+    "landscape" "10pt" "11pt" "12pt" "oneside" "twoside" "draft" "final"
+    "leqno" "fleqn")
+  "Package options for the letter class.")
+
 ;; You may want to define this in tex-site.el to contain your
 ;; organizations address.  
 (defvar LaTeX-letter-sender-address ""
@@ -35,6 +41,7 @@
   (lambda ()
     (LaTeX-add-environments
      '("letter" LaTeX-env-recipient))
+    (LaTeX-add-pagestyles "headings" "firstpage")
     (TeX-add-symbols
      '("name" "Sender: ") 
      '("address" "Sender address: ")
diff --git a/style/report.el b/style/report.el
index 9ea26c8..945109b 100644
--- a/style/report.el
+++ b/style/report.el
@@ -12,6 +12,9 @@
 (TeX-add-style-hook
  "report"
  (lambda () 
-   (LaTeX-largest-level-set "chapter")))
+   (LaTeX-largest-level-set "chapter")
+   (LaTeX-add-counters "part" "chapter" "section" "subsection" "subsubsection"
+                      "paragraph" "subparagraph" "figure" "table")
+   (LaTeX-add-pagestyles "headings" "myheadings")))
 
 ;;; report.el ends here
diff --git a/style/slides.el b/style/slides.el
index 9e16024..8760dc8 100644
--- a/style/slides.el
+++ b/style/slides.el
@@ -1,6 +1,6 @@
 ;;; slides.el --- AUCTeX style for the `slides' document class
 
-;; Copyright (C) 2004 Free Software Foundation, Inc.
+;; Copyright (C) 2004, 2013 Free Software Foundation, Inc.
 
 ;; Author: Ralf Angeli <address@hidden>
 ;; Maintainer: address@hidden
@@ -31,11 +31,19 @@
 
 ;;; Code:
 
+(defvar LaTeX-slides-class-options
+  '("a4paper" "a5paper" "b5paper" "letterpaper" "legalpaper" "executivepaper"
+    "landscape" "clock" "draft" "final" "titlepage" "notitlepage" "onecolumn"
+    "twocolumn" "leqno" "fleqn")
+  "Package options for the slides class.")
+
 (TeX-add-style-hook
  "slides"
  (lambda ()
    (LaTeX-add-environments "slide"
                           "overlay"
-                          "note")))
+                          "note")
+   (LaTeX-add-counters "minutes" "seconds")
+   (LaTeX-add-pagestyles "headings" "slide" "overlay" "note")))
 
 ;;; slides.el ends here