--- a/AbstractLauncherApplication.st	Mon Sep 03 16:44:03 2001 +0200
+++ b/AbstractLauncherApplication.st	Mon Sep 03 16:44:27 2001 +0200
@@ -758,7 +758,7 @@
     UserPreferences current systemBrowserClass askThenBrowseClass
 !
 
-startClassBrowserOnChanges
+startClassBrowserOnChangedClasses
     "open a classBrowser on the changeSet"
 
     NewSystemBrowser isNil ifTrue:[
@@ -767,6 +767,21 @@
     NewSystemBrowser openOnClassesInChangeSet
 !
 
+startClassBrowserOnChangedMethods
+    "open a classBrowser on the changeSet"
+
+    NewSystemBrowser isNil ifTrue:[
+        ^ self warn:'This needs the NewSystemBrowser to be loaded.'
+    ].
+    NewSystemBrowser openOnMethodsInChangeSet
+!
+
+startClassBrowserOnChanges
+    "open a classBrowser on the changeSet"
+
+    ^ self startClassBrowserOnChangedClasses
+!
+
 startClassHierarchyBrowser
     "open a classHierarchyBrowser; asks for class"
 
@@ -6463,5 +6478,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.154 2001-08-17 12:35:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.155 2001-09-03 14:44:27 cg Exp $'
 ! !