fixes anchorred window closing error when clicking outside

Author: plantec

src/Toplo/ToAnchoredWindowManager.class.st

@@ -164,6 +164,7 @@ ToAnchoredWindowManager >> eventsToHandle [
 		  ToOpenedClosedEvent.
 		  BlElementExtentChangedEvent.
 		  BlElementToBeRemovedFromParentEvent.
+		  ToRemovedFromSpaceEvent.
 		  BlElementPositionInSpaceChangedEvent.
 		  ToThemeInstalledEvent }
 ]
@@ -326,6 +327,12 @@ ToAnchoredWindowManager >> positionWindowOnEvent: anEvent context: aBlElementBou
 		context: aBlElementBoundsUpdateContext
 ]
 
+{ #category : #'event handling' }
+ToAnchoredWindowManager >> removedFromSpaceEvent: anEvent [
+
+	self closeWindow
+]
+
 { #category : #'window handling' }
 ToAnchoredWindowManager >> startWindow: aWindow onEvent: anEvent [
 

src/Toplo/ToPopupWindowManager.class.st

@@ -143,13 +143,6 @@ ToPopupWindowManager >> defaultWindowStarter [
 	^ ToStandardPopupStarter new
 ]
 
-{ #category : #'event handling' }
-ToPopupWindowManager >> elementToBeRemovedFromParentEvent: anEvent [
-
-	super elementToBeRemovedFromParentEvent: anEvent.
-	delayedPopupHandler cleanUpCheckerIn: anchorElement 
-]
-
 { #category : #'api - accessing' }
 ToPopupWindowManager >> eventsToHandle [
 
@@ -350,6 +343,13 @@ ToPopupWindowManager >> popupOnPressed: aBoolean [
 	delayedPopupHandler activateOnPressed: popupOnPressed
 ]
 
+{ #category : #'event handling' }
+ToPopupWindowManager >> removedFromSpaceEvent: anEvent [
+
+	super removedFromSpaceEvent: anEvent.
+	delayedPopupHandler cleanUpCheckerIn: anchorElement 
+]
+
 { #category : #'window handling' }
 ToPopupWindowManager >> requestCloseWindowOnEvent: anEvent [
 

src/Toplo/ToSkinStateGenerator.class.st

@@ -101,6 +101,7 @@ ToSkinStateGenerator >> closedEvent: anEvent [
 	" directly dispatch the skin event to allow the hnadling of the closed window 
 	(with a closing animation as an example ) "
 
+	target isAttachedToSceneGraph ifFalse: [ ^ self ].
 	target skinManagerDo: [ :sm |
 		target dispatchEvent: (ToClosedSkinEvent sourceEvent: anEvent) ]
 ]