StandardSystemView.st
changeset 7398 6d085e759693
parent 7263 9036d75c2799
child 7400 b583f17b4b39
child 7416 bd3b9e9edd9e
--- a/StandardSystemView.st	Thu Jun 30 18:29:38 2016 +0200
+++ b/StandardSystemView.st	Thu Jun 30 18:29:49 2016 +0200
@@ -16,8 +16,8 @@
 TopView subclass:#StandardSystemView
 	instanceVariableNames:'label icon iconView iconLabel minExtent maxExtent sizeFixed
 		application windowEventsForApplication deviceIcon labelChannel'
-	classVariableNames:'DefaultIcon IncludeHostNameInLabel DefaultExtent
-		WindowLabelFormat DefaultMinExtent TimedRaiseAction'
+	classVariableNames:'DefaultExtent DefaultIcon DefaultMinExtent IncludeHostNameInLabel
+		TimedRaiseAction WindowLabelFormat'
 	poolDictionaries:''
 	category:'Views-Basic'
 !
@@ -1434,7 +1434,7 @@
 
         shown ifTrue:[
             shown := false.
-            self changed:#visibility.
+            dependents notNil ifTrue:[ self changed:#visibility ].
         ].
     ].