[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 653503573c 2/2: ; * lisp/bindings.el: Remove conflicting commente
From: |
Stefan Kangas |
Subject: |
master 653503573c 2/2: ; * lisp/bindings.el: Remove conflicting commented out bindings. |
Date: |
Tue, 19 Jul 2022 07:54:59 -0400 (EDT) |
branch: master
commit 653503573c4007a5a8a6d0e6a9f8468f5ed5b940
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
; * lisp/bindings.el: Remove conflicting commented out bindings.
---
lisp/bindings.el | 8 --------
1 file changed, 8 deletions(-)
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 11030038d5..1d795c7a30 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -1081,8 +1081,6 @@ if `inhibit-field-text-motion' is non-nil."
(define-key global-map "\C-y" 'yank)
(define-key esc-map "y" 'yank-pop)
-;; (define-key ctl-x-map "a" 'append-to-buffer)
-
(define-key global-map "\C-@" 'set-mark-command)
;; Many people are used to typing C-SPC and getting C-@.
(define-key global-map [?\C- ] 'set-mark-command)
@@ -1475,7 +1473,6 @@ if `inhibit-field-text-motion' is non-nil."
(define-key ctl-x-map "\C-p" 'mark-page)
(define-key ctl-x-map "l" 'count-lines-page)
(define-key ctl-x-map "np" 'narrow-to-page)
-;; (define-key ctl-x-map "p" 'narrow-to-page)
(defvar-keymap abbrev-map
:doc "Keymap for abbrev commands."
@@ -1485,16 +1482,11 @@ if `inhibit-field-text-motion' is non-nil."
"+" #'add-mode-abbrev
"i g" #'inverse-add-global-abbrev
"i l" #'inverse-add-mode-abbrev
- ;; "C-h" #'inverse-add-global-abbrev
"-" #'inverse-add-global-abbrev
"e" #'expand-abbrev
"'" #'expand-abbrev)
(define-key ctl-x-map "a" abbrev-map)
-;; (define-key ctl-x-map "\C-a" 'add-mode-abbrev)
-;; (define-key ctl-x-map "+" 'add-global-abbrev)
-;; (define-key ctl-x-map "\C-h" 'inverse-add-mode-abbrev)
-;; (define-key ctl-x-map "-" 'inverse-add-global-abbrev)
(define-key esc-map "'" 'abbrev-prefix-mark)
(define-key ctl-x-map "'" 'expand-abbrev)
(define-key ctl-x-map "\C-b" 'list-buffers)