[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Keymap problem

From: address@hidden
Subject: Keymap problem
Date: Sun, 15 Jul 2007 20:35:39 +0900
User-agent: Thunderbird (X11/20070615)

I use the following code to define a menu named "Pmd" which
have only one menu item named "pmd current buffer".
The menuitem binded to 'pmd-current-buffer.
but the shotcut (C-c p b) does not work,What is the problem?

(defun pmd-minor-mode (&optional arg)
(setq pmd-list-entry-keymap (make-keymap))
(use-local-map pmd-list-entry-keymap)
(defvar pmd:map nil
"The pmd keymap.")
(setq pmd:map (make-sparse-keymap))
(define-key pmd:map "\C-cpb" 'pmd-current-buffer)
(easy-menu-define pmd:menu
(list pmd:map pmd-list-entry-keymap)
"pmd menu"
[ "pmd current buffer" pmd-current-buffer t ]

(easy-menu-add pmd:menu pmd:map)

(add-hook 'jde-mode-hook (function pmd-minor-mode))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]