--- a/CustomTestCaseCodeGenerator.st	Thu Oct 16 21:31:15 2014 +0200
+++ b/CustomTestCaseCodeGenerator.st	Thu Oct 16 22:39:56 2014 +0200
@@ -167,14 +167,15 @@
     generateTearDown := self defaultGenerateTearDown.
     
     "/ Now open the dialog...
-    
-    classes isEmptyOrNil ifTrue:[
+
+    classes size <= 1 ifTrue: [
         dialog 
             addClassNameEntryOn:((AspectAdaptor forAspect:#testClassName) 
                     subject:self)
             labeled:'Class'
             validateBy:nil.
     ].
+
     dialog 
         addClassNameEntryOn:((AspectAdaptor forAspect:#testSuperName) 
                 subject:self)
@@ -197,7 +198,7 @@
 
     "Created: / 16-09-2014 / 09:39:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 16-09-2014 / 11:27:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 14-10-2014 / 10:55:30 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
+    "Modified: / 16-10-2014 / 22:36:29 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
 !
 
 generateTestCaseCodeFor:testCase forClassUnderTest:anObject