[Pharo-dev] Renaming a class raises an exception

handleClassRenamed: anAnnouncement | items selectedIndex | items := self messages collect: [ :rgMethod | | interestedClassName interestedClass | interestedClassName := anAnnouncement oldName. interestedClass := anAnnouncement classRenamed. rgMethod isMetaSide ^^^^^^^^^^^^^^^^^ apparently rgMethod does not understand isMetaSide ifTrue: [ interestedClassName := interestedClassName , ' class'. interestedClass := interestedClass classSide ]. rgMethod parentName = interestedClassName ifTrue: [ (interestedClass >> rgMethod selector) asFullRingDefinition ] ifFalse: [ rgMethod ] ]. selectedIndex := messageList selectedIndex. self messages: items. self setSelectedIndex: selectedIndex