Frank Shearar uploaded a new version of Exceptions to project The Trunk:
http://source.squeak.org/trunk/Exceptions-fbs.47.mcz==================== Summary ====================
Name: Exceptions-fbs.47
Author: fbs
Time: 22 July 2013, 9:36:39.47 am
UUID: aba73958-0a98-1649-ad2f-3b53419b3cea
Ancestors: Exceptions-fbs.46
KeyNotFound is critical to Dictionary, so belongs in the same package as Dictionary.
(I'm really not a fan of grouping things together because they happen to be Exceptions. Packaging things _functionally_ makes so much more sense.)
=============== Diff against Exceptions-fbs.46 ===============
Item was removed:
- Error subclass: #KeyNotFound
- instanceVariableNames: 'key'
- classVariableNames: ''
- poolDictionaries: ''
- category: 'Exceptions-Kernel'!
Item was removed:
- ----- Method: KeyNotFound class>>key: (in category 'instance creation') -----
- key: anObject
- ^self new key: anObject!
Item was removed:
- ----- Method: KeyNotFound>>description (in category 'accessing') -----
- description
- "Return a textual description of the exception."
- ^(self messageText) ifNil:['Key not found: ', key]!
Item was removed:
- ----- Method: KeyNotFound>>key (in category 'accessing') -----
- key
- "The key which wasn't found"
- ^key!
Item was removed:
- ----- Method: KeyNotFound>>key: (in category 'accessing') -----
- key: anObject
- "The key which wasn't found"
- key := anObject!
Item was removed:
- ----- Method: KeyNotFound>>messageText (in category 'accessing') -----
- messageText
- "Return a textual description of the exception."
- ^messageText ifNil:['Key not found: ', key]!