Index: subfigure.el
===================================================================
RCS file: /sources/auctex/auctex/style/subfigure.el,v
retrieving revision 1.6
diff -u -u -r1.6 subfigure.el
--- subfigure.el	3 Feb 2008 14:53:29 -0000	1.6
+++ subfigure.el	13 Feb 2013 22:40:57 -0000
@@ -1,6 +1,6 @@
 ;;; subfigure.el --- AUCTeX style file for subfigure.sty
 
-;; Copyright (C) 2003, 2005 Free Software Foundation, Inc.
+;; Copyright (C) 2003, 2005, 2013 Free Software Foundation, Inc.
 
 ;; Author: Reiner Steib  <address@hidden>
 ;; Maintainer: address@hidden
@@ -25,7 +25,7 @@
 
 ;;; Commentary:
 
-;; AUCTeX style file for subfigure.sty
+;; AUCTeX style file for `subfigure.sty'
 
 ;;; Code:
 
@@ -33,18 +33,23 @@
  "subfigure"
  (lambda ()
    (TeX-add-symbols
-    '("subfigure"  [ "list entry" ] [ "sub caption" ] "figure")
-    '("subtable"   [ "list entry" ] [ "sub caption" ] "figure")
+    '("subfigure"  [ "List entry" ] [ "Sub caption" ] "Figure")
+    '("subtable"   [ "List entry" ] [ "Sub caption" ] "Figure")
     '("Subref" TeX-arg-label)
-    '("subref" TeX-arg-label))
-   ;; TODO: add \subfig* lengths
+    '("subref" TeX-arg-label)
+    '("subcapsize" 0)
+    '("subcapfont" 0)
+    '("subcaplabelfont" 0)
+
+   (LaTeX-add-lengths "subfigtopskip" "subfigcapskip" "subfigcaptopadj"
+                      "subfigbottomskip" "subfigcapmargin" "subfiglabelskip")
 
    ;; Install completion for labels:
    (setq TeX-complete-list
 	 (append
-	  '(("\\\\subref{\\([^{}\n\r\\%,]*\\)" 1 LaTeX-label-list "}")
-	    ("\\\\Subref{\\([^{}\n\r\\%,]*\\)" 1 LaTeX-label-list "}"))
+	  '(("\\\\[Ss]ubref{\\([^{}\n\r\\%,]*\\)" 1 LaTeX-label-list "}")))
 	  TeX-complete-list))
+
    ;; Fontification
    (when (and (featurep 'font-latex)
 	      (eq TeX-install-font-lock 'font-latex-setup))