From 62a24cb5e11c503e26ff0e5ef7de33670149b769 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Wed, 27 Oct 1993 21:33:12 +0000 Subject: [PATCH] (tex-define-common-keys): Define menu items. --- lisp/textmodes/tex-mode.el | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index 0c9c28a0411..517b54c2604 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -192,6 +192,23 @@ Set by \\[tex-region], \\[tex-buffer], and \\[tex-file].") (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) + + (define-key keymap [menu-bar tex] (cons "TeX" (make-sparse-keymap "TeX"))) + + (define-key keymap [menu-bar tex tex-kill-job] '("Tex Kill" . tex-kill-job)) + (define-key keymap [menu-bar tex tex-validate-region] + '("Validate Region" . tex-validate-region)) + (define-key keymap [menu-bar tex validate-tex-buffer] + '("Validate Buffer" . validate-tex-buffer)) + (define-key keymap [menu-bar tex tex-show-print-queue] + '("Show Print Queue" . tex-show-print-queue)) + (define-key keymap [menu-bar tex tex-view] '("Tex View" . tex-view)) + (define-key keymap [menu-bar tex tex-print] '("Tex Print" . tex-print)) + (define-key keymap [menu-bar tex tex-recenter-output-buffer] + '("Tex Recenter" . tex-recenter-output-buffer)) + (define-key keymap [menu-bar tex tex-file] '("Tex File" . tex-file)) + (define-key keymap [menu-bar tex tex-region] '("Tex Region" . tex-region)) + (define-key keymap [menu-bar tex tex-buffer] '("Tex Buffer" . tex-buffer)) ) (defvar tex-mode-map nil "Keymap for TeX mode.") -- 2.39.5