[AUCTeX-commit] Changes to auctex/tex.el,v

[Masayuki Ataka]

CVSROOT:        /sources/auctex
Module name:    auctex
Changes by:     Masayuki Ataka <ataka>  07/02/15 07:01:49

Index: tex.el
===================================================================
RCS file: /sources/auctex/auctex/tex.el,v
retrieving revision 5.602
retrieving revision 5.603
diff -u -b -r5.602 -r5.603
--- tex.el      13 Feb 2007 20:27:21 -0000      5.602
+++ tex.el      15 Feb 2007 07:01:49 -0000      5.603
@@ -2019,6 +2019,9 @@
   "String used as a closing brace for argument insertion.
 The variable will be temporarily let-bound with the necessary value.")
 
+(defvar TeX-after-insert-macro-hook nil
+  "A hook run after `TeX-insert-macro'.")
+
 (defvar TeX-macro-history nil)
 
 (defun TeX-insert-macro (symbol)
@@ -2042,7 +2045,8 @@
         (setq symbol TeX-default-macro))
        ((interactive-p)
         (setq TeX-default-macro symbol)))
-  (TeX-parse-macro symbol (cdr-safe (assoc symbol (TeX-symbol-list)))))
+  (TeX-parse-macro symbol (cdr-safe (assoc symbol (TeX-symbol-list))))
+  (run-hooks 'TeX-after-insert-macro-hook))
 
 (defvar TeX-electric-macro-map
   (let ((map (make-sparse-keymap)))