Marcel Taeumel uploaded a new version of Tools to project The Trunk: http://source.squeak.org/trunk/Tools-mt.941.mcz
==================== Summary ====================
Name: Tools-mt.941 Author: mt Time: 25 February 2020, 10:39:12.128786 am UUID: 51495436-fb80-0546-be9e-703c956315eb Ancestors: Tools-mt.940
Complements Kernel-mt.1305.
Fixes class-rename issue, which occurred due to catching ProgressNotification. And the missing #resume.
=============== Diff against Tools-mt.940 ===============
Item was changed: ----- Method: Browser>>renameClass (in category 'class functions') ----- renameClass | oldName newName obs oldBinding | self hasClassSelected ifFalse: [^ self]. self okToChange ifFalse: [^ self]. oldName := self selectedClass name. newName := self request: 'Please type new class name' initialAnswer: oldName. newName = '' ifTrue: [^ self]. "Cancel returns ''" newName := newName asSymbol. newName = oldName ifTrue: [^ self]. (self selectedClass environment includesKey: newName) ifTrue: [^ self error: newName , ' already exists']. oldBinding := self selectedClass environment declarationOf: oldName. [self selectedClass rename: newName] + on: RemarkNotification + do: [:ex | self inform: ex messageText. ex resume]. - on: Notification - do: [:ex | self inform: ex messageText]. selectedClassName := newName. self changed: #classList. obs := self systemNavigation allCallsOn: oldBinding. obs isEmpty ifFalse: [self systemNavigation browseMessageList: obs name: 'Obsolete References to ' , oldName autoSelect: oldName]. self selectClassNamed: newName.!
packages@lists.squeakfoundation.org