Chris Muller uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-cmm.341.mcz

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

Name: System-cmm.341
Author: cmm
Time: 21 June 2010, 1:31:45.651 pm
UUID: 5368255e-7e92-425a-a591-c42ade744d69
Ancestors: System-ar.340

Fixed 'revert to previous version' of class-side methods menu.

=============== Diff against System-ar.340 ===============

Item was changed:
  ----- Method: ChangeRecord>>methodClass (in category 'access') -----
+ methodClass
+ 	| methodClassName methodClass |
+ 	type == #method ifFalse: [ ^ nil ].
+ 	methodClassName := class subStrings
+ 		ifEmpty: [ ^ nil ]
+ 		ifNotEmptyDo:
+ 			[ : parts | parts first asSymbol ].
+ 	(Smalltalk globals includesKey: methodClassName) ifFalse: [ ^ nil ].
+ 	methodClass := Smalltalk at: methodClassName.
+ 	^ meta
+ 		ifTrue: [ methodClass class ]
+ 		ifFalse: [ methodClass ]!
- methodClass 
- 	| methodClass |
- 	type == #method ifFalse: [^ nil].
- 	(Smalltalk globals includesKey: class asSymbol) ifFalse: [^ nil].
- 	methodClass := Smalltalk at: class asSymbol.
- 	meta ifTrue: [^ methodClass class]
- 		ifFalse: [^ methodClass]!