Previous: Menu Bar, Up: Menu Keymaps   [Contents][Index]


21.12.6 ¥á¥Ë¥å¡¼¤Î½¤Àµ

´û¸¤Î¥á¥Ë¥å¡¼¤Ë¿·¤¿¤Ê¹àÌܤòÁÞÆþ¤¹¤ë¤È¤­¡¢ ¥á¥Ë¥å¡¼¤Î´û¸¤Î¹àÌÜ¤ÎÆÃÄê¤Î¾ì½ê¤ËÁÞÆþ¤·¤¿¤¤¤Ç¤·¤ç¤¦¡£ define-key¤Ç¹àÌܤòÄɲ乤ë¤È¡¢Ä̾¥á¥Ë¥å¡¼¤ÎÀèÆ¬¤ËÆþ¤ê¤Þ¤¹¡£ ¥á¥Ë¥å¡¼¤Î¤½¤ì°Ê³°¤Î¾ì½ê¤ËÁÞÆþ¤¹¤ë¤Ë¤Ï¡¢ define-key-after¤ò»È¤¤¤Þ¤¹¡£

Function: define-key-after map key binding after

key¤ËÂФ¹¤ë¥Ð¥¤¥ó¥Ç¥£¥ó¥°binding¤òmapÆâ¤Ëºî¤ë¡£ ¤¿¤À¤·¡¢mapÆâ¤Ç¤Î¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤Î°ÌÃ֤ϡ¢ ¥¤¥Ù¥ó¥Èafter¤ËÂФ¹¤ë¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤Î¤¢¤È¤Ë¤¹¤ë¡£ °ú¿ôkey¤ÏŤµ1¡¢¤Ä¤Þ¤ê¡¢1Í×ÁǤΤߤΥ٥¯¥È¥ë¤«Ê¸»úÎó¤Ç¤¢¤ë¤³¤È¡£ ¤·¤«¤·¡¢after¤Ï1¤Ä¤Î¥¤¥Ù¥ó¥È·¿¡¢¤Ä¤Þ¤ê¡¢ ¥·¥ó¥Ü¥ë¤«Ê¸»ú¤Ç¤¢¤êÎó¤Ç¤Ï¤Ê¤¤¤³¤È¡£ ¿·¤¿¤Ê¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤Ïafter¤ËÂФ¹¤ë¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤Î¤¦¤·¤í¤ËÆþ¤ë¡£ after¤¬t¤Ç¤¢¤ë¤È¡¢¿·¤¿¤Ê¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤ÏºÇ¸å¡¢ ¤Ä¤Þ¤ê¡¢¥­¡¼¥Þ¥Ã¥×¤ÎËöÈø¤ËÆþ¤ë¡£

Îã¤ò¼¨¤¹¡£

(define-key-after my-menu [drink]
                  '("Drink" . drink-command) 'eat)

¤³¤ì¤Ï¡¢µ¿»÷¥Õ¥¡¥ó¥¯¥·¥ç¥ó¥­¡¼DRINK¤ËÂФ¹¤ë¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤òºî¤ê¡¢ EAT¤ËÂФ¹¤ë¥Ð¥¤¥ó¥Ç¥£¥ó¥°¤Î¤¢¤È¤ËÆþ¤ì¤ë¡£

shell¥â¡¼¥É¤Î¥á¥Ë¥å¡¼‘Signals’¤Ë¤ª¤¤¤Æ¡¢ ¹àÌÜbreak¤Î¤¢¤È¤Ë¹àÌÜ‘Work’¤òÆþ¤ì¤ëÊýË¡¤Ï¤Ä¤®¤Î¤È¤ª¤ê¤Ç¤¢¤ë¡£

(define-key-after
  (lookup-key shell-mode-map [menu-bar signals])
  [work] '("Work" . work-command) 'break)