--- a/TestCase.st	Sun Aug 21 18:05:29 2011 +0200
+++ b/TestCase.st	Wed Nov 02 15:44:29 2011 +0100
@@ -26,7 +26,13 @@
 !
 
 postAutoload
-    self projectDefinitionClass loadExtensions
+    |pd|
+
+    (pd := self projectDefinitionClass) notNil ifTrue:[
+        pd loadExtensions
+    ]
+
+    "Modified: / 02-11-2011 / 15:44:58 / sr"
 ! !
 
 !TestCase class methodsFor:'instance creation'!
@@ -798,11 +804,11 @@
 !TestCase class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.82 2011-08-21 16:05:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.83 2011-11-02 14:44:29 sr Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.82 2011-08-21 16:05:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/sunit/TestCase.st,v 1.83 2011-11-02 14:44:29 sr Exp $'
 !
 
 version_SVN