1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00

(tex-feed-input): New function.

(tex-define-common-keys): Add binding for C-c C-m.
This commit is contained in:
Richard M. Stallman 1998-11-25 01:07:19 +00:00
parent 9ebc22d43e
commit 033306e36b

View File

@ -337,6 +337,7 @@ subsubsection\\|paragraph\\|subparagraph\\)\\*?[ \t]*{" nil t)
"Define the keys that we want defined both in TeX mode and in the TeX shell."
(define-key keymap "\C-c\C-k" 'tex-kill-job)
(define-key keymap "\C-c\C-l" 'tex-recenter-output-buffer)
(define-key keymap "\C-c\C-m" 'tex-feed-input)
(define-key keymap "\C-c\C-q" 'tex-show-print-queue)
(define-key keymap "\C-c\C-p" 'tex-print)
(define-key keymap "\C-c\C-v" 'tex-view)
@ -990,6 +991,15 @@ Mark is left at original location."
(while (zerop (buffer-size))
(sleep-for 1)))))
(defun tex-feed-input ()
"Send input to the tex shell process.
In the tex buffer this can be used to continue an interactive tex run.
In the tex shell buffer this command behaves like `comint-send-input'."
(interactive)
(set-buffer (process-buffer (get-process "tex-shell")))
(comint-send-input)
(tex-recenter-output-buffer nil))
(defun tex-display-shell ()
"Make the TeX shell buffer visible in a window."
(display-buffer (process-buffer (get-process "tex-shell")))