Re: Allow more context in recognizing jde-lib-directory-names (again)

This seems to have been lost from a few months ago.

I think this patch to jde-expand-classpath makes good sense:
a) it means things named: ".../jarx" or ".../lib2" are not seen as *.jar repositories
    (for backward compatibility, you could use: (list "/lib[^/]*$" "/jar[^/]*$") )
b) it means one can say: "/lib/ext$" *is* a jar repository
as in: '(jde-lib-directory-names '("/lib$" "/jar$" "/lib/ext$"))
which I need and could find no way to express, without including other foo/ext directories...
(and writing a jde-excluded-file-names to remove the extraneous files seems wrong;
 I expect the excluded list to operate on the 'tail' of the filename, not on the upper directories)

Now with svn diff:
Index: lisp/jde.el
===================================================================
--- lisp/jde.el (revision 183)
+++ lisp/jde.el (working copy)
@@ -523,7 +523,7 @@
   :type 'boolean)
 
 ;; (makunbound 'jde-lib-directory-names)
-(defcustom jde-lib-directory-names (list "^lib" "^jar")
+(defcustom jde-lib-directory-names (list "/lib$" "/jar$")
   "Regular expressions that matches names of jar/zip directories for
 the current project. See `jde-expand-classpath-p' and
 `jde-expand-classpath' for more information"
@@ -1533,11 +1533,10 @@
        (if (and
      (file-exists-p path)
      (file-directory-p path)
-     (let ((dir-name (file-name-nondirectory path)))
-       (member-if
-        (lambda (lib-name)
-   (string-match lib-name dir-name))
-        jde-lib-directory-names)))
+     ;; (2009-08-26: examine whole path name)
+     (member-if 
+      (lambda (lib-name) (string-match lib-name path))
+      jde-lib-directory-names))
     (progn
       (setq paths
      (append

  ----- Original Message ----- 
  From: Jeff Peck 
  To: [email protected] 
  Sent: Wednesday, August 26, 2009 1:43 PM
  Subject: Allow more context in recognizing jde-lib-directory-names (again)

------------------------------------------------------------------------------
This SF.Net email is sponsored by the Verizon Developer Community
Take advantage of Verizon's best-in-class app development support
A streamlined, 14 day to market process makes app distribution fast and easy
Join now and get one step closer to millions of Verizon customers
http://p.sf.net/sfu/verizon-dev2dev

_______________________________________________
jdee-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/jdee-devel