From xemacs-m  Mon Aug 25 14:14:37 1997
Received: from altair.xemacs.org (steve@xemacs.miranova.com [206.190.83.19])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id OAA15419
	for <xemacs-beta@xemacs.org>; Mon, 25 Aug 1997 14:14:36 -0500 (CDT)
Received: (from steve@localhost)
	by altair.xemacs.org (8.8.6/8.8.6) id MAA23160;
	Mon, 25 Aug 1997 12:19:31 -0700
Mail-Copies-To: never
To: xemacs-beta@xemacs.org
Subject: [PATCH - 20.3] Re: find-function broklen ?!
References: <qyjwwla4hhb.fsf@metheny.enst.fr>
X-Face: `'%\i;ySOu]g?NlziJSk_$&@]KP`}~PEQPjZ5;nxSaDW_o$4+4%Ab]%Ifw3ZR;7TIT3,O,'
 @2{L;]ox6kc;$_5kU'n**9vFg-]eV~GbxSVCx|(s%uR[],*:^WKmC`B}(;|k9/m]gwt?&`t;^rfCJg
 khHH>pP1W\)xM0U@!FNDD72{3fDP$PkBhx^7Z?-WxH6DbFN:QOnT`llzW}VGdYv;n9lzljQvKTIBhQ
 YuV
X-Attribution: sb
From: SL Baur <steve@xemacs.org>
In-Reply-To: Didier Verna's message of "25 Aug 1997 13:41:52 +0200"
Mime-Version: 1.0 (generated by tm-edit 7.108)
Content-Type: text/plain; charset=US-ASCII
Date: 25 Aug 1997 12:19:31 -0700
Message-ID: <m2rabiyssc.fsf@altair.xemacs.org>
Lines: 49
X-Mailer: Gnus v5.4.65/XEmacs 20.3(beta19) - "Kiev"

Didier Verna <verna@inf.enst.fr> writes:

> Signaling: (void-function ff-read-function)
 ...
> Why is that ?

`ff-read-function' was renamed to `find-function-read-function' without
the previous references to the old name being updated.

1997-08-25  SL Baur  <steve@altair.xemacs.org>

	* prim/help.el (find-function): ff-read-function was renamed.
	(find-function-other-window): Ditto.
	(find-function-other-frame): Ditto.

Index: lisp/prim/help.el
===================================================================
RCS file: /usr/local/xemacs/xemacs-20.0/lisp/prim/help.el,v
retrieving revision 1.20
diff -u -r1.20 help.el
--- help.el	1997/08/17 03:24:13	1.20
+++ help.el	1997/08/25 19:16:25
@@ -1433,7 +1433,7 @@
 
 If the optional argument PATH is given, the library where FUNCTION is
 defined is searched in PATH instead of `load-path'"
-  (interactive (ff-read-function))
+  (interactive (find-function-read-function))
   (let ((buffer-point (find-function-noselect function path)))
     (if buffer-point
 	(progn
@@ -1450,7 +1450,7 @@
 
 If the optional argument PATH is given, the library where FUNCTION is
 defined is searched in PATH instead of `load-path'"
-  (interactive (ff-read-function))
+  (interactive (find-function-read-function))
   (let ((buffer-point (find-function-noselect function path)))
     (if buffer-point
 	(progn
@@ -1467,7 +1467,7 @@
 
 If the optional argument PATH is given, the library where FUNCTION is
 defined is searched in PATH instead of `load-path'"
-  (interactive (ff-read-function))
+  (interactive (find-function-read-function))
   (let ((buffer-point (find-function-noselect function path)))
     (if buffer-point
 	(progn

