如何将一个emacs键图中的所有键绑定到另一个键图中

Question

我希望两个键盘映射在Emacs中“大致”相同。特别是，我希望“ super”键的键映射默认为执行“ meta”键的功能。

因此，我想写一些代码将meta-keymap的内容复制到super-keymap。类似于以下内容：

(defun copy-one-key (from-keymap to-keymap key-sequence)
   ;; don't bind keys already bound
   (unless (get-key-binding to-keymap key-sequence)
      (set-key-binding to-key-map key-sequence
         (get-key-binding from-keymap key-sequence)
         ) ; set
      ) ; when
   ) ; defun

(defun copy-keymap (from-keymap to-keymap)
   (mapcar from-keymap 
      (lambda key-sequence 
          (copy-one-key from-keymap to-keymap key-sequence)
          ) ; lambda
       ) ; mapcar
    ) ; defun

(copy-keymap meta-keymap super-keymap)

相关问题。我不知道是否确实为meta-keymap和super-keymap命名了键盘映射，是否我需要以某种方式将它们从全局键盘映射中解析出来，以寻找“ M-”并将其更改为“ s-”。 / p>

我忘了补充一点，我本质上是想为我复制的每个函数添加一个建议。