'From Squeak3.1alpha of 7 February 2001 [latest update: #3738] on 27 February 2001 at 5:41:12 am'! "Change Set: scriptsTwice-sw Date: 27 February 2001 Author: Scott Wallace Fixes the recent bug that made the #script category often be shown twice in a viewer "! !Player methodsFor: 'slots-kernel' stamp: 'sw 2/27/2001 05:39'! categories "Answer a list of categories appropriate to the the receiver and its costumes" | aList | (self hasCostumeThatIsAWorld) ifTrue: [^ self categoriesForWorld]. aList _ OrderedCollection new. self slotNames size > 0 ifTrue: [aList add: #'instance variables']. aList addAll: costume categoriesForViewer. aList remove: #scripts ifAbsent: []. aList add: #scripts after: aList first. ^ aList! !