--- a/Tools__NewSystemBrowser.st	Mon Feb 13 00:50:18 2012 +0100
+++ b/Tools__NewSystemBrowser.st	Mon Feb 13 14:09:39 2012 +0100
@@ -16004,7 +16004,6 @@
     "Modified: / 29-09-2006 / 16:11:08 / cg"
 ! !
 
-
 !NewSystemBrowser class methodsFor:'menu specs-popup'!
 
 categoryPopUpMenu
@@ -34930,7 +34929,6 @@
     ^ brwsr
 ! !
 
-
 !NewSystemBrowser methodsFor:'menu actions-namespace'!
 
 nameSpaceMenuCheckOut
@@ -40504,9 +40502,19 @@
 
         rslt := self performRefactoring:refactoring.
         self switchToSelector:newSelector asSymbol.
-    ]
-
-    "Modified: / 09-02-2011 / 13:54:20 / cg"
+    ].
+
+    dialog browseOldSendersHolder value ifTrue:[
+        self spawnMethodSendersBrowserFor:(Array with:oldSelector) in:#newBrowser
+    ].
+    dialog browseNewSendersHolder value ifTrue:[
+        self spawnMethodSendersBrowserFor:(Array with:newSelector) in:#newBrowser
+    ].
+    dialog browseChangedMethodsHolder value ifTrue:[
+        self spawnMethodImplementorsBrowserFor:(Array with:newSelector) match:false in:#newBrowser
+    ].
+
+    "Modified: / 13-02-2012 / 13:16:15 / cg"
 !
 
 selectVariableForMoveMethod
@@ -43072,7 +43080,9 @@
 
         cachedList := searchBlock value.
         (cachedList size == 1 and:[cachedList first == self theSingleSelectedMethod]) ifTrue:[
-            (Dialog confirm:label,' - ',(resources stringWithCRs:'only the selected method found.\\Browse anyway ?'))
+            (Dialog 
+                confirm:label,' - ',(resources stringWithCRs:'only the selected method found.\\Browse anyway ?')
+                initialAnswer:false)
             ifFalse:[
                 ^ self
             ]
@@ -43090,7 +43100,7 @@
     ]
 
     "Created: / 05-09-2006 / 11:07:05 / cg"
-    "Modified: / 13-09-2006 / 11:39:42 / cg"
+    "Modified: / 13-02-2012 / 13:15:40 / cg"
 !
 
 spawnMethodInheritanceBrowserFor:aSelectorCollection in:openHow
@@ -43205,7 +43215,7 @@
         classes:Smalltalk allClasses
         label:'Senders'
 
-    "Modified: / 05-09-2006 / 10:42:46 / cg"
+    "Modified: / 13-02-2012 / 13:17:20 / cg"
 !
 
 spawnMethodSendersBrowserFor:aSelectorCollection in:openHow classes:setOfClasses label:labelPrefix
@@ -55747,11 +55757,11 @@
 !NewSystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1706 2012-02-12 23:50:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1707 2012-02-13 13:09:39 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1706 2012-02-12 23:50:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NewSystemBrowser.st,v 1.1707 2012-02-13 13:09:39 cg Exp $'
 !
 
 version_SVN