Mercurial > hg > xemacs-beta

comparison lisp/modes/texinfo.el @ 120:cca96a509cfe r20-1b12

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b12
author cvs
date Mon, 13 Aug 2007 09:25:29 +0200
parents 0293115a14e9
children 489f57a838ef
comparison
equal deleted inserted replaced
119:d101af7320b8 120:cca96a509cfe
23 ;; along with XEmacs; see the file COPYING. If not, write to the 23 ;; along with XEmacs; see the file COPYING. If not, write to the
24 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, 24 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
25 ;; Boston, MA 02111-1307, USA. 25 ;; Boston, MA 02111-1307, USA.
26 26
27 ;;; Synched up with: FSF 19.30. 27 ;;; Synched up with: FSF 19.30.
28
29 (defgroup texinfo nil
30 "Texinfo Mode"
31 :group 'docs)
28 32
29 33
30 ;;; Autoloads: 34 ;;; Autoloads:
31 35
32 (autoload 'makeinfo-region 36 (autoload 'makeinfo-region
628 (indent-to-column margin) 632 (indent-to-column margin)
629 (beginning-of-line)))) 633 (beginning-of-line))))
630 634
631 ;;; The tex and print function definitions: 635 ;;; The tex and print function definitions:
632 636
633 (defvar texinfo-texi2dvi-command "texi2dvi" 637 (defcustom texinfo-texi2dvi-command "texi2dvi"
634 "*Command used by `texinfo-tex-buffer' to run TeX and texindex on a buffer.") 638 "*Command used by `texinfo-tex-buffer' to run TeX and texindex on a buffer."
635 639 :type 'string
636 (defvar texinfo-tex-command "tex" 640 :group 'texinfo)
637 "*Command used by `texinfo-tex-region' to run TeX on a region.") 641
638 642 (defcustom texinfo-tex-command "tex"
639 (defvar texinfo-texindex-command "texindex" 643 "*Command used by `texinfo-tex-region' to run TeX on a region."
640 "*Command used by `texinfo-texindex' to sort unsorted index files.") 644 :type 'string
641 645 :group 'texinfo)
642 (defvar texinfo-delete-from-print-queue-command "lprm" 646
647 (defcustom texinfo-texindex-command "texindex"
648 "*Command used by `texinfo-texindex' to sort unsorted index files."
649 :type 'string
650 :group 'texinfo)
651
652 (defcustom texinfo-delete-from-print-queue-command "lprm"
643 "*Command string used to delete a job from the line printer queue. 653 "*Command string used to delete a job from the line printer queue.
644 Command is used by \\[texinfo-delete-from-print-queue] based on 654 Command is used by \\[texinfo-delete-from-print-queue] based on
645 number provided by a previous \\[tex-show-print-queue] 655 number provided by a previous \\[tex-show-print-queue]
646 command.") 656 command."
657 :type 'string
658 :group 'texinfo)
647 659
648 (defvar texinfo-tex-trailer "@bye" 660 (defvar texinfo-tex-trailer "@bye"
649 "String appended after a region sent to TeX by `texinfo-tex-region'.") 661 "String appended after a region sent to TeX by `texinfo-tex-region'.")
650 662
651 (defun texinfo-tex-region (beg end) 663 (defun texinfo-tex-region (beg end)