[AUCTeX-diffs] Changes to auctex/style/amsmath.el,v

[Tassilo Horn]

CVSROOT:        /sources/auctex
Module name:    auctex
Changes by:     Tassilo Horn <tsdh>     12/12/27 19:29:30

Index: style/amsmath.el
===================================================================
RCS file: /sources/auctex/auctex/style/amsmath.el,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- style/amsmath.el    3 Feb 2008 14:53:31 -0000       1.23
+++ style/amsmath.el    27 Dec 2012 19:29:30 -0000      1.24
@@ -45,6 +45,7 @@
      '("xxalignat"  LaTeX-amsmath-env-alignat)
      '("aligned"    LaTeX-amsmath-env-aligned)
      '("gathered"   LaTeX-amsmath-env-aligned)
+     '("alignedat"  LaTeX-amsmath-env-alignedat)
      "align*" "gather*" "flalign*" "multline*" "equation*"
      "split"
      "cases"
@@ -56,6 +57,7 @@
      '("eqref" TeX-arg-ref)
      '("numberwithin" TeX-arg-counter "Section level")
      '("raisetag" "Dimension")
+     '("shoveright" t) '("shoveleft" t)
      '("intertext" t)
      '("hdotsfor" ["Stretch"] "Number of columns to cover")
      '("xleftarrow" ["Below"] "Above")
@@ -111,6 +113,7 @@
                     ("xalignat"  . LaTeX-item-equations)
                     ("xalignat*" . LaTeX-item-equation)
                     ("xxalignat" . LaTeX-item-equation)
+                    ("alignedat" . LaTeX-item-equation)
                     ("flalign"  . LaTeX-item-equations)
                     ("flalign*" . LaTeX-item-equation)
                     ("matrix" .  LaTeX-item-equation)
@@ -119,6 +122,7 @@
                     ("Bmatrix" .  LaTeX-item-equation)
                     ("vmatrix" .  LaTeX-item-equation)
                     ("Vmatrix" .  LaTeX-item-equation)
+                    ("subarray" . LaTeX-item-equation)
                     ("cases"    . LaTeX-item-equation))
                   LaTeX-item-list))
 
@@ -158,6 +162,14 @@
       (setq where (concat "[" where "]")))
     (LaTeX-insert-environment env where)))
 
+(defun LaTeX-amsmath-env-alignedat (env)
+  (let ((where (read-string "(optional) Vertical position (t or b): "))
+     (ncols (read-string "Number of columns: ")))
+    (if (string= where "")
+     (setq where "")
+      (setq where (concat "[" where "]")))
+    (LaTeX-insert-environment env (concat where TeX-grop ncols TeX-grcl))))
+
 (defun LaTeX-item-equation ()
   (end-of-line 0)
   (just-one-space)