--- a/ProjectDefinition.st Tue Nov 20 23:15:42 2012 +0000
+++ b/ProjectDefinition.st Thu Nov 22 23:17:46 2012 +0000
@@ -945,6 +945,7 @@
"Created: / 14-09-2006 / 14:59:53 / cg"
! !
+
!ProjectDefinition class methodsFor:'accessing - packaging'!
classNames:aCollectionOfClassNames
@@ -2436,11 +2437,11 @@
nr := (self cvsRevision last upTo:$m) select:[:c|c isDigit].
nr isEmptyOrNil ifTrue:[nr := '0'].
- ^nr
+ ^nr copyTo: 6 "/ Long number are not supported by BCC"
"Created: / 18-08-2006 / 12:02:58 / cg"
"Modified: / 30-08-2006 / 18:54:48 / cg"
- "Modified: / 20-11-2012 / 22:52:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-11-2012 / 23:16:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
fileRevisionNr
@@ -2461,7 +2462,7 @@
nr := self cvsRevision first select:[:c|c isDigit].
nr isEmptyOrNil ifTrue:[nr := '0'].
- ^nr
+ ^nr copyTo: 6 "/ Long number are not supported by BCC"
"
stx_libbasic fileRevisionNr
@@ -2471,7 +2472,7 @@
"Created: / 18-08-2006 / 12:02:39 / cg"
"Modified: / 30-08-2006 / 18:54:39 / cg"
- "Modified: / 20-11-2012 / 22:52:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-11-2012 / 23:16:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
fileVersion
@@ -6876,7 +6877,7 @@
!ProjectDefinition class methodsFor:'documentation'!
version
- ^ '$Id: ProjectDefinition.st 10866 2012-11-20 23:15:42Z vranyj1 $'
+ ^ '$Id: ProjectDefinition.st 10867 2012-11-22 23:17:46Z vranyj1 $'
!
version_CVS
@@ -6884,7 +6885,7 @@
!
version_SVN
- ^ '$Id:: ProjectDefinition.st 10866 2012-11-20 23:15:42Z vranyj1 $'
+ ^ '$Id:: ProjectDefinition.st 10867 2012-11-22 23:17:46Z vranyj1 $'
! !
ProjectDefinition initialize!