--- a/DebugView.st	Thu Jul 24 11:33:57 2014 +0200
+++ b/DebugView.st	Thu Jul 24 20:24:04 2014 +0200
@@ -8235,6 +8235,9 @@
         inspecting ifFalse:[
             (newMethod notNil and:[newMethod ~~ #Error]) ifTrue:[
                 codeView modified:false.
+                codeView isCodeView2 ifTrue:[ 
+                    codeView methodHolder value: newMethod.
+                ].
 
                 doUnwind ifTrue:[
                     "/ if it worked, and doUnwind is true,
@@ -8259,7 +8262,7 @@
 
     "Created: / 17-11-2001 / 21:50:55 / cg"
     "Modified: / 29-08-2006 / 14:22:22 / cg"
-    "Modified: / 08-05-2014 / 14:39:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 24-07-2014 / 19:20:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 codeAccept:someCode unwind:doUnwind category:givenCategoryOrNil onCancel:cancelAction
@@ -9358,15 +9361,15 @@
 !DebugView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.662 2014-07-17 13:28:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.663 2014-07-24 18:24:04 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.662 2014-07-17 13:28:06 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DebugView.st,v 1.663 2014-07-24 18:24:04 vrany Exp $'
 !
 
 version_SVN
-    ^ '$Id: DebugView.st,v 1.662 2014-07-17 13:28:06 cg Exp $'
+    ^ '$Id: DebugView.st,v 1.663 2014-07-24 18:24:04 vrany Exp $'
 ! !