From mboxrd@z Thu Jan  1 00:00:00 1970
From: Tony E. Bennett <tony.e.bennett@gmail.com>
Subject: find-library-name, used by org-reload, missing on XEmacs
Date: Tue, 31 Mar 2009 14:38:47 -0400
Message-ID: <m2vdppzgeg.fsf@gmail.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Return-path: <emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org>
Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43)
	id 1Loire-0005ir-Lp
	for emacs-orgmode@gnu.org; Tue, 31 Mar 2009 14:39:10 -0400
Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43)
	id 1LoirZ-0005ia-4a
	for emacs-orgmode@gnu.org; Tue, 31 Mar 2009 14:39:09 -0400
Received: from [199.232.76.173] (port=56158 helo=monty-python.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43) id 1LoirZ-0005iX-1Q
	for emacs-orgmode@gnu.org; Tue, 31 Mar 2009 14:39:05 -0400
Received: from main.gmane.org ([80.91.229.2]:45328 helo=ciao.gmane.org)
	by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32)
	(Exim 4.60) (envelope-from <geo-emacs-orgmode@m.gmane.org>)
	id 1LoirY-0000LB-Iw
	for emacs-orgmode@gnu.org; Tue, 31 Mar 2009 14:39:04 -0400
Received: from list by ciao.gmane.org with local (Exim 4.43)
	id 1LoirW-00076i-GG
	for emacs-orgmode@gnu.org; Tue, 31 Mar 2009 18:39:02 +0000
Received: from searspoint.nvidia.com ([216.228.112.21])
	by main.gmane.org with esmtp (Gmexim 0.1 (Debian))
	id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Tue, 31 Mar 2009 18:39:02 +0000
Received: from tony.e.bennett by searspoint.nvidia.com with local (Gmexim 0.1
	(Debian)) id 1AlnuQ-0007hv-00
	for <emacs-orgmode@gnu.org>; Tue, 31 Mar 2009 18:39:02 +0000
List-Id: "General discussions about Org-mode." <emacs-orgmode.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/emacs-orgmode>
List-Post: <mailto:emacs-orgmode@gnu.org>
List-Help: <mailto:emacs-orgmode-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/emacs-orgmode>,
	<mailto:emacs-orgmode-request@gnu.org?subject=subscribe>
Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org
To: emacs-orgmode@gnu.org


Hi

org-reload needs 'find-library-name', which is missing on XEmacs v21.5
at least.   However there is 'find-library' which can be coerced into
providing the filename:

  ;; hack - XEmacs does not have find-library-name, needed by org-reload.
  (when (not (fboundp 'find-library-name))
    (require 'find-func)
    ;; still not found?   then create it if find-library exists, as it does on xemacs
    (when (and (not (fboundp 'find-library-name))
               (fboundp 'find-library))
      (defun find-library-name-helper (filename ignored-codesys)
        filename)
      (defun find-library-name (library)
        (find-library library nil 'find-library-name-helper))
      ))


thanks

--tony