0

我想要一个菜单​​,我会在需要时调用它。我认为次要模式- 是要走的路。所以我写了一个小模式,它只定义了keymap和easy-menu:

;; 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)

由于某种原因,它不起作用。怎么了?

编辑

等一下——它起作用了!

我现在应该删除它 - 还是什么?

4

1 回答 1

1

您将 bk-mdanalysis-mode-map 作为第 5 个参数放置到 define-minor-mode 而它应该是第 4 个参数。幸运的是,define-minor-mode 无论如何都会默认使用它,所以它仍然有效,并且这第 5 个参数将被忽略。

于 2012-10-12T15:07:01.800 回答