diff options
| author | Stefan Kangas <stefan@marxist.se> | 2022-08-04 14:45:42 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-08-04 14:48:39 +0200 |
| commit | 7a7628df8e743e2e2bae890049a2849a62a507ab (patch) | |
| tree | 43a6723261c7154cf4326d5c8f44ebd542c13f95 | |
| parent | 41a59fc6b5ca398db09d5620607f859b70d18994 (diff) | |
| download | emacs-7a7628df8e743e2e2bae890049a2849a62a507ab.tar.gz | |
; * lisp/progmodes/meta-mode.el: Delete some commented out code.
| -rw-r--r-- | lisp/progmodes/meta-mode.el | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/lisp/progmodes/meta-mode.el b/lisp/progmodes/meta-mode.el index 37dff599f2f..30d37cf7ecd 100644 --- a/lisp/progmodes/meta-mode.el +++ b/lisp/progmodes/meta-mode.el @@ -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] )) |