Subject: bug#6494: closed (Re: bug#6494: 23.2; find-lisp-object-file-name doc incorrect)

From: [email-masked] (GNU bug Tracking System)
Date: Fri, 23 Jul 2010 01:56:02 +0000

Your bug report

#6494: 23.2; find-lisp-object-file-name doc incorrect

which was filed against the emacs package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
6494: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=6494
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#6494: 23.2; find-lisp-object-file-name doc incorrect
From: Juanma Barranquero <[email-masked]>
To: Leo <[email-masked]>
Cc: [email-masked]
Date: Fri, 23 Jul 2010 03:55:10 +0200
List-Id: <debbugs-submit.debbugs.gnu.org>

On Tue, Jun 22, 2010 at 19:09, Leo <[email-masked]> wrote:
>
> To be consistent with symbol-file, the doc-string should be fixed
> instead.

Fixed, thanks.

    Juanma

Subject: 23.2; find-lisp-object-file-name doc incorrect
From: Leo <[email-masked]>
To: [email-masked]
Date: Tue, 22 Jun 2010 18:01:21 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

The doc-string of find-lisp-object-file-name regarding TYPE is
incorrect. The code says defvar or defface but the doc-string says
variable or face, one of which should be fixed. The attached patch fixes
the code.

cheers -- Leo

diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 86e9411..32470bb 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -244,7 +244,7 @@ suitable file is found, return nil."
   (let* ((autoloaded (eq (car-safe type) 'autoload))
 	 (file-name (or (and autoloaded (nth 1 type))
 			(symbol-file
-			 object (if (memq type (list 'defvar 'defface))
+			 object (if (memq type (list 'variable 'face))
 				    type
 				  'defun)))))
     (cond