Tobias Pape uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-topa.321.mcz==================== Summary ====================
Name: EToys-topa.321
Author: topa
Time: 7 March 2018, 10:53:58.251975 pm
UUID: bacbe828-aeb2-45bf-976b-82e85e8f5872
Ancestors: EToys-dtl.320
Format changed on Cog
=============== Diff against EToys-dtl.320 ===============
Item was changed:
----- Method: SmalltalkImage>>macVmMajorMinorBuildVersion (in category '*Etoys-Squeakland-system attribute') -----
macVmMajorMinorBuildVersion
"SmalltalkImage current macVmMajorMinorBuildVersion"
| aString rawTokens versionPart versionTokens versionArray |
aString := self vmVersion.
aString ifNil: [^ #(0 0 0)].
+ rawTokens := ((aString copyAfterLast: $])
- rawTokens := ((aString copyAfter: $])
findTokens: $ ).
versionPart := rawTokens detect: [:each | each includes: $.] ifNone: [^#(0 0 0)].
versionTokens := versionPart findTokens: $..
versionArray := #(0 0 0) collectWithIndex: [:each :index |
(versionTokens at: index ifAbsent:['']) initialIntegerOrNil ifNil: [each]].
^versionArray!