auto bracket in LaTeX mode

latex/fix-auto-bracket.el

+;; Provides _{} and ^{} via _-_ and ^-^ in LaTeX Mode
+;; source:
+;; https://emacs.stackexchange.com/questions/7862/inserting-electric-braces-in-auctex
+
+(add-hook 'LaTeX-mode-hook 'fix-auto-bracket)
+
+(defun fix-auto-bracket ()
+  (require 'tex-site)
+  (define-key LaTeX-mode-map "^" 
+    (lambda () 
+      (interactive) 
+      (if (equal (preceding-char) ?^) 
+          (progn (insert "{}")(backward-char)) 
+        (insert "^"))))
+   (require 'tex-site)
+  (define-key LaTeX-mode-map "_" 
+    (lambda () 
+      (interactive) 
+      (if (equal (preceding-char) ?_) 
+          (progn (insert "{}")(backward-char)) 
+        (insert "_")))))