--- a/ToolApplicationModel.st Thu Nov 15 12:09:54 2001 +0100
+++ b/ToolApplicationModel.st Thu Nov 15 23:09:22 2001 +0100
@@ -525,45 +525,45 @@
<resource: #canvas>
- ^
-
- #(#FullSpec
- #window:
- #(#WindowSpec
- #name: 'Info Bar'
- #layout: #(#LayoutFrame 233 0 218 0 732 0 563 0)
- #label: 'Info Bar'
- #min: #(#Point 400 320)
- #max: #(#Point 1152 900)
- #bounds: #(#Rectangle 233 218 733 564)
- #menu: #menu
- #usePreferredExtent: false
- )
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#ViewSpec
- #name: 'view'
- #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
- #component:
- #(#SpecCollection
- #collection:
- #(
- #(#LabelSpec
- #name: 'infoLabel'
- #layout: #(#LayoutFrame 2 0.0 1 0.0 -1 1.0 -1 1.0)
- #labelChannel: #valueOfInfoLabel
- #level: -1
- #adjust: #left
- #resizeForLabel: false
- )
- )
- )
- )
+ ^
+ #(#FullSpec
+ #name: #windowSpecForInfoBar
+ #window:
+ #(#WindowSpec
+ #label: 'Info Bar'
+ #name: 'Info Bar'
+ #min: #(#Point 400 320)
+ #max: #(#Point 1152 900)
+ #bounds: #(#Rectangle 13 23 513 369)
+ #menu: #menu
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#ViewSpec
+ #name: 'view'
+ #layout: #(#LayoutFrame 0 0.0 0 0.0 -1 1.0 -1 1.0)
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#LabelSpec
+ #name: 'infoLabel'
+ #layout: #(#LayoutFrame 2 0.0 1 0.0 -1 1.0 -1 1.0)
+ #level: -1
+ #labelChannel: #valueOfInfoLabel
+ #resizeForLabel: false
+ #adjust: #left
+ )
+ )
+
)
- )
+ )
+ )
+
+ )
)
+
+ "Modified: / 15.11.2001 / 22:42:07 / cg"
!
windowSpecForInfoBarWithClock
@@ -589,7 +589,7 @@
#name: 'Info Bar'
#min: #(#Point 400 320)
#max: #(#Point 1152 900)
- #bounds: #(#Rectangle 12 22 512 342)
+ #bounds: #(#Rectangle 13 23 513 343)
#menu: #menu
)
#component:
@@ -597,7 +597,7 @@
#collection: #(
#(#VariableHorizontalPanelSpec
#name: 'VariableHorizontalPanel1'
- #layout: #(#LayoutFrame 0 0 0 0 0 1 0 1)
+ #layout: #(#LayoutFrame 1 0 1 0 -1 1 -1 1)
#barWidth: 2
#showHandle: false
#component:
@@ -626,6 +626,8 @@
)
)
+
+ "Modified: / 15.11.2001 / 22:41:52 / cg"
! !
!ToolApplicationModel class methodsFor:'menu specs'!
@@ -1310,5 +1312,5 @@
!ToolApplicationModel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.103 2001-11-13 12:02:44 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/ToolApplicationModel.st,v 1.104 2001-11-15 22:09:22 cg Exp $'
! !