LibraryDefinition.st
changeset 9616 7bd19460f53f
parent 9613 b61c0a447008
child 9617 edf60cb58ef7
--- a/LibraryDefinition.st	Mon Aug 21 19:11:23 2006 +0200
+++ b/LibraryDefinition.st	Mon Aug 21 19:11:34 2006 +0200
@@ -13,10 +13,10 @@
 "{ Package: 'stx:libbasic3' }"
 
 ProjectDefinition subclass:#LibraryDefinition
-        instanceVariableNames:''
-        classVariableNames:''
-        poolDictionaries:''
-        category:'System-Support-Projects'
+	instanceVariableNames:''
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Support-Projects'
 !
 
 !LibraryDefinition class methodsFor:'documentation'!
@@ -638,7 +638,8 @@
                 s nextPutLine: newClassLine 
             ].
 
-        self compiled_classNames do:putLineForClassName.
+        self common_compiled_classNames do:putLineForClassName.
+
         #(
                 ('UNIX'  #unix)
                 ('WIN32' #win32)
@@ -664,7 +665,7 @@
 
     "Created: / 09-08-2006 / 11:21:48 / fm"
     "Modified: / 16-08-2006 / 18:52:10 / User"
-    "Modified: / 18-08-2006 / 13:41:37 / cg"
+    "Modified: / 21-08-2006 / 18:47:21 / cg"
 !
 
 generateExtensionLine_libInit_dot_cc
@@ -886,7 +887,7 @@
         self searchForClasses do:[:eachClass |
             |attributes specEntry|
 
-            eachClass isPrivate ifFalse:[
+            (eachClass isLoaded not or:[eachClass isPrivate not]) ifTrue:[
                 specEntry := self classNamesAndAttributes detect:[:entry | entry first = eachClass name] ifNone:nil.
                 specEntry notNil ifTrue:[
                     attributes := specEntry copyFrom:2.
@@ -913,6 +914,7 @@
 
     "Modified: / 08-08-2006 / 19:24:34 / fm"
     "Created: / 17-08-2006 / 21:03:07 / cg"
+    "Modified: / 21-08-2006 / 18:41:25 / cg"
 !
 
 extensionMethodNames_code
@@ -952,5 +954,5 @@
 !LibraryDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LibraryDefinition.st,v 1.35 2006-08-21 14:41:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LibraryDefinition.st,v 1.36 2006-08-21 17:11:34 cg Exp $'
 ! !