--- a/CustomMock.st Sat Jan 24 19:37:13 2015 +0100
+++ b/CustomMock.st Sat Jan 24 19:40:40 2015 +0100
@@ -76,7 +76,7 @@
classVariableNames:''MockedSelectors MockedClassSelectors''
poolDictionaries:''''
category:''Interface-Refactoring-Custom-Mocks'''.
- Transcript showCR:'DDDX: ',definition.
+
(InteractiveAddClassChange definition: definition) execute.
mockClass := Smalltalk classNamed: mockClassName.
@@ -89,7 +89,7 @@
^ mockClass
"Created: / 15-06-2014 / 19:15:52 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
- "Modified: / 24-01-2015 / 19:32:38 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+ "Modified: / 24-01-2015 / 19:40:02 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
!
createMockGetters: aMockClass forSelectors: aSelectors