CVSROOT: /cvsroot/auctex Module name: auctex Changes by: Ralf Angeli <angeli> 11/04/03 15:36:17
Index: xspace.el =================================================================== RCS file: /cvsroot/auctex/auctex/style/xspace.el,v retrieving revision 1.1 retrieving revision 1.2 diff -u -b -r1.1 -r1.2 --- xspace.el 3 Apr 2011 15:34:20 -0000 1.1 +++ xspace.el 3 Apr 2011 15:36:17 -0000 1.2 @@ -1,9 +1,28 @@ ;;; xspace.el --- AUCTeX style for `xspace.sty' +;; Copyright (C) 2011 Free Software Foundation, Inc. + ;; Author: Mads Jensen <[email protected]> ;; Created: 2011-02-01 ;; Keywords: tex +;; This file is part of AUCTeX. + +;; AUCTeX is free software; you can redistribute it and/or modify it +;; under the terms of the GNU General Public License as published by +;; the Free Software Foundation; either version 3, or (at your option) +;; any later version. + +;; AUCTeX is distributed in the hope that it will be useful, but +;; WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;; General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with AUCTeX; see the file COPYING. If not, write to the Free +;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA +;; 02110-1301, USA. + ;;; Commentary: ;; This file adds support for `xspace.sty'. @@ -14,28 +33,19 @@ "xspace" (lambda () (TeX-add-symbols - '("xspace" TeX-insert-xspace) + '("xspace" 0) "xspaceaddexception" "xspaceremoveexception") ;; Fontification (when (and (featurep 'font-latex) (eq TeX-install-font-lock 'font-latex-setup)) - (font-latex-add-keywords '("xspace") 'function) - (font-latex-add-keywords '("xspaceaddexception") 'function) - (font-latex-add-keywords '("xspaceremoveexception") 'function) - - ;; For syntactic fontification, e.g. verbatim constructs. - (font-latex-set-syntactic-keywords) - ;; Tell font-lock about the update. - (setq font-lock-set-defaults nil) - (font-lock-set-defaults)))) + (font-latex-add-keywords '(("xspace" "") + ("xspaceaddexception" "{") + ("xspaceremoveexception" "{")) + 'function)))) (defvar LaTeX-xspace-package-options nil - "Package options for the alltt package.") - -(defun TeX-xspace-insert () - "Insert \\xspace without brackets." - (insert "\\xspace")) + "Package options for the xspace package.") ;;; xspace.el ends here _______________________________________________ auctex-diffs mailing list [email protected] http://lists.gnu.org/mailman/listinfo/auctex-diffs
