Bugfix: do not fileout extensionVersion_XXX when filing out Java extensions.
authorJan Vrany <jan.vrany@fit.cvut.cz>
Sun, 16 Dec 2012 13:21:39 +0100
changeset 168 b7cdb276d892
parent 167 73ede479a28f
child 169 3e156584235f
Bugfix: do not fileout extensionVersion_XXX when filing out Java extensions.
common/SCMAbstractPackageModel.st
common/common.rc
--- a/common/SCMAbstractPackageModel.st	Sun Dec 16 13:02:32 2012 +0100
+++ b/common/SCMAbstractPackageModel.st	Sun Dec 16 13:21:39 2012 +0100
@@ -468,7 +468,7 @@
     extensionMethods do:[:each|each makeLocalStringSource].
 
     "Special hack for Smalltalk - use SourceCodeManager routine"
-    (language isSmalltalk and:[extensionMethods anyOne mclass isJavaClass not]) ifTrue:[
+    (language isSmalltalk and:[extensionMethods allSatisfy:[:m|m mclass theNonMetaclass isJavaClass not]]) ifTrue:[
         self manager fileOutSourceCodeExtensions: extensionMethods package: self name on: stream.
         ^self.
     ].
@@ -481,7 +481,7 @@
 
     "Modified: / 15-06-2009 / 11:55:26 / Jan Vrany <vranyj1@fel.cvut.cz>"
     "Created: / 30-12-2009 / 19:01:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 14-11-2012 / 01:01:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 16-12-2012 / 13:08:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !SCMAbstractPackageModel methodsFor:'initialization'!
--- a/common/common.rc	Sun Dec 16 13:02:32 2012 +0100
+++ b/common/common.rc	Sun Dec 16 13:21:39 2012 +0100
@@ -3,7 +3,7 @@
 // automagically generated from the projectDefinition: stx_libscm_common.
 //
 VS_VERSION_INFO VERSIONINFO
-  FILEVERSION     6,2,32767,32767
+  FILEVERSION     6,2,709,709
   PRODUCTVERSION  6,2,3,0
 #if (__BORLANDC__)
   FILEFLAGSMASK   VS_FF_DEBUG | VS_FF_PRERELEASE
@@ -20,12 +20,12 @@
     BEGIN
       VALUE "CompanyName", "Jan Vrany\0"
       VALUE "FileDescription", "Source Code Management Support Library for Smalltalk/X (LIB)\0"
-      VALUE "FileVersion", "6.2.32767.32767\0"
+      VALUE "FileVersion", "6.2.709.709\0"
       VALUE "InternalName", "stx:libscm/common\0"
       VALUE "LegalCopyright", "Copyright Jan Vrany 2012\0"
       VALUE "ProductName", "Smalltalk/X SCM Support Library\0"
       VALUE "ProductVersion", "6.2.3.0\0"
-      VALUE "ProductDate", "Sat, 15 Dec 2012 16:59:50 GMT\0"
+      VALUE "ProductDate", "Sun, 16 Dec 2012 12:18:10 GMT\0"
     END
 
   END