The Trunk: System-ar.292.mcz

Andreas Raab uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-ar.292.mcz

==================== Summary ====================

Name: System-ar.292
Author: ar
Time: 9 March 2010, 7:35:06.071 pm
UUID: 712647e4-997d-1248-b579-72486e77380a
Ancestors: System-ar.290

Get rid of a few *smbase extensions/overrides.

=============== Diff against System-ar.290 ===============

Item was added:
+ ----- Method: SystemVersion>>majorMinorVersion (in category 'accessing') -----
+ majorMinorVersion
+ "Return the major/minor version number of the form X.Y, without any 'alpha' or 'beta' or other suffix."
+ "(SystemVersion new version: 'Squeak3.7alpha') majorMinorVersion" "  -->  'Squeak3.7' "
+ "SystemVersion current majorMinorVersion"
+
+ | char stream |
+ stream := ReadStream on: version, 'x'.
+ stream upTo: $..
+ char := stream next.
+ char ifNil: [^ version]. "eg: 'Jasmine-rc1' has no $. in it."
+ [char isDigit]
+ whileTrue: [char := stream next].
+ ^ version copyFrom: 1 to: stream position - 1
+ !