# HG changeset patch
# User Luc Teirlinck <teirllm@auburn.edu>
# Date 1073150241 0
# Node ID deac15f329bb56d9ef4bd9eb900d78c51df3c17c
# Parent  b1348f420711857b7f6d415f675d479919ae9a23
(functionp): Doc fix.

diff -r b1348f420711 -r deac15f329bb lisp/subr.el
--- a/lisp/subr.el	Sat Jan 03 17:15:46 2004 +0000
+++ b/lisp/subr.el	Sat Jan 03 17:17:21 2004 +0000
@@ -2205,7 +2205,10 @@
        (eq (car object) 'frame-configuration)))
 
 (defun functionp (object)
-  "Non-nil iff OBJECT is a type of object that can be called as a function."
+  "Non-nil if OBJECT is any kind of function or a special form.
+Also non-nil if OBJECT is a symbol and its function definition is
+\(recursively) a function or special form.  This does not include
+macros."
   (or (and (symbolp object) (fboundp object)
 	   (condition-case nil
 	       (setq object (indirect-function object))