From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 26 Feb 1999 06:57:28 +0000 (+0000)
Subject: (describe-function-1): Don't print a whole lambda-function.
X-Git-Tag: emacs-20.4~547
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6c8719f126d9401e630fc7b9724f43af3d3db800;p=emacs.git

(describe-function-1): Don't print a whole lambda-function.
---

diff --git a/lisp/help.el b/lisp/help.el
index 833239825e1..71e3d6fa969 100644
--- a/lisp/help.el
+++ b/lisp/help.el
@@ -674,7 +674,7 @@ It can also be nil, if the definition is not associated with any file."
 			 (t t))))
       (if (listp arglist)
 	  (progn
-	    (princ (cons function
+	    (princ (cons (if (symbolp function) function "anonymous")
 			 (mapcar (lambda (arg)
 				   (if (memq arg '(&optional &rest))
 				       arg