修改按键映射M-x

[cireu]

也可以用hydra

使用 hydra 实现简单版本的 keychord

hydra-wiki 上给出了使用 xf 调用 find-file 的方法 我做了简单的扩展: (require 'hydra) (defvar comma-hydra-timer nil) ;; 退出 hydra 的延迟时间 (defvar comma-hydra-delay 0.5) (defvar comma-hydra-char ",") (defvar-local comma-hydra-last-buffer-undo-list nil) (defun comma-hydra-quit (&optional no-hydra-quit) "退出hydra, 清空 timer" (when comma-hydra-timer (cancel-timer comma-hydra-timer) (setq comma-hydra-timer nil)) (unless no-hydra-quit (hydra-keyboard-quit))) (defun comma-hydra-pre () (comma-hydra-quit t…