# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 725703241 0
# Node ID f79966ac4f9d970e6147edc8619c286939bfc401
# Parent  5c3898c5aa2d14d220563f3425ce5443d14aa992
(texinfo-tex-command): Use texi2dvi.
(texinfo-texindex, texinfo-texindex-command): Commented out.

diff -r 5c3898c5aa2d -r f79966ac4f9d lisp/textmodes/texinfo.el
--- a/lisp/textmodes/texinfo.el	Tue Dec 29 21:58:10 1992 +0000
+++ b/lisp/textmodes/texinfo.el	Wed Dec 30 08:14:01 1992 +0000
@@ -53,7 +53,7 @@
   (define-key texinfo-mode-map "\C-c\C-t\C-l"    'tex-recenter-output-buffer)
   (define-key texinfo-mode-map "\C-c\C-t\C-q"    'tex-show-print-queue)
   (define-key texinfo-mode-map "\C-c\C-t\C-p"    'texinfo-tex-print)
-  (define-key texinfo-mode-map "\C-c\C-t\C-i"    'texinfo-texindex)
+;;  (define-key texinfo-mode-map "\C-c\C-t\C-i"    'texinfo-texindex)
   (define-key texinfo-mode-map "\C-c\C-t\C-t"    'texinfo-tex-buffer)
   (define-key texinfo-mode-map "\C-c\C-t\C-r"    'texinfo-tex-region)
 
@@ -310,11 +310,11 @@
 
 ;;; The  tex  and  print  function definitions:
 
-(defvar texinfo-tex-command "tex"
+(defvar texinfo-tex-command "texi2dvi"
   "*Command used by  texinfo-tex-region  to run tex on a region.")
 
-(defvar texinfo-texindex-command "texindex"
-  "*Command used by  texinfo-texindex  to sort unsorted index files.")
+;;(defvar texinfo-texindex-command "texindex"
+;;  "*Command used by  texinfo-texindex  to sort unsorted index files.")
 
 (defun texinfo-tex-region (beg end)
   "Run tex on the current region.
@@ -395,15 +395,15 @@
   (interactive)
   (texinfo-tex-region (point-min) (point-max)))
 
-(defun texinfo-texindex ()
-  "Run texindex on unsorted index files.
-The index files are made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer].
-Runs the shell command defined by `texinfo-texindex-command'."
-  (interactive)
-  (send-string "tex-shell"
-	       (concat texinfo-texindex-command
-                       " " tex-zap-file ".??" "\n"))
-  (tex-recenter-output-buffer nil))
+;;(defun texinfo-texindex ()
+;;  "Run texindex on unsorted index files.
+;;The index files are made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer].
+;;Runs the shell command defined by `texinfo-texindex-command'."
+;;  (interactive)
+;;  (send-string "tex-shell"
+;;	       (concat texinfo-texindex-command
+;;                       " " tex-zap-file ".??" "\n"))
+;;  (tex-recenter-output-buffer nil))
 
 (defun texinfo-tex-print ()
   "Print .dvi file made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer].