changeset 40832:33d8d61c63dd

(functionp): Don't consider macros as functions.
author Miles Bader <miles@gnu.org>
date Fri, 09 Nov 2001 01:02:27 +0000
parents 900b6d76feac
children 0ef95d6b83bc
files lisp/subr.el
diffstat 1 files changed, 2 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/subr.el	Thu Nov 08 12:12:30 2001 +0000
+++ b/lisp/subr.el	Fri Nov 09 01:02:27 2001 +0000
@@ -1538,12 +1538,9 @@
 	   (fboundp object)
 	   (setq object (indirect-function object))
 	   (eq (car-safe object) 'autoload)
-	   (not (eq (car-safe
-		     (cdr-safe (cdr-safe (cdr-safe (cdr-safe object)))))
-		    'keymap)))
+	   (not (car-safe (cdr-safe (cdr-safe (cdr-safe (cdr-safe object)))))))
       (subrp object) (byte-code-function-p object)
-      (eq (car-safe object) 'lambda)
-      (eq (car-safe object) 'macro)))
+      (eq (car-safe object) 'lambda)))
 
 (defun interactive-form (function)
   "Return the interactive form of FUNCTION.