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:
parent
9ebc22d43e
commit
033306e36b
@ -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")))
|
||||
|
Loading…
Reference in New Issue
Block a user