简单的次要模式以保持轻松菜单

Question

我想要一份菜单，当我需要的时候我会叫它的。我认为这个小模式因此，我编写了一个次要模式，它只定义了keymap和简易菜单：

;; keymap:
(defvar bk-mdanalysis-mode-map
  (let ((map (make-sparse-keymap)))
    map)
  "Keymap for bk-mdanalysis minor mode")

;; menu:
(easy-menu-define mda bk-mdanalysis-mode-map "bk-mdanalysis-mode menu"
  '("BK-MDA"
    ["Test" (lambda () (interactive) (insert "test!")) t]
    ))

(define-minor-mode bk-mdanalysis-mode 
  nil nil nil 
  bk-mdanalysis-mode-map)

(provide 'bk-mdanalysis-mode)

因为某种原因它不起作用。怎么啦？

编辑

等等

我现在应该删除它吗？-还是怎样？

Answer 1

您将模式映射作为第五个参数来定义-小模式，而它应该是第四个参数。幸运的是你定义-小模式将使用它默认无论如何，所以它仍然有效，这第五个参数将被忽略。