Tools__NewSystemBrowser.st
changeset 11931 5f87473e36cb
parent 11930 feee6d0a781e
child 11932 5e718e5a55b2
--- a/Tools__NewSystemBrowser.st	Wed Oct 24 16:21:26 2012 +0200
+++ b/Tools__NewSystemBrowser.st	Wed Oct 24 17:06:47 2012 +0200
@@ -55821,6 +55821,7 @@
             "/ used to be
             "/    oldSelector := self theSingleSelectedSelector.
             "/ here; however, with Ruby, a funny selector (fact) instead of fact: is returned...
+            wasInstrumented := false.
 
             oldMethod := self theSingleSelectedMethod.
             oldMethod notNil ifTrue:[
@@ -56011,7 +56012,7 @@
                                     compile:code
                                     forClass:cls
                                     inCategory:cat
-                                    notifying:codeView
+                                    notifying:nil
                                     install:true.
                             ].
 ].
@@ -57627,11 +57628,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1803 2012-10-24 14:21:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1804 2012-10-24 15:06:47 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1803 2012-10-24 14:21:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1804 2012-10-24 15:06:47 cg Exp $'
 !
 
 version_SVN