(TeX-add-style-hook "slides"
 (function
  (lambda ()
    (LaTeX-add-environments
     "titlepage"
     "verse"
     "quotation"
     "quote"
     "description")
    (TeX-add-symbols
     "rmdefault"
     "sfdefault"
     "ttdefault"
     "itdefault"
     "sldefault"
     "bfdefault"
     "ifourteenpt"
     "iseventeenpt"
     "itwentypt"
     "itwentyfourpt"
     "itwentyninept"
     "ithirtyfourpt"
     "ifortyonept"
     "normalsize"
     "small"
     "scriptsize"
     "tiny"
     "large"
     "Large"
     "LARGE"
     "huge"
     "Huge"
     "makelabel"
     "theequation"
     "thefootnote"
     "maketitle"
     "today")
    (TeX-run-style-hooks
     "slides"
     "sfonts"
     "leqno"
     "fleqn"))))