(elp-restore-function): Don't use obsolete byte-code-function-p.

diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el
index ea44a65e4512eeccba4d3d5f00927f85d9be5a65..1cb4a3cf57521bdf07c07623f1553d7ca2715bbc 100644 (file)
--- a/lisp/emacs-lisp/elp.el
+++ b/lisp/emacs-lisp/elp.el
@@ -313,7 +313,7 @@ Argument FUNSYM is the symbol of a defined function."
     ;; the case that a lisp function can be compiled instrumented?
     (and info
         (functionp funsym)
-        (not (compiled-function-p (symbol-function funsym)))
+        (not (byte-code-function-p (symbol-function funsym)))
         (assq 'elp-wrapper (symbol-function funsym))
         (fset funsym (aref info 2)))))