在emacs中创建"Mx"命令快捷方式?

Ema*_*erg 1 emacs elisp

输入的一些命令emacs很长.

尽管如此,我还是喜欢它们作为M-x命令(不是键盘快捷键),因为我有这么多,我会开始偶然发现它们.

并且,不应删除旧的.它需要一段时间适应新的.

只有这样我才能想到,像这样一个接一个地做.更好的方法?

(defun icd (dict) "Alias for ispell-change-dictionary"
  (interactive "sDictionary: ")
  (ispell-change-dictionary (downcase dict)))
Run Code Online (Sandbox Code Playgroud)

sco*_*zer 7

用途defalias:

(defalias 'bc 'emacs-lisp-byte-compile)
Run Code Online (Sandbox Code Playgroud)