Hi,
this patch causes jde-parse-class-name to use semantic, instead of
thing-at-point from emacs, to get class name at point.
thing-at-point returns "X," as class name from "implements X, Y", whereas
semantic will return correctly X.
Regards,
Przemek
Index: lisp/jde-parse.el
===================================================================
--- lisp/jde-parse.el (revision 229)
+++ lisp/jde-parse.el (working copy)
@@ -1746,12 +1746,7 @@
;;nil
(list fq pkg classname))))))
(if (eq classname 'point)
- ;; TODO: a fully qualified class name looks like a file name
- ;; (i.e. [a-zA-Z.]) but this need to be refined to use the Sun Java
- ;; standards of class name parsing
- (or (parse-at-point (thing-at-point 'filename))
- (parse-at-point (thing-at-point 'word))
- (parse-at-point (thing-at-point 'symbol)))
+ (parse-at-point (mapconcat 'identity (semantic-ctxt-current-thing) "."))
(parse-at-point classname))))
(provide 'jde-parse)
------------------------------------------------------------------------------
_______________________________________________
jdee-devel mailing list
jdee-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/jdee-devel
