--- a/StandardSystemView.st	Wed Nov 12 10:26:51 2008 +0100
+++ b/StandardSystemView.st	Mon Nov 17 18:29:18 2008 +0100
@@ -1340,14 +1340,18 @@
     "iconify the receiver"
 
     shown ifTrue:[
-	self unmap.
+        self unmap.
 
-	"if it was iconified, try to remap iconified"
-	device
-	    mapView:self id:drawableId iconified:true 
-	    atX:left y:top width:width height:height
-	    minExtent:minExtent maxExtent:maxExtent.
-	shown := false.
+        "if it was iconified, try to remap iconified"
+        device
+            mapView:self id:drawableId iconified:true 
+            atX:left y:top width:width height:height
+            minExtent:minExtent maxExtent:maxExtent.
+
+        shown ifTrue:[
+            shown := false.
+            self changed:#visibility.
+        ].
     ].
 
     "
@@ -1547,7 +1551,7 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.185 2008-10-29 16:32:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.186 2008-11-17 17:29:18 cg Exp $'
 ! !
 
 StandardSystemView initialize!