ProjectChecker.st
branchjv
changeset 3092 432aa120d8d2
parent 3091 afe091fa9820
child 3094 4ec645987e2d
--- a/ProjectChecker.st	Wed Oct 31 17:29:51 2012 +0000
+++ b/ProjectChecker.st	Wed Oct 31 17:40:51 2012 +0000
@@ -93,12 +93,6 @@
     "Created: / 11-01-2012 / 16:46:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!ProjectChecker class methodsFor:'others'!
-
-version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.8 2012/09/18 00:10:30 vrany Exp §'
-! !
-
 !ProjectChecker methodsFor:'accessing'!
 
 classes: aCollection
@@ -171,8 +165,8 @@
     classesInImage := Smalltalk allClasses select:[:cls | (cls package = self package) and:[cls isPrivate not]].
     "/ classesInDescription := self classes asIdentitySet.
     classesInDescription := OrderedCollection new.
-    ((packageDef compiled_classNamesForPlatform:(OperatingSystem platformName))
-    , (packageDef compiled_classNames_common)
+    ( (packageDef compiled_classNames_common)
+    , (packageDef compiled_classNamesForPlatform:(OperatingSystem platformName))
     , (packageDef autoloaded_classNames)) do:[:nm |
         |cls|
 
@@ -255,7 +249,7 @@
     ].
 
     "Created: / 11-01-2012 / 17:14:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 26-10-2012 / 12:59:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 31-10-2012 / 17:40:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 checkClassesForMethodsInNoProject:classesToCheck 
@@ -565,9 +559,13 @@
 !ProjectChecker class methodsFor:'documentation'!
 
 version
-    ^ '$Id: ProjectChecker.st 1976 2012-10-31 17:29:51Z vranyj1 $'
+    ^ '$Id: ProjectChecker.st 1977 2012-10-31 17:40:51Z vranyj1 $'
+!
+
+version_CVS
+    ^ '§Header: /cvs/stx/stx/libbasic3/ProjectChecker.st,v 1.11 2012-10-31 17:42:25 +0000 vrany Exp §'
 !
 
 version_SVN
-    ^ '$Id: ProjectChecker.st 1976 2012-10-31 17:29:51Z vranyj1 $'
+    ^ '$Id: ProjectChecker.st 1977 2012-10-31 17:40:51Z vranyj1 $'
 ! !