commit: No doc special-case for autoloads; rely on on #'symbol-file instead.

Aidan Kehoe aidan-guest at alioth.debian.org
Wed Apr 9 18:31:59 EDT 2008


changeset:   4443:e7b3a3266356537ddd9926ac0aadf7cb43a49ed6
tag:         tip
user:        Aidan Kehoe <kehoea at parhasard.net>
date:        Thu Apr 10 00:31:27 2008 +0200
files:       lisp/ChangeLog lisp/help.el
description:
No doc special-case for autoloads; rely on on #'symbol-file instead.

2008-04-10  Aidan Kehoe  <kehoea at parhasard.net>

	* help.el (describe-function-1):
	Rely on #'symbol-file to tell which file an autoloaded function
	belongs to, don't special-case them.


diff -r 279739019e5c5b6413cfbce19d365eb91476bd04 -r e7b3a3266356537ddd9926ac0aadf7cb43a49ed6 lisp/ChangeLog
--- a/lisp/ChangeLog	Sat Apr 05 14:37:51 2008 +0200
+++ b/lisp/ChangeLog	Thu Apr 10 00:31:27 2008 +0200
@@ -1,3 +1,9 @@ 2008-03-19  Stephen J. Turnbull  <stephe
+2008-04-10  Aidan Kehoe  <kehoea at parhasard.net>
+
+	* help.el (describe-function-1): 
+	Rely on #'symbol-file to tell which file an autoloaded function
+	belongs to, don't special-case them.
+
 2008-03-19  Stephen J. Turnbull  <stephen at xemacs.org>
 
 	* custom.el (custom-theme-reset-internal): Fix call to get (symbol
diff -r 279739019e5c5b6413cfbce19d365eb91476bd04 -r e7b3a3266356537ddd9926ac0aadf7cb43a49ed6 lisp/help.el
--- a/lisp/help.el	Sat Apr 05 14:37:51 2008 +0200
+++ b/lisp/help.el	Thu Apr 10 00:31:27 2008 +0200
@@ -1424,8 +1424,6 @@ part of the documentation of internal su
             (t
              nil)))
     (princ "\n")
-    (if autoload-file
-	(princ (format "  -- autoloads from \"%s\"\n" autoload-file)))
     (or file-name
 	(setq file-name (symbol-file function)))
     (when file-name





More information about the XEmacs-Patches mailing list