--- a/CustomNewSystemBrowserTests.st	Sat Jan 24 19:40:40 2015 +0100
+++ b/CustomNewSystemBrowserTests.st	Sat Jan 24 20:10:46 2015 +0100
@@ -7,6 +7,7 @@
 	category:'Interface-Refactoring-Custom-UI-Tests'
 !
 
+
 !CustomNewSystemBrowserTests methodsFor:'initialization & release'!
 
 setUp
@@ -27,7 +28,7 @@
         compileMockMethod: 'switchToClass: aClass
             self objectAttributeAt: #switchToClass put: aClass';
         compileMockMethod: 'selectProtocol: aProtocol
-            self objectAttributeAt: #switchToClass put: aProtocol';
+            self objectAttributeAt: #selectProtocol put: aProtocol';
         compileMockMethod: 'customMenuBuilder
             | builder |
 
@@ -45,7 +46,7 @@
     generatorClassMock := mock mockClassOf: Object.
     mock createMockGetters: generatorClassMock forSelectors: {'label'. 'group'}.
 
-    "Modified: / 29-12-2014 / 09:06:03 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 24-01-2015 / 20:08:29 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
 
 tearDown
@@ -145,12 +146,13 @@
     browser theSingleSelectedClass: RBMethod.
     browser classMenuExtensionNavigateToTestCase: menu.
     menu lastItem itemValue value. "Call menu item action block"
-    actualClass := browser switchToClass.
+    actualClass := browser switchToClass.   
 
     self assert: expectedClass = actualClass.
     self assert: (browser selectProtocol) == #tests
 
     "Created: / 26-12-2014 / 18:58:56 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 24-01-2015 / 19:53:29 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
 
 test_class_menu_extension_navigate_to_test_case_found
@@ -286,3 +288,10 @@
     "Created: / 29-12-2014 / 09:31:16 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 ! !
 
+!CustomNewSystemBrowserTests class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+