--- a/Tools__ViewTreeApplication.st	Wed Feb 11 13:02:34 2015 +0100
+++ b/Tools__ViewTreeApplication.st	Wed Feb 11 13:06:00 2015 +0100
@@ -2608,7 +2608,7 @@
     ].
 !
 
-displayOn:aGC x:x y:y h:h
+displayOn:aGC x:x y:y h:h isHighlightedAsSelected:isHighlightedAsSelected
     |labelHeight additionalName label isValidAndShown|
 
     label := self label.
@@ -2630,7 +2630,7 @@
     ].
 
     labelHeight := self heightOn:aGC.
-    self displayLabel:label h:labelHeight on:aGC x:x y:y h:h.
+    self displayLabel:label h:labelHeight on:aGC x:x y:y h:h isHighlightedAsSelected:isHighlightedAsSelected.
 
     xOffsetAdditionalName notNil ifTrue:[
         additionalName := self additionalLabelForItem:self.