--- a/UISelectionPanel.st Thu Jul 08 20:12:42 1999 +0200
+++ b/UISelectionPanel.st Thu Jul 08 20:19:44 1999 +0200
@@ -1066,8 +1066,8 @@
the UIPainter may not be able to read the specification."
"
- UIPainter new openOnClass:UISelectionPanel andSelector:#standardMisc
- UISelectionPanel new openInterface:#standardMisc
+ UIPainter new openOnClass:Smalltalk::UISelectionPanel andSelector:#standardMisc
+ Smalltalk::UISelectionPanel new openInterface:#standardMisc
"
<resource: #canvas>
@@ -1079,10 +1079,10 @@
#(#WindowSpec
#label: 'NewApplication'
#name: 'NewApplication'
- #layout: #(#LayoutFrame 220 0 200 0 658 0 442 0)
+ #layout: #(#LayoutFrame 44 0 195 0 482 0 437 0)
#min: #(#Point 10 10)
#max: #(#Point 1280 1024)
- #bounds: #(#Rectangle 220 200 659 443)
+ #bounds: #(#Rectangle 44 195 483 438)
)
#component:
#(#SpecCollection
@@ -1130,6 +1130,7 @@
#label: 'ScrollBar'
#name: 'ScrollBarLabel'
#layout: #(#AlignmentOrigin 87 0 103 0 1 0)
+ #initiallyInvisible: true
#style: #(#FontDescription #helvetica #medium #roman 10)
#resizeForLabel: true
#canUIDrag: false
@@ -1138,6 +1139,7 @@
#label: 'Scroller'
#name: 'ScrollerLabel'
#layout: #(#AlignmentOrigin 87 0 130 0 1 0)
+ #initiallyInvisible: true
#style: #(#FontDescription #helvetica #medium #roman 10)
#resizeForLabel: true
#canUIDrag: false
@@ -1145,6 +1147,7 @@
#(#ScrollerSpec
#name: 'Scroller'
#layout: #(#LayoutFrame 88 0 127 0 203 0 145 0)
+ #initiallyInvisible: true
#orientation: #horizontal
)
#(#SteppingSliderSpec
@@ -1162,6 +1165,7 @@
#(#ScrollerSpec
#name: 'VScroller'
#layout: #(#LayoutFrame 345 0 6 0 363 0 106 0)
+ #initiallyInvisible: true
)
#(#LabelSpec
#label: 'Region'
@@ -1223,11 +1227,13 @@
#(#ScrollBarSpec
#name: 'ScrollBar'
#layout: #(#LayoutFrame 88 0 100 0 203 0 118 0)
+ #initiallyInvisible: true
#orientation: #horizontal
)
#(#ScrollBarSpec
#name: 'VScrollBar'
#layout: #(#LayoutFrame 317 0 6 0 335 0 106 0)
+ #initiallyInvisible: true
)
)