From: Jan P. <jp...@us...> - 2009-03-22 12:06:46
|
Update of /cvsroot/e-p-i-c/org.epic.perleditor/src/org/epic/perleditor/editors/perl In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv8324/src/org/epic/perleditor/editors/perl Modified Files: PerlDoubleClickSelector.java Log Message: Fixed bug [ 2617016 ] Editor fails highlight. double-click. Index: PerlDoubleClickSelector.java =================================================================== RCS file: /cvsroot/e-p-i-c/org.epic.perleditor/src/org/epic/perleditor/editors/perl/PerlDoubleClickSelector.java,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- PerlDoubleClickSelector.java 23 Dec 2005 23:30:28 -0000 1.3 +++ PerlDoubleClickSelector.java 22 Mar 2009 12:06:37 -0000 1.4 @@ -125,13 +125,17 @@ { int pos = fPos; char c; + boolean varPrefix = false; while (pos >= 0) { c = doc.getChar(pos); - if (!Character.isJavaIdentifierPart(c) && (c != '@') - && (c != '%')) - break; + if (!varPrefix) + { + if (c == '@' || c == '%' || c == '$') varPrefix = true; + else if (!Character.isJavaIdentifierPart(c)) break; + } + else if (c != '@' && c != '%' && c != '$') break; --pos; } |