diff --git a/src/NewTools-WindowManager/SpClosedWindowListPresenter.class.st b/src/NewTools-WindowManager/SpClosedWindowListPresenter.class.st
index 1562736a4..71d6121f3 100644
--- a/src/NewTools-WindowManager/SpClosedWindowListPresenter.class.st
+++ b/src/NewTools-WindowManager/SpClosedWindowListPresenter.class.st
@@ -136,7 +136,7 @@ SpClosedWindowListPresenter class >> windowMenuOn: aBuilder [
 	(aBuilder item: #Close)
 		order: 1.0;
 		action: [
-			aBuilder model hide.
+			aBuilder model close.
 			announcement := WindowClosed new
 				                window: aBuilder model;
 				                yourself.