# HG changeset patch # User Richard M. Stallman # Date 753004376 0 # Node ID e7fe9ea8e81c15551b9216b7a701159691fe025b # Parent 50708e8b133bb1615d418dd16180509ce01cd8d4 (texinfo-texi2dvi-command): Separate `texi2dvi' command from `tex' command so `texinfo-format-region' can use straight `tex' command. (texinfo-format-buffer): Use `texinfo-texi2dvi-command' (texinfo-delete-from-print-queue): Revise documentation. diff -r 50708e8b133b -r e7fe9ea8e81c lisp/textmodes/texinfo.el --- a/lisp/textmodes/texinfo.el Thu Nov 11 07:17:08 1993 +0000 +++ b/lisp/textmodes/texinfo.el Thu Nov 11 07:52:56 1993 +0000 @@ -579,7 +579,10 @@ ;;; The tex and print function definitions: -(defvar texinfo-tex-command "texi2dvi" +(defvar texinfo-texi2dvi-command "texi2dvi" + "*Command used by `texinfo-tex-buffer' to run TeX and texindex on a buffer.") + +(defvar texinfo-tex-command "tex" "*Command used by `texinfo-tex-region' to run TeX on a region.") (defvar texinfo-texindex-command "texindex" @@ -698,7 +701,7 @@ " " (file-name-directory tex-zap-file) "\n")) (send-string "tex-shell" - (concat texinfo-tex-command " " tex-zap-file "\n")) + (concat texinfo-texi2dvi-command " " tex-zap-file "\n")) (tex-recenter-output-buffer 0)) @@ -732,12 +735,12 @@ (set-buffer (get-buffer "*tex-shell*")) (goto-char (point-max)) (insert "x") - (shell-send-input))) + (comint-send-input))) (defun texinfo-delete-from-print-queue (job-number) "Delete job from the line printer spooling queue. You are prompted for the job number (use a number shown by a previous -\\[texinfo-show-tex-print-queue] command)." +\\[texinfo-show-print-queue] command)." (interactive "nPrinter job number for deletion: ") (require 'tex-mode) (if (tex-shell-running)