From a4924b14919a427bf14913608b97d14a8c8e221f Mon Sep 17 00:00:00 2001 From: Tomohiro Matsuyama Date: Wed, 22 Aug 2012 16:08:36 +0900 Subject: * profiler.el (profiler-start): Change mode spec. --- lisp/profiler.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/profiler.el') diff --git a/lisp/profiler.el b/lisp/profiler.el index 8428b38c586..db2d0eb461a 100644 --- a/lisp/profiler.el +++ b/lisp/profiler.el @@ -538,16 +538,16 @@ otherwise collapse the entry." ;;;###autoload (defun profiler-start (mode) (interactive - (list (intern (completing-read "Mode: " '("cpu" "memory" "cpu&memory") + (list (intern (completing-read "Mode: " '("cpu" "mem" "cpu+mem") nil t nil nil "cpu")))) (cl-ecase mode (cpu (sample-profiler-start profiler-sample-interval) (message "CPU profiler started")) - (memory + (mem (memory-profiler-start) (message "Memory profiler started")) - (cpu&memory + (cpu+mem (sample-profiler-start profiler-sample-interval) (memory-profiler-start) (message "CPU and memory profiler started")))) -- cgit v1.2.1