mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-05 11:45:45 +00:00
; * lisp/progmodes/meta-mode.el: Delete some commented out code.
This commit is contained in:
parent
41a59fc6b5
commit
7a7628df8e
@ -802,11 +802,6 @@ The environment marked is the one that contains point or follows point."
|
||||
|
||||
(defvar meta-common-mode-map
|
||||
(let ((map (make-sparse-keymap)))
|
||||
;; Comment Paragraphs:
|
||||
;; (define-key map "\M-a" 'backward-sentence)
|
||||
;; (define-key map "\M-e" 'forward-sentence)
|
||||
;; (define-key map "\M-h" 'mark-paragraph)
|
||||
;; (define-key map "\M-q" 'fill-paragraph)
|
||||
;; Navigation:
|
||||
(define-key map "\M-\C-a" 'meta-beginning-of-defun)
|
||||
(define-key map "\M-\C-e" 'meta-end-of-defun)
|
||||
@ -823,10 +818,6 @@ The environment marked is the one that contains point or follows point."
|
||||
(define-key map "\C-c:" 'meta-uncomment-region)
|
||||
;; Symbol Completion:
|
||||
(define-key map "\M-\t" 'completion-at-point)
|
||||
;; Shell Commands:
|
||||
;; (define-key map "\C-c\C-c" 'meta-command-file)
|
||||
;; (define-key map "\C-c\C-k" 'meta-kill-job)
|
||||
;; (define-key map "\C-c\C-l" 'meta-recenter-output)
|
||||
map)
|
||||
"Keymap used in Metafont or MetaPost mode.")
|
||||
|
||||
@ -851,10 +842,6 @@ The environment marked is the one that contains point or follows point."
|
||||
:active mark-active]
|
||||
"--"
|
||||
["Complete Symbol" completion-at-point t]
|
||||
; "--"
|
||||
; ["Command on Buffer" meta-command-file t]
|
||||
; ["Kill Job" meta-kill-job t]
|
||||
; ["Recenter Output Buffer" meta-recenter-output-buffer t]
|
||||
))
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user