--- a/Tools__ViewTreeApplication.st Sat Feb 07 17:00:05 2015 +0100
+++ b/Tools__ViewTreeApplication.st Wed Feb 11 13:02:34 2015 +0100
@@ -1636,7 +1636,20 @@
(inst := view transformation) notNil ifTrue:[ inst := inst displayString ].
list add:(MenuDesc title:'transformation' value:inst).
- ^ MenuDesc buildFromList:list onGC:aMenu
+ (view isKindOf:Label) ifTrue:[
+ list add:(MenuDesc separator).
+ (inst := view adjust) notNil ifTrue:[ inst := inst displayString ].
+ list add:(MenuDesc title:'adjust' value:inst).
+ ].
+ (view isKindOf:PanelView) ifTrue:[
+ list add:(MenuDesc separator).
+ (inst := view horizontalLayout ) notNil ifTrue:[ inst := inst displayString ].
+ list add:(MenuDesc title:'horizontalLayout' value:inst).
+ (inst := view verticalLayout ) notNil ifTrue:[ inst := inst displayString ].
+ list add:(MenuDesc title:'verticalLayout' value:inst).
+ ].
+
+ ^ MenuDesc buildFromList:list onGC:aMenu
!
submenuInspector:aMenu