Index: help-fns.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/help-fns.el,v
retrieving revision 1.82
diff -c -r1.82 help-fns.el
*** help-fns.el	30 Nov 2005 15:52:49 -0000	1.82
--- help-fns.el	18 Dec 2005 09:43:37 -0000
***************
*** 322,328 ****
  		((eq (car-safe def) 'macro)
  		 "a Lisp macro")
  		((eq (car-safe def) 'autoload)
! 		 (setq file-name (nth 1 def))
  		 (format "%s autoloaded %s"
  			 (if (commandp def) "an interactive" "an")
  			 (if (eq (nth 4 def) 'keymap) "keymap"
--- 322,328 ----
  		((eq (car-safe def) 'macro)
  		 "a Lisp macro")
  		((eq (car-safe def) 'autoload)
! 		 (setq file-name (concat (nth 1 def) ".el"))
  		 (format "%s autoloaded %s"
  			 (if (commandp def) "an interactive" "an")
  			 (if (eq (nth 4 def) 'keymap) "keymap"