diff options
author | Dan Nicolaescu <dann@ics.uci.edu> | 2008-03-21 06:08:21 +0000 |
---|---|---|
committer | Dan Nicolaescu <dann@ics.uci.edu> | 2008-03-21 06:08:21 +0000 |
commit | 175e5186e228911eb75e1d94f38f1ef27c336858 (patch) | |
tree | cd3720ab9d99cb67633d31f2286c399d577fbd0b /lisp/emacs-lisp | |
parent | 21f3a27763e8a2838ebf2ddcf3d08a618a1aa1b0 (diff) | |
download | emacs-175e5186e228911eb75e1d94f38f1ef27c336858.tar.gz emacs-175e5186e228911eb75e1d94f38f1ef27c336858.tar.bz2 emacs-175e5186e228911eb75e1d94f38f1ef27c336858.zip |
(emacs-lisp-mode-map): Add menu entry for disassemble.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 3381116189f..1d551e0eae2 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -315,6 +315,9 @@ :help "Evaluate the top level form point is in, stepping through with Edebug" :keys "C-u C-M-x")) (define-key menu-map [separator-byte] '("--")) + (define-key menu-map [disas] + '(menu-item "Disassemble byte compiled object" disassemble + :help "Print disassembled code for OBJECT in a buffer")) (define-key menu-map [byte-recompile] '(menu-item "Byte-recompile Directory..." byte-recompile-directory :help "Recompile every `.el' file in DIRECTORY that needs recompilation")) |