changed:
authorClaus Gittinger <cg@exept.de>
Mon, 05 Sep 2011 05:26:13 +0200
changeset 10661 367196dfc3f9
parent 10660 4b97f38f9a0f
child 10662 4d67f850e4f7
changed: #keyPress:x:y:in: #update:with:from: do not highlight when modified (info is wrong, anyway)
Tools__CodeNavigationService.st
--- a/Tools__CodeNavigationService.st	Mon Sep 05 05:21:30 2011 +0200
+++ b/Tools__CodeNavigationService.st	Mon Sep 05 05:26:13 2011 +0200
@@ -107,11 +107,18 @@
 !CodeNavigationService methodsFor:'change & update'!
 
 update: aspect with: param from: sender
-    sender == textView modifiedChannel ifTrue:[self breakPoint: #cg].
+    sender == textView modifiedChannel ifTrue:[
+        codeView reallyModified ifTrue:[
+            "/ no longer highlight - the info is wrong anyway !!
+            self highlightClear.
+        ].
+    ].
+
     "JV: I changed 'halt' to 'breakPoint: #cg'"
 
     "Created: / 22-08-2011 / 16:22:19 / cg"
     "Modified: / 25-08-2011 / 15:10:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 05-09-2011 / 05:15:42 / cg"
 ! !
 
 !CodeNavigationService methodsFor:'code services'!
@@ -245,7 +252,8 @@
             view sensor pushUserEvent:#highlightElementAtX:y: for:self withArguments:{p x. p y.}.
             ^ true.
         ].
-        textView modified ifTrue:[
+
+        codeView reallyModified "textView modified" ifTrue:[
             self highlightClear. 
             codeView syntaxElements: nil.
             ^ false
@@ -256,7 +264,7 @@
 
     "Created: / 06-03-2010 / 20:50:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 20-07-2011 / 18:49:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-08-2011 / 16:30:29 / cg"
+    "Modified: / 05-09-2011 / 05:17:30 / cg"
 !
 
 keyRelease: key x:x y:y in: view
@@ -552,7 +560,7 @@
 !CodeNavigationService class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.12 2011-08-25 14:11:08 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeNavigationService.st,v 1.13 2011-09-05 03:26:13 cg Exp $'
 !
 
 version_SVN