# HG changeset patch
# User tz
# Date 885908204 -3600
# Node ID ab3d5453143202ee846311e76a15c1e44a682b57
# Parent  73fa8faad5b11806cbbfe64c701c0a163015d36d
info bar as subSpec to class ToolApplicationModel moved

diff -r 73fa8faad5b1 -r ab3d54531432 HierarchicalListEditor.st
--- a/HierarchicalListEditor.st	Tue Jan 27 14:33:36 1998 +0100
+++ b/HierarchicalListEditor.st	Tue Jan 27 14:36:44 1998 +0100
@@ -454,11 +454,11 @@
           #'window:' 
            #(#WindowSpec
               #'name:' 'Hierarchical List Editor'
-              #'layout:' #(#LayoutFrame 195 0 319 0 669 0 631 0)
+              #'layout:' #(#LayoutFrame 148 0 380 0 622 0 692 0)
               #'label:' 'Hierarchical List Editor'
               #'min:' #(#Point 10 10)
               #'max:' #(#Point 1160 870)
-              #'bounds:' #(#Rectangle 195 319 670 632)
+              #'bounds:' #(#Rectangle 148 380 623 693)
               #'menu:' #menu
               #'usePreferredExtent:' false
           )
@@ -533,19 +533,11 @@
                     )
                     #'handles:' #(#Any 0.368421 1.0)
                 )
-                 #(#LabelSpec
-                    #'name:' 'infoLabel'
-                    #'layout:' #(#LayoutFrame 0 0.0 -22 1 -80 1.0 0 1.0)
-                    #'labelChannel:' #valueOfInfoLabel
-                    #'level:' 1
-                    #'adjust:' #left
-                )
-                 #(#LabelSpec
-                    #'name:' 'timeLabel'
-                    #'layout:' #(#LayoutFrame -80 1 -22 1 0 1.0 0 1.0)
-                    #'labelChannel:' #valueOfTimeLabel
-                    #'level:' 1
-                    #'adjust:' #right
+                 #(#UISubSpecification
+                    #'name:' 'infoBarSubSpec'
+                    #'layout:' #(#LayoutFrame 0 0.0 -22 1 0 1.0 0 1.0)
+                    #'majorKey:' #ToolApplicationModel
+                    #'minorKey:' #windowSpecForInfoBar
                 )
               )
           )