Regression

osx-32 / Tests-osx-32 / MacOSX32.Glamour.Tests.Morphic.GLMPharoScriptMorphicTest.testExplicitAcceptDoesNotAffectTextPort (from Glamour-Tests-Morphic)

Failing for the past 1 build (Since Unstable#354 )
Took 1.1 sec.

Error Message

a TaskbarTask not found in OrderedCollection

Stacktrace

OrderedCollection(Collection)>>errorNotFound:
[ self errorNotFound: oldObject ] in OrderedCollection(Collection)>>remove:
OrderedCollection>>remove:ifAbsent:
OrderedCollection(Collection)>>remove:
[ :ot | 
self orderedTasks replaceAll: ot with: t.
deadTasks remove: ot.
newTasks remove: t ] in [ :t | 
self orderedTasks
	detect: [ :ot | ot morph = t morph ]
	ifFound: [ :ot | 
		self orderedTasks replaceAll: ot with: t.
		deadTasks remove: ot.
		newTasks remove: t ] ] in TaskbarMorph>>updateTasks
BlockClosure>>cull:
[ :each | 
(aBlock value: each)
	ifTrue: [ ^ foundBlock cull: each ] ] in OrderedCollection(Collection)>>detect:ifFound:ifNone:
OrderedCollection>>do:
OrderedCollection(Collection)>>detect:ifFound:ifNone:
OrderedCollection(Collection)>>detect:ifFound:
[ :t | 
self orderedTasks
	detect: [ :ot | ot morph = t morph ]
	ifFound: [ :ot | 
		self orderedTasks replaceAll: ot with: t.
		deadTasks remove: ot.
		newTasks remove: t ] ] in TaskbarMorph>>updateTasks
OrderedCollection>>do:
TaskbarMorph>>updateTasks
[ self updateBounds.
self updateTasks ] in TaskbarMorph>>ownerChanged
BlockClosure>>on:do:
TaskbarMorph>>ownerChanged
[ :m | m ownerChanged ] in WorldMorph(Morph)>>doLayoutIn:
Array(SequenceableCollection)>>do:
WorldMorph(Morph)>>doLayoutIn:
[ self doLayoutIn: self layoutBounds ] in WorldMorph(Morph)>>computeFullBounds
BlockClosure>>on:do:
WorldMorph(Morph)>>computeFullBounds
WorldMorph(Morph)>>fullBounds
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>handleMouseMove:
MouseMoveEvent>>sentTo:
[ ^ anEvent sentTo: self ] in MorphicEventDispatcher>>dispatchEvent:with:
BlockClosure>>ensure:
MorphicEventDispatcher>>dispatchEvent:with:
WorldMorph(Morph)>>processEvent:using:
WorldMorph(Morph)>>processEvent:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>moveToEvent:
HandMorph>>handleEvent:
[ :type | 
self activeHand
	handleEvent:
		(MouseButtonEvent new
			setType: type key
			position: (self pointInWorld: self center)
			which: (noButtons bitXor: buttons)
			buttons: type value
			hand: self activeHand
			stamp: Time millisecondClockValue)	"Some Morphs report local coords" ] in RubScrolledTextMorph(Morph)>>simulateClickWith:
Array(SequenceableCollection)>>do:
RubScrolledTextMorph(Morph)>>simulateClickWith:
RubScrolledTextMorph(Morph)>>simulateClick
GLMPharoScriptMorphicTest>>testExplicitAcceptDoesNotAffectTextPort
GLMPharoScriptMorphicTest(TestCase)>>performTest