Mercurial > emacs
comparison lisp/emacs-lisp/lisp-mode.el @ 93147:641cbad340a8
(emacs-lisp-mode-map): Add ... where
appropriate.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Sat, 22 Mar 2008 17:51:17 +0000 |
parents | ade33d67202c |
children | e430e106fa7b |
comparison
equal
deleted
inserted
replaced
93146:c73e70274c0c | 93147:641cbad340a8 |
---|---|
289 (define-key menu-map [profiling] (cons "Profiling" prof-map)) | 289 (define-key menu-map [profiling] (cons "Profiling" prof-map)) |
290 (define-key prof-map [prof-restall] | 290 (define-key prof-map [prof-restall] |
291 '(menu-item "Remove Instrumentation for All Functions" elp-restore-all | 291 '(menu-item "Remove Instrumentation for All Functions" elp-restore-all |
292 :help "Restore the original definitions of all functions being profiled")) | 292 :help "Restore the original definitions of all functions being profiled")) |
293 (define-key prof-map [prof-restfunc] | 293 (define-key prof-map [prof-restfunc] |
294 '(menu-item "Remove Instrumentation for Function" elp-restore-function | 294 '(menu-item "Remove Instrumentation for Function..." elp-restore-function |
295 :help "Restore an instrumented function to its original definition")) | 295 :help "Restore an instrumented function to its original definition")) |
296 | 296 |
297 (define-key prof-map [sep-rem] '("--")) | 297 (define-key prof-map [sep-rem] '("--")) |
298 (define-key prof-map [prof-resall] | 298 (define-key prof-map [prof-resall] |
299 '(menu-item "Reset Counters for All Functions" elp-reset-all | 299 '(menu-item "Reset Counters for All Functions" elp-reset-all |
300 :help "Reset the profiling information for all functions being profiled")) | 300 :help "Reset the profiling information for all functions being profiled")) |
301 (define-key prof-map [prof-resfunc] | 301 (define-key prof-map [prof-resfunc] |
302 '(menu-item "Reset Counters for Function" elp-reset-function | 302 '(menu-item "Reset Counters for Function..." elp-reset-function |
303 :help "Reset the profiling information for a function")) | 303 :help "Reset the profiling information for a function")) |
304 (define-key prof-map [prof-res] | 304 (define-key prof-map [prof-res] |
305 '(menu-item "Show Profiling Results" elp-results | 305 '(menu-item "Show Profiling Results" elp-results |
306 :help "Display current profiling results")) | 306 :help "Display current profiling results")) |
307 (define-key prof-map [prof-pack] | 307 (define-key prof-map [prof-pack] |
308 '(menu-item "Instrument Package" elp-instrument-package | 308 '(menu-item "Instrument Package..." elp-instrument-package |
309 :help "Instrument for profiling all function that start with a prefix")) | 309 :help "Instrument for profiling all function that start with a prefix")) |
310 (define-key prof-map [prof-func] | 310 (define-key prof-map [prof-func] |
311 '(menu-item "Instrument Function" elp-instrument-function | 311 '(menu-item "Instrument Function..." elp-instrument-function |
312 :help "Instrument a function for profiling")) | 312 :help "Instrument a function for profiling")) |
313 (define-key menu-map [edebug-defun] | 313 (define-key menu-map [edebug-defun] |
314 '(menu-item "Instrument Function for Debugging" edebug-defun | 314 '(menu-item "Instrument Function for Debugging" edebug-defun |
315 :help "Evaluate the top level form point is in, stepping through with Edebug" | 315 :help "Evaluate the top level form point is in, stepping through with Edebug" |
316 :keys "C-u C-M-x")) | 316 :keys "C-u C-M-x")) |
317 (define-key menu-map [separator-byte] '("--")) | 317 (define-key menu-map [separator-byte] '("--")) |
318 (define-key menu-map [disas] | 318 (define-key menu-map [disas] |
319 '(menu-item "Disassemble byte compiled object" disassemble | 319 '(menu-item "Disassemble byte compiled object..." disassemble |
320 :help "Print disassembled code for OBJECT in a buffer")) | 320 :help "Print disassembled code for OBJECT in a buffer")) |
321 (define-key menu-map [byte-recompile] | 321 (define-key menu-map [byte-recompile] |
322 '(menu-item "Byte-recompile Directory..." byte-recompile-directory | 322 '(menu-item "Byte-recompile Directory..." byte-recompile-directory |
323 :help "Recompile every `.el' file in DIRECTORY that needs recompilation")) | 323 :help "Recompile every `.el' file in DIRECTORY that needs recompilation")) |
324 (define-key menu-map [emacs-byte-compile-and-load] | 324 (define-key menu-map [emacs-byte-compile-and-load] |