# HG changeset patch # User Richard M. Stallman # Date 751757592 0 # Node ID be43750c20d29d1c7c64c9ac091b4a923bd95de0 # Parent 3b157c1195a69dd8f7a89946a69cf72529622d6e (tex-define-common-keys): Define menu items. diff -r 3b157c1195a6 -r be43750c20d2 lisp/textmodes/tex-mode.el --- a/lisp/textmodes/tex-mode.el Wed Oct 27 03:32:10 1993 +0000 +++ b/lisp/textmodes/tex-mode.el Wed Oct 27 21:33:12 1993 +0000 @@ -192,6 +192,23 @@ (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.")