(elp-instrument-list): Check argument type explicitly. Doc fix.

diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el
index 53eeea144cc7e5e6f51cc36322080fe4a0d782d7..435c30c75ec427b7aae8ebef3230407811860774 100644 (file)
--- a/lisp/emacs-lisp/elp.el
+++ b/lisp/emacs-lisp/elp.el
@@ -340,9 +340,12 @@ Argument FUNSYM is the symbol of a defined function."
 
 ;;;###autoload
 (defun elp-instrument-list (&optional list)
-  "Instrument for profiling, all functions in `elp-function-list'.
-Use optional LIST if provided instead."
+  "Instrument, for profiling, all functions in `elp-function-list'.
+Use optional LIST if provided instead.
+If called interactively, read LIST using the minibuffer."
   (interactive "PList of functions to instrument: ")
+  (unless (listp list)
+    (signal 'wrong-type-argument 'listp list))
   (let ((list (or list elp-function-list)))
     (mapcar 'elp-instrument-function list)))