code.delx.au - gnu-emacs-elpa/blob - packages/auctex/style/ltx-base.el

   1 ;;; ltx-base.el --- AUCTeX style for basic LaTeX commands.
   2
   3 ;; Copyright (C) 2004 Free Software Foundation, Inc.
   4
   5 ;; Author: Frank Küster <frank@kuesterei.ch>
   6 ;; Maintainer: auctex-devel@gnu.org
   7 ;; Keywords: tex
   8
   9 ;; This file is part of AUCTeX.
  10
  11 ;; AUCTeX is free software; you can redistribute it and/or modify it
  12 ;; under the terms of the GNU General Public License as published by
  13 ;; the Free Software Foundation; either version 3, or (at your option)
  14 ;; any later version.
  15
  16 ;; AUCTeX is distributed in the hope that it will be useful, but
  17 ;; WITHOUT ANY WARRANTY; without even the implied warranty of
  18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19 ;; General Public License for more details.
  20
  21 ;; You should have received a copy of the GNU General Public License
  22 ;; along with AUCTeX; see the file COPYING.  If not, write to the Free
  23 ;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
  24 ;; 02110-1301, USA.
  25
  26 ;;; Commentary:
  27
  28 ;; This file adds general support for basic LaTeX commands used for
  29 ;; writing LaTeX class files (.cls), style files (.sty) and package
  30 ;; files (.dtx).
  31
  32 ;;; Code:
  33
  34 (TeX-add-style-hook
  35  "ltx-base"
  36  (function
  37   (lambda ()
  38     (TeX-add-symbols
  39      '("DeclareRobustCommand" TeX-arg-define-macro [ "Number of arguments" ] t)
  40      '("CheckCommand" TeX-arg-define-macro [ "Number of arguments" ] t)
  41      '("@addtoreset" TeX-arg-counter "Within counter" "counter")
  42      '("addvspace" "space")
  43      '("addpenalty" "penalty")
  44      '("ProvidesClass" "name" [ "release information" ])
  45      '("ProvidesPackage" "name" [ "release information" ])
  46      '("ProvidesFile" "filename" [ "release information" ])
  47      '("NeedsTeXFormat" "format" [ "release" ])
  48      '("DeclareOption" "option" t)
  49      ;; would be great if DeclareOption RET * RET would give
  50      ;; \DeclareOption*!
  51      "DeclareOption*"
  52      '("CurrentOption" 0)
  53      '("PassOptionsToPackage" "option list" "package")
  54      '("ExecuteOptions" "option list")
  55      "ProcessOptions"
  56      "ProcessOptions*"
  57      '("OptionNotUsed" 0)
  58       ;; candidate for opt/mand toggling
  59      '("RequirePackage" [ "option list" ] "package" [ "release" ])
  60      '("LoadClass" [ "option list" ] "class" [ "release" ])
  61      "AtEndOfPackage"
  62      "AtEndOfClass"
  63      "AtBeginDocument"
  64      "AtEndDocument"
  65      '("IfFileExists" "filename" 2)
  66      '("InputIfFileExists" "filename" 2)
  67      '("PackageWarning" "name" t)
  68      '("PackageWarningNoLine" "name" t)
  69      '("PackageInfo" "name" t)
  70      '("PackageError" "name" "short text" t)
  71      '("ClassWarning" "name" t)
  72      '("ClassWarningNoLine" "name" t)
  73      '("ClassInfo" "name" t)
  74      '("ClassError" "name" "short text" t)
  75      '("MessageBreak" 0)
  76      '("@ifpackageloaded" "package" 2)
  77      '("@ifpackagelater" "package" "date" 2)
  78      '("@ifpackagewith" "package" "options" 2)
  79      '("message" "Log Message")
  80      '("@ifundefined" "Macro Name" 2)
  81      '("@ifnextchar" (TeX-arg-literal " ") (TeX-arg-free "character") 2 )
  82      "expandafter"))))
  83
  84 ;; Local Variables:
  85 ;; coding: iso-8859-1
  86 ;; End: