branch | jv |
changeset 16753 | d0e2c8fd4a62 |
parent 16748 | 62486fba2d74 |
parent 16749 | c1192209d968 |
child 16757 | f2b7e4d96eb3 |
--- a/AbstractLauncherApplication.st Thu Jul 21 07:04:01 2016 +0200 +++ b/AbstractLauncherApplication.st Fri Jul 22 07:11:22 2016 +0200 @@ -740,13 +740,12 @@ knownTopViews := IdentitySet new. Screen allScreens do:[:aScreen | - aScreen knownViews do:[:aView | + aScreen allViewsDo:[:aView | |top showIt wg| aView notNil ifTrue:[ top := aView topView. (knownTopViews includes:top) ifFalse:[ - (top isKindOf:DebugView) ifTrue:[ "/ although modal, show it. showIt := top realized