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

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)

patch to jde.el:
:lisp>diff jde.el.~1~ jde.el
527c527
< (defcustom jde-lib-directory-names (list "^lib" "^jar")
---
> (defcustom jde-lib-directory-names (list "/lib$" "/jar$")
1519,1523c1519,1522
<      (let ((dir-name (file-name-nondirectory path)))
<        (member-if 
<         (lambda (lib-name)
<    (string-match lib-name dir-name))
<         jde-lib-directory-names)))
---
>      ;; (2008-08-26: examine whole path name)
>      (member-if 
>         (lambda (lib-name) (string-match lib-name path))
>         jde-lib-directory-names)

------------------------------------------------------------------------------
Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day 
trial. Simplify your report design, integration and deployment - and focus on 
what you do best, core application coding. Discover what's new with 
Crystal Reports now.  http://p.sf.net/sfu/bobj-july

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