procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix elp-*-list interactive specs

Browse source 
* lisp/emacs-lisp/elp.el (elp-reset-list):
(elp-restore-list): Fix the interactive specs (bug#52457).
This commit is contained in:
Lars Ingebrigtsen 2021-12-19 14:20:15 +01:00
parent d745f4b6a0
commit 25d8045608
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emacs-lisp/elp.el
View file

@ -301,7 +301,7 @@ For example, to instrument all ELP functions, do the following:
(defun elp-restore-list (&optional list)
"Restore the original definitions for all functions in `elp-function-list'.
Use optional LIST if provided instead."
(interactive "PList of functions to restore: ") ;FIXME: Doesn't work!?
(interactive)
(mapcar #'elp-restore-function (or list elp-function-list)))
(defun elp-restore-all ()
@ -323,7 +323,7 @@ Use optional LIST if provided instead."
(defun elp-reset-list (&optional list)
"Reset the profiling information for all functions in `elp-function-list'.
Use optional LIST if provided instead."
(interactive "PList of functions to reset: ") ;FIXME: Doesn't work!?
(interactive)
(let ((list (or list elp-function-list)))
(mapcar 'elp-reset-function list)))