1
0
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:
Stefan Kangas 2022-08-04 14:45:42 +02:00
parent 41a59fc6b5
commit 7a7628df8e

View File

@ -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]
))