CVSROOT: /sources/auctex Module name: auctex Changes by: Masayuki Ataka <ataka> 07/01/31 21:45:39
Index: tex.el =================================================================== RCS file: /sources/auctex/auctex/tex.el,v retrieving revision 5.598 retrieving revision 5.599 diff -u -b -r5.598 -r5.599 --- tex.el 17 Jan 2007 14:21:55 -0000 5.598 +++ tex.el 31 Jan 2007 21:45:39 -0000 5.599 @@ -1,7 +1,7 @@ ;;; tex.el --- Support for TeX documents. ;; Copyright (C) 1985, 1986, 1987, 1991, 1993, 1994, 1996, 1997, 1999, 2000, -;; 2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc. +;; 2001, 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation, Inc. ;; Maintainer: [email protected] ;; Keywords: tex @@ -89,7 +89,7 @@ "*Command used to print a file. First `%p' is expanded to the printer name, then ordinary expansion is -performed as specified in `TeX-expand-list'. If it is `nil', +performed as specified in `TeX-expand-list'. If it is nil, then customization is requested." :group 'TeX-command :type '(choice (string :tag "Print command") @@ -133,7 +133,7 @@ "*Command used to show the status of a printer queue. First `%p' is expanded to the printer name, then ordinary expansion is -performed as specified in `TeX-expand-list'. If this is `nil', +performed as specified in `TeX-expand-list'. If this is nil, the printer has no corresponding command." :group 'TeX-command :type '(choice (string :tag "Queue check command") @@ -254,8 +254,7 @@ mode. If it should only be present in some modes, specify a list with the respective mode names. -Any additional elements get just transferred to the respective menu entries. -" +Any additional elements get just transferred to the respective menu entries." :group 'TeX-command :type '(repeat (group :value ("" "" TeX-run-command nil t) (string :tag "Name") @@ -356,7 +355,7 @@ The first element of each entry is the printer name. The second element is the command used to print to this -printer. It defaults to the value of `TeX-print-command' when `nil'. +printer. It defaults to the value of `TeX-print-command' when nil. The third element is the command used to examine the print queue for this printer. It defaults to the value of `TeX-queue-command' similarly. @@ -883,7 +882,7 @@ If CHANGED is non-nil, it indicates which global mode may have changed so that all corresponding buffers without a local value might get their name updated. -A value ot `t' will thus update all buffer names. +A value of t will thus update all buffer names. If LOCAL is non-nil and CHANGED is buffer-local, only a local change has been performed and only the local @@ -2467,6 +2466,11 @@ ;;; Plain TeX mode +(defcustom plain-TeX-mode-hook nil + "A hook run in plain TeX mode buffers." + :type 'hook + :group 'TeX-misc) + ;;;###autoload (defun TeX-plain-tex-mode () "Major mode in AUCTeX for editing plain TeX files. @@ -2903,7 +2907,7 @@ (make-variable-buffer-local 'TeX-auto-x-regexp-list) (defun TeX-regexp-group-count (regexp) - "Return number of groups in a regexp. This is not foolproof: + "Return number of groups in a REGEXP. This is not foolproof: you should not use something like `[\\(]' for a character range." (let (start (n 0)) (while (string-match "\\(\\`\\|[^\\]\\)\\(\\\\\\\\\\)*\\\\([^?]" @@ -3203,7 +3207,7 @@ (nth 1 format-spec)))) (if (eq TeX-kpathsea-path-delimiter t) (throw 'no-kpathsea - (setq kpathsea-path-delimiter nil)) + (setq TeX-kpathsea-path-delimiter nil)) (error "kpsewhich error"))))) result) (when (eq TeX-kpathsea-path-delimiter t) _______________________________________________ auctex-commit mailing list [EMAIL PROTECTED] http://lists.gnu.org/mailman/listinfo/auctex-commit
