ProjectDefinition.st
changeset 10405 1e4e2f0908e5
parent 10404 61112e05feb7
child 10412 fa1eff38ab64
--- a/ProjectDefinition.st	Wed Feb 21 11:11:25 2007 +0100
+++ b/ProjectDefinition.st	Thu Feb 22 16:03:46 2007 +0100
@@ -677,9 +677,11 @@
 
             (ignored includes:className) ifFalse:[
                 cls := Smalltalk classNamed:className.
-                (cls notNil and:[cls isLoaded not]) ifTrue:[
-                    (newEntry includes:#autoload) ifFalse:[
-                        newEntry := newEntry copyWith:#autoload.
+                ignoreOldDefinition ifTrue:[
+                    (cls notNil and:[cls isLoaded not]) ifTrue:[
+                        (newEntry includes:#autoload) ifFalse:[
+                            newEntry := newEntry copyWith:#autoload.
+                        ].
                     ].
                 ].
                 newSpec add:newEntry.
@@ -739,7 +741,7 @@
 
     "Modified: / 08-08-2006 / 19:24:34 / fm"
     "Created: / 10-10-2006 / 22:00:50 / cg"
-    "Modified: / 19-02-2007 / 16:25:08 / cg"
+    "Modified: / 22-02-2007 / 15:06:37 / cg"
 !
 
 companyName_code
@@ -3716,7 +3718,7 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.148 2007-02-21 10:11:25 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.149 2007-02-22 15:03:46 cg Exp $'
 ! !
 
 ProjectDefinition initialize!