The Trunk: Collections-fbs.536.mcz

Frank Shearar uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-fbs.536.mcz

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

Name: Collections-fbs.536
Author: fbs
Time: 24 September 2013, 10:27:39.488 pm
UUID: 228d0203-45e3-4942-afd0-289273c84fe1
Ancestors: Collections-nice.535

Update Collections (!) to use RecentMessages.

=============== Diff against Collections-nice.535 ===============

Item was changed:
  ----- Method: Transcripter>>readEvalPrint (in category 'command line') -----
  readEvalPrint
  | line okToRevert |
  okToRevert := true.
  [#('quit' 'exit' 'done' ) includes: (line := self request: '>')]
  whileFalse:
  [line = 'revert'
  ifTrue: [okToRevert
+ ifTrue: [RecentMessages default revertLastMethodSubmission.
+ self cr; show: 'reverted: ' , RecentMessages default mostRecent.
- ifTrue: [Utilities revertLastMethodSubmission.
- self cr; show: 'reverted: ' , Utilities mostRecentlySubmittedMessage.
  okToRevert := false]
  ifFalse: [self cr; show: 'Only one level of revert currently supported']]
  ifFalse: [self cr; show: ([Compiler evaluate: line] ifError: [:err :ex | err])]]!