#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Sun, 17 Apr 2016 14:52:04 +0200
changeset 16294 767ba26a5661
parent 16292 361ba1e243d2
child 16295 2891112a6454
#UI_ENHANCEMENT by cg class: Tools::CodeNavigationService changed: #elementAtCursor fix: be consistent with click (first character also counts as element under cursor)
Tools__CodeNavigationService.st
--- a/Tools__CodeNavigationService.st	Thu Apr 14 16:33:16 2016 +0200
+++ b/Tools__CodeNavigationService.st	Sun Apr 17 14:52:04 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2010 by Jan Vrany, SWING Research Group. CTU in Prague
               All Rights Reserved
@@ -583,7 +581,7 @@
 !
 
 elementAtCursor
-    ^self elementAtLine: textView cursorLine col: textView cursorCol - 1
+    ^self elementAtLine: textView cursorLine col: textView cursorCol "- 1"
 
     "Created: / 25-06-2010 / 14:39:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -871,14 +869,14 @@
 !CodeNavigationService class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.51 2015-02-28 02:02:08 cg Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.51 2015-02-28 02:02:08 cg Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeNavigationService.st,v 1.51 2015-02-28 02:02:08 cg Exp $'
+    ^ '$Id$'
 ! !