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]