--- a/DebugView.st	Mon Aug 22 11:03:47 2011 +0200
+++ b/DebugView.st	Mon Aug 22 13:52:48 2011 +0200
@@ -6905,9 +6905,9 @@
                         ].
                     ].
                 ].
-
                 codeView isCodeView2 ifTrue:[
-                    codeView model value: code.
+                    codeView model setValue: code.
+                    codeView model changed.
                     codeView methodHolder value: method.
                     codeView classHolder value: rec class.
                 ] ifFalse:[
@@ -7037,7 +7037,7 @@
 
     "Created: / 14-08-1997 / 20:15:00 / cg"
     "Modified: / 27-07-2011 / 13:17:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 20-08-2011 / 22:13:59 / cg"
+    "Modified: / 22-08-2011 / 13:49:39 / cg"
 ! !
 
 !DebugView::IgnoredHalt methodsFor:'accessing'!
@@ -7196,7 +7196,7 @@
 !DebugView class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.522 2011-08-20 20:18:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.523 2011-08-22 11:52:48 cg Exp $'
 !
 
 version_SVN