Mercurial > emacs
comparison lisp/textmodes/texinfo.el @ 1730:f79966ac4f9d
(texinfo-tex-command): Use texi2dvi.
(texinfo-texindex, texinfo-texindex-command): Commented out.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 30 Dec 1992 08:14:01 +0000 |
| parents | a52da8d63ff3 |
| children | ce05243e2491 |
comparison
equal
deleted
inserted
replaced
| 1729:5c3898c5aa2d | 1730:f79966ac4f9d |
|---|---|
| 51 | 51 |
| 52 (define-key texinfo-mode-map "\C-c\C-t\C-k" 'tex-kill-job) | 52 (define-key texinfo-mode-map "\C-c\C-t\C-k" 'tex-kill-job) |
| 53 (define-key texinfo-mode-map "\C-c\C-t\C-l" 'tex-recenter-output-buffer) | 53 (define-key texinfo-mode-map "\C-c\C-t\C-l" 'tex-recenter-output-buffer) |
| 54 (define-key texinfo-mode-map "\C-c\C-t\C-q" 'tex-show-print-queue) | 54 (define-key texinfo-mode-map "\C-c\C-t\C-q" 'tex-show-print-queue) |
| 55 (define-key texinfo-mode-map "\C-c\C-t\C-p" 'texinfo-tex-print) | 55 (define-key texinfo-mode-map "\C-c\C-t\C-p" 'texinfo-tex-print) |
| 56 (define-key texinfo-mode-map "\C-c\C-t\C-i" 'texinfo-texindex) | 56 ;; (define-key texinfo-mode-map "\C-c\C-t\C-i" 'texinfo-texindex) |
| 57 (define-key texinfo-mode-map "\C-c\C-t\C-t" 'texinfo-tex-buffer) | 57 (define-key texinfo-mode-map "\C-c\C-t\C-t" 'texinfo-tex-buffer) |
| 58 (define-key texinfo-mode-map "\C-c\C-t\C-r" 'texinfo-tex-region) | 58 (define-key texinfo-mode-map "\C-c\C-t\C-r" 'texinfo-tex-region) |
| 59 | 59 |
| 60 (define-key texinfo-mode-map "\C-c\C-i\C-r" 'texinfo-format-region) | 60 (define-key texinfo-mode-map "\C-c\C-i\C-r" 'texinfo-format-region) |
| 61 (define-key texinfo-mode-map "\C-c\C-i\C-b" 'texinfo-format-buffer) | 61 (define-key texinfo-mode-map "\C-c\C-i\C-b" 'texinfo-format-buffer) |
| 308 ; tex-zap-file nil (created as needed) | 308 ; tex-zap-file nil (created as needed) |
| 309 | 309 |
| 310 | 310 |
| 311 ;;; The tex and print function definitions: | 311 ;;; The tex and print function definitions: |
| 312 | 312 |
| 313 (defvar texinfo-tex-command "tex" | 313 (defvar texinfo-tex-command "texi2dvi" |
| 314 "*Command used by texinfo-tex-region to run tex on a region.") | 314 "*Command used by texinfo-tex-region to run tex on a region.") |
| 315 | 315 |
| 316 (defvar texinfo-texindex-command "texindex" | 316 ;;(defvar texinfo-texindex-command "texindex" |
| 317 "*Command used by texinfo-texindex to sort unsorted index files.") | 317 ;; "*Command used by texinfo-texindex to sort unsorted index files.") |
| 318 | 318 |
| 319 (defun texinfo-tex-region (beg end) | 319 (defun texinfo-tex-region (beg end) |
| 320 "Run tex on the current region. | 320 "Run tex on the current region. |
| 321 A temporary file (`tex-zap-file') is written in directory `tex-directory', and | 321 A temporary file (`tex-zap-file') is written in directory `tex-directory', and |
| 322 tex is run in that directory. The first line of the file is copied to the | 322 tex is run in that directory. The first line of the file is copied to the |
| 393 "Run tex on current buffer. | 393 "Run tex on current buffer. |
| 394 See \\[texinfo-tex-region] for more information." | 394 See \\[texinfo-tex-region] for more information." |
| 395 (interactive) | 395 (interactive) |
| 396 (texinfo-tex-region (point-min) (point-max))) | 396 (texinfo-tex-region (point-min) (point-max))) |
| 397 | 397 |
| 398 (defun texinfo-texindex () | 398 ;;(defun texinfo-texindex () |
| 399 "Run texindex on unsorted index files. | 399 ;; "Run texindex on unsorted index files. |
| 400 The index files are made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer]. | 400 ;;The index files are made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer]. |
| 401 Runs the shell command defined by `texinfo-texindex-command'." | 401 ;;Runs the shell command defined by `texinfo-texindex-command'." |
| 402 (interactive) | 402 ;; (interactive) |
| 403 (send-string "tex-shell" | 403 ;; (send-string "tex-shell" |
| 404 (concat texinfo-texindex-command | 404 ;; (concat texinfo-texindex-command |
| 405 " " tex-zap-file ".??" "\n")) | 405 ;; " " tex-zap-file ".??" "\n")) |
| 406 (tex-recenter-output-buffer nil)) | 406 ;; (tex-recenter-output-buffer nil)) |
| 407 | 407 |
| 408 (defun texinfo-tex-print () | 408 (defun texinfo-tex-print () |
| 409 "Print .dvi file made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer]. | 409 "Print .dvi file made by \\[texinfo-tex-region] or \\[texinfo-tex-buffer]. |
| 410 Runs the shell command defined by `tex-dvi-print-command'." | 410 Runs the shell command defined by `tex-dvi-print-command'." |
| 411 (interactive) | 411 (interactive) |