find-library-name, used by org-reload, missing on XEmacs

[Tony E. Bennett <tony.e.bennett@gmail.com>]

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