'From Squeakland 3.8.5976 of 25 August 2004 [latest update: #387] on 19 January 2005 at 11:20:17 pm'!
"Change Set:		revealPlayer
Date:			19 January 2005
Author:			Takashi Yamamiya

You can pick up a player (morph) at a Player-type slot
in viewer."!


!Player methodsFor: 'misc' stamp: 'tak 1/18/2005 13:12'!
revealPlayerNamed: aSymbol in: aWorld 
	| getter |
	getter := Utilities getterSelectorFor: aSymbol.
	^ (self perform: getter)
		revealPlayerIn: aWorld! !


!PlayerType methodsFor: 'tiles' stamp: 'tak 1/18/2005 13:13'!
addExtraItemsToMenu: aMenu forSlotSymbol: slotSym
	"If the receiver has extra menu items to add to the slot menu, here is its chance to do it"

	aMenu add: 'tiles to get...' translated selector: #offerGetterTiles: argument: slotSym.
	aMenu add:  'reveal me' translated target: aMenu defaultTarget selector: #revealPlayerNamed:in: argumentList: { slotSym. ActiveWorld}.! !