--- a/FileSelectionBrowser.st Thu Feb 05 12:23:16 1998 +0100
+++ b/FileSelectionBrowser.st Thu Feb 05 12:25:46 1998 +0100
@@ -50,6 +50,7 @@
"Created: / 10.1.1998 / 11:00:06 / tz"
"Modified: #windowSpec / 5.2.1998 / 09:36:40 / cg"
+ "Modified: #windowSpec / 5.2.1998 / 12:25:27 / cg"
! !
!FileSelectionBrowser class methodsFor:'instance creation'!
@@ -136,16 +137,14 @@
^
#(#FullSpec
- #'attributes:' #()
#'window:'
#(#WindowSpec
- #'attributes:' #()
#'name:' 'File Selection Browser'
- #'layout:' #(#LayoutFrame 62 0 234 0 560 0 540 0)
+ #'layout:' #(#LayoutFrame 40 0 584 0 538 0 890 0)
#'label:' 'File Selection Browser'
#'min:' #(#Point 10 10)
#'max:' #(#Point 1152 900)
- #'bounds:' #(#Rectangle 62 234 561 541)
+ #'bounds:' #(#Rectangle 40 584 539 891)
#'usePreferredExtent:' false
)
#'component:'
@@ -153,7 +152,6 @@
#'collection:'
#(
#(#VariableHorizontalPanelSpec
- #'attributes:' #()
#'name:' 'panel'
#'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 -40 1.0)
#'component:'
@@ -161,14 +159,12 @@
#'collection:'
#(
#(#ViewSpec
- #'attributes:' #()
#'name:' 'view1'
#'component:'
#(#SpecCollection
#'collection:'
#(
#(#FileSelectionTreeSpec
- #'attributes:' #()
#'name:' 'directoryTreeView'
#'layout:' #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
#'model:' #selectionOfDirectory
@@ -185,14 +181,12 @@
)
)
#(#ViewSpec
- #'attributes:' #()
#'name:' 'view2'
#'component:'
#(#SpecCollection
#'collection:'
#(
#(#InputFieldSpec
- #'attributes:' #()
#'name:' 'EditField'
#'layout:' #(#LayoutFrame 1 0.0 -22 1 0 1.0 0 1)
#'model:' #valueOfFileName
@@ -200,7 +194,6 @@
#'acceptOnTab:' false
)
#(#SubCanvasSpec
- #'attributes:' #()
#'name:' 'subCanvas1'
#'layout:' #(#LayoutFrame 1 0.0 0 0.0 0 1.0 -22 1.0)
#'clientHolder:' #directoryView
@@ -213,7 +206,6 @@
#'handles:' #(#Any 0.5 1.0)
)
#(#UISubSpecification
- #'attributes:' #()
#'name:' 'SubSpecification'
#'layout:' #(#LayoutFrame 2 0.0 -32 1 -2 1.0 -8 1.0)
#'majorKey:' #ToolApplicationModel
@@ -223,7 +215,7 @@
)
)
- "Modified: / 5.2.1998 / 09:36:40 / cg"
+ "Modified: / 5.2.1998 / 12:25:27 / cg"
! !
!FileSelectionBrowser methodsFor:'accessing'!