[英]Redefine major mode prefix key in Emacs
我一直在嘗試自學emacs,因為我使用的是dvorak,所以我愚蠢地將Cc
反彈到了運動鍵上並習慣了。 現在,我實際上開始使用它進行一些編程,並且我加載了一個python文件,並注意到Cc
是python-mode
所有特殊命令的前綴。
我可以一次綁定init.el
文件中的前綴鍵並更改所有python命令嗎? 如果沒有,我應該單獨重新綁定所有python命令嗎?
如果要讓Ctrl + C充當left
而F12充當Cc
:
(define-key key-translation-map [f12] "\C-c")
(define-key key-translation-map "\C-c" [left])
請注意,這也會影響多鍵綁定,例如,現在您需要輸入Ctrl + X F12退出Emacs。 此硬幣的另一面是Cc Cc
鍵入為F12 F12 。
如果查看python.el的源代碼,您會看到這些命令是使用完整規范分別添加的,例如(define-key map "\\Cc\\Cr" 'python-send-region)
。
因此,您將必須自己重做它們。 那說的很簡單。 根據您的評論,您想要將前綴鍵更改為C-' ,而正確轉義的技巧是根本不使用轉義符,而應使用宏kbd
( 文檔鏈接 )。
這樣,您可以將模式映射定義更新為:
(defvar python-mode-map
(let ((map (make-sparse-keymap)))
;; Mostly taken from python-mode.el.
(define-key map ":" 'python-electric-colon)
(define-key map "\177" 'python-backspace)
(define-key map (kbd "C-' <") 'python-shift-left)
(define-key map (kbd "C-' >") 'python-shift-right)
(define-key map (kbd "C-' C-k") 'python-mark-block)
(define-key map (kbd "C-' C-d") 'python-pdbtrack-toggle-stack-tracking)
(define-key map (kbd "C-' C-n") 'python-next-statement)
(define-key map (kbd "C-' C-p") 'python-previous-statement)
(define-key map (kbd "C-' C-u") 'python-beginning-of-block)
(define-key map (kbd "C-' C-f") 'python-describe-symbol)
(define-key map (kbd "C-' C-w") 'python-check)
(define-key map (kbd "C-' C-v") 'python-check) ; a la sgml-mode
(define-key map (kbd "C-' C-s") 'python-send-string)
(define-key map (kbd "C-\\ M-x") 'python-send-defun)
(define-key map (kbd "C-' C-r") 'python-send-region)
(define-key map (kbd "C-' M-r") 'python-send-region-and-go)
(define-key map (kbd "C-' C-c") 'python-send-buffer)
(define-key map (kbd "C-' C-z") 'python-switch-to-python)
(define-key map (kbd "C-' C-m") 'python-load-file)
(define-key map (kbd "C-' C-l") 'python-load-file) ; a la cmuscheme
(substitute-key-definition 'complete-symbol 'symbol-complete
map global-map)
(define-key map (kbd "C-' C-i") 'python-find-imports)
(define-key map (kbd "C-' C-t") 'python-expand-template)
(easy-menu-define python-menu map "Python Mode menu"
`("Python"
:help "Python-specific Features"
["Shift region left" python-shift-left :active mark-active
:help "Shift by a single indentation step"]
["Shift region right" python-shift-right :active mark-active
:help "Shift by a single indentation step"]
"-"
["Mark block" python-mark-block
:help "Mark innermost block around point"]
["Mark def/class" mark-defun
:help "Mark innermost definition around point"]
"-"
["Start of block" python-beginning-of-block
:help "Go to start of innermost definition around point"]
["End of block" python-end-of-block
:help "Go to end of innermost definition around point"]
["Start of def/class" beginning-of-defun
:help "Go to start of innermost definition around point"]
["End of def/class" end-of-defun
:help "Go to end of innermost definition around point"]
"-"
("Templates..."
:help "Expand templates for compound statements"
:filter (lambda (&rest junk)
(abbrev-table-menu python-mode-abbrev-table)))
"-"
["Start interpreter" python-shell
:help "Run `inferior' Python in separate buffer"]
["Import/reload file" python-load-file
:help "Load into inferior Python session"]
["Eval buffer" python-send-buffer
:help "Evaluate buffer en bloc in inferior Python session"]
["Eval region" python-send-region :active mark-active
:help "Evaluate region en bloc in inferior Python session"]
["Eval def/class" python-send-defun
:help "Evaluate current definition in inferior Python session"]
["Switch to interpreter" python-switch-to-python
:help "Switch to inferior Python buffer"]
["Set default process" python-set-proc
:help "Make buffer's inferior process the default"
:active (buffer-live-p python-buffer)]
["Check file" python-check :help "Run pychecker"]
["Debugger" pdb :help "Run pdb under GUD"]
"-"
["Help on symbol" python-describe-symbol
:help "Use pydoc on symbol at point"]
["Complete symbol" symbol-complete
:help "Complete (qualified) symbol before point"]
["Find function" python-find-function
:help "Try to find source definition of function at point"]
["Update imports" python-find-imports
:help "Update list of top-level imports for completion"]))
map))
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.