class: Tools::CodeView2
authorClaus Gittinger <cg@exept.de>
Fri, 21 Jun 2013 01:21:53 +0200
changeset 12950 990f530e57c5
parent 12949 320a22d3c70b
child 12951 21a2436fefb2
class: Tools::CodeView2 added: #updateGutter comment/format in: #update:with:from: changed: #editedMethodOrClass: fixed codeview updates for Jan's line breakpoints.
Tools__CodeView2.st
--- a/Tools__CodeView2.st	Fri Jun 21 01:21:35 2013 +0200
+++ b/Tools__CodeView2.st	Fri Jun 21 01:21:53 2013 +0200
@@ -558,7 +558,10 @@
 !
 
 editedMethodOrClass:aMethodOrClass
-    textView editedMethodOrClass:aMethodOrClass
+    textView editedMethodOrClass:aMethodOrClass.
+    aMethodOrClass isBehavior ifFalse:[
+        self methodHolder value:aMethodOrClass
+    ].
 !
 
 font
@@ -907,6 +910,9 @@
 !CodeView2 methodsFor:'change & update'!
 
 update:aspect with:param from:sender
+"/    sender == methodHolder ifTrue:[
+"/        self updateGutter.
+"/    ].
 
     sender == showGutterChannel ifTrue: [
         self updateGutterVisibility.
@@ -926,6 +932,15 @@
     "Modified: / 06-10-2011 / 14:14:36 / cg"
 !
 
+updateGutter
+
+    self showGutterChannel value ifTrue:[        
+        gutterView invalidate.
+    ]
+
+    "Created: / 23-06-2010 / 19:05:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 updateGutterVisibility
 
     self showGutterChannel value ifTrue:[        
@@ -3477,15 +3492,15 @@
 !CodeView2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.80 2013-06-14 14:34:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.81 2013-06-20 23:21:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.80 2013-06-14 14:34:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.81 2013-06-20 23:21:53 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeView2.st,v 1.80 2013-06-14 14:34:58 cg Exp $'
+    ^ '$Id: Tools__CodeView2.st,v 1.81 2013-06-20 23:21:53 cg Exp $'
 ! !