jde-find-jde-data-directory

Hi,

I'm triply interested in JDEE.  I'm an XEmacs developer, a Java
programmer, and maintainer of the XEmacs packages in Fedora.  I've
been looking at the current state of JDEE in the XEmacs package tree,
where we currently have version 2.3.5.1.  We have patched the code in
a few places, and I'd like to reconcile what we've done with ongoing
JDEE development.

So here's one difference.  In jde-util.el, the function
jde-find-jde-data-directory is defined (minus the docstring) as:

(defun jde-find-jde-data-directory ()
  (let ((directory-sep-char ?/))
    (if (featurep 'xemacs)
        (let ((dir (locate-data-directory "jde")))
          (if dir dir (jde-root))))
    (jde-root)))

We have patched that to read:

(defun jde-find-jde-data-directory ()
  (let ((directory-sep-char ?/))
    (if (featurep 'xemacs)
        (let ((dir (locate-data-directory "jde")))
          (if dir dir (jde-root)))
      (jde-root)))

The difference is that, in the 2.3.5.1 version, the result of (if
(featurep 'xemacs) ...) is discarded, and the result of (jde-root) is
returned unconditionally.  Our patched version returns the results of
(locate-data-directory), if it is non-nil.  The first definition is
present in the 2.4.0 subversion branch.

Regards,
-- 
Jerry James
http://www.jamezone.org/

------------------------------------------------------------------------------
Come build with us! The BlackBerry(R) Developer Conference in SF, CA
is the only developer event you need to attend this year. Jumpstart your
developing skills, take BlackBerry mobile applications to market and stay 
ahead of the curve. Join us from November 9 - 12, 2009. Register now!
http://p.sf.net/sfu/devconference