summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2008-03-21 06:08:21 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2008-03-21 06:08:21 +0000
commit175e5186e228911eb75e1d94f38f1ef27c336858 (patch)
treecd3720ab9d99cb67633d31f2286c399d577fbd0b /lisp/emacs-lisp
parent21f3a27763e8a2838ebf2ddcf3d08a618a1aa1b0 (diff)
downloademacs-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.el3
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"))