From 6ccab458cc51e82ed10ba436e024a0eced858913 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 22 Mar 1996 14:18:20 +0000 Subject: [PATCH] (elp-instrument-package): Don't instrument keymaps and autoloaded functions. --- lisp/emacs-lisp/elp.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/elp.el b/lisp/emacs-lisp/elp.el index 37ade7b5b73..7c07e900b38 100644 --- a/lisp/emacs-lisp/elp.el +++ b/lisp/emacs-lisp/elp.el @@ -300,9 +300,9 @@ For example, to instrument all ELP functions, do the following: (function (lambda (sym) (and (fboundp sym) - (not (eq (car-safe - (symbol-function sym)) - 'macro))))))))) + (not (memq (car-safe + (symbol-function sym)) + '(macro keymap autoload)))))))))) (defun elp-restore-list (&optional list) "Restore the original definitions for all functions in `elp-function-list'. -- 2.39.2