Frank Shearar uploaded a new version of Exceptions to project The Inbox:
http://source.squeak.org/inbox/Exceptions-fbs.39.mcz

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

Name: Exceptions-fbs.39
Author: fbs
Time: 29 January 2013, 4:36:54.466 pm
UUID: f631e91d-53b4-4179-9745-074e0ec09928
Ancestors: Exceptions-fbs.38

Strip state-copying. Leave that to the Debugger's introspective capabilities.

=============== Diff against Exceptions-fbs.38 ===============

Item was removed:
- ----- Method: SubclassResponsibilityError class>>class:selector:arguments: (in category 'instance creation') -----
- class: aClass selector: aSelector arguments: someObjects
- 	^ self basicNew initializeWithClass: aClass selector: aSelector arguments: someObjects.!

Item was removed:
- ----- Method: SubclassResponsibilityError>>calledArguments (in category 'accessing') -----
- calledArguments
- 	^ calledArguments.!

Item was removed:
- ----- Method: SubclassResponsibilityError>>initializeWithClass:selector:arguments: (in category 'initialize-release') -----
- initializeWithClass: aClass selector: aSelector arguments: someObjects
- 	offendingClass := aClass.
- 	selector := aSelector.
- 	calledArguments := someObjects.!

Item was removed:
- ----- Method: SubclassResponsibilityError>>offendingClass (in category 'accessing') -----
- offendingClass
- 	^ offendingClass.!

Item was removed:
- ----- Method: SubclassResponsibilityError>>selector (in category 'accessing') -----
- selector
- 	^ selector.!

Item was removed:
- ----- Method: SubclassResponsibilityError>>selectorCategory (in category 'accessing') -----
- selectorCategory
- 	| organizer organizers |
- 	organizer := offendingClass organization.
- 	organizers := offendingClass withAllSuperclasses collect: [:ea | ea organization].
- 
- 	^ (organizers collect: [ :org | org categoryOfElement: selector])
- 			detect: [:ea | ea ~= ClassOrganizer default and: [ ea ~= nil]]
- 			ifNone: [ClassOrganizer default]!

Item was removed:
- ----- Method: SubclassResponsibilityError>>signal (in category 'signaling') -----
- signal
- 	self messageText: ('My {1} subclass should have overridden {2}'
- 		format: {offendingClass name. selector}).
- 	^ super signal.!