--- a/FindFileApplication.st Fri Feb 20 19:47:54 2004 +0100
+++ b/FindFileApplication.st Sat Feb 21 12:23:49 2004 +0100
@@ -102,7 +102,7 @@
name: 'File Search'
min: (Point 377 131)
max: (Point 1280 1024)
- bounds: (Rectangle 10 46 675 378)
+ bounds: (Rectangle 0 0 681 377)
)
component:
(SpecCollection
@@ -123,13 +123,13 @@
(LabelSpec
label: 'Directory:'
name: 'DirectoryLabel'
- layout: (LayoutFrame 4 0 7 0 136 0 24 0)
+ layout: (LayoutFrame 2 0 7 0 154 0 24 0)
translateLabel: true
- adjust: left
+ adjust: right
)
(FilenameInputFieldSpec
name: 'DirectoryEntryField'
- layout: (LayoutFrame 140 0 4 0 -246 1 24 0)
+ layout: (LayoutFrame 156 0 4 0 -246 1 24 0)
model: searchDirectoryHolder
immediateAccept: true
acceptOnPointerLeave: false
@@ -144,7 +144,7 @@
translateLabel: true
)
(CheckBoxSpec
- label: 'Recursively'
+ label: 'Recursive'
name: 'RecursiveSearchCheckBox'
layout: (LayoutFrame -97 1 5 0 0 1 28 0)
tabable: true
@@ -154,15 +154,16 @@
(LabelSpec
label: 'Search files named:'
name: 'FileNameLabel'
- layout: (LayoutFrame 4 0 30 0 136 0 47 0)
+ layout: (LayoutFrame 2 0 30 0 154 0 47 0)
translateLabel: true
- adjust: left
+ adjust: right
)
(InputFieldSpec
name: 'FileNameEntryField'
- layout: (LayoutFrame 140 0 28 0 -246 1 48 0)
+ layout: (LayoutFrame 156 0 28 0 -246 1 48 0)
tabable: true
model: namePatternHolder
+ formatString: ''
immediateAccept: true
acceptOnLeave: false
acceptOnPointerLeave: false
@@ -184,15 +185,15 @@
translateLabel: true
)
(LabelSpec
- label: 'Containing the string:'
+ label: 'Containing:'
name: 'ContentsLabel'
- layout: (LayoutFrame 4 0 55 0 136 0 72 0)
+ layout: (LayoutFrame 2 0 55 0 154 0 72 0)
translateLabel: true
- adjust: left
+ adjust: right
)
(InputFieldSpec
name: 'ContentsEntryField'
- layout: (LayoutFrame 140 0 52 0 -115 1 72 0)
+ layout: (LayoutFrame 156 0 52 0 -115 1 72 0)
enableChannel: notSearchForSameContents
tabable: true
model: contentsPatternHolder
@@ -211,13 +212,13 @@
(LabelSpec
label: 'Not Containing:'
name: 'NotContentsLabel'
- layout: (LayoutFrame 4 0 79 0 136 0 96 0)
+ layout: (LayoutFrame 2 0 79 0 154 0 96 0)
translateLabel: true
- adjust: left
+ adjust: right
)
(InputFieldSpec
name: 'NotContentsEntryField'
- layout: (LayoutFrame 140 0 76 0 -115 1 96 0)
+ layout: (LayoutFrame 156 0 76 0 -115 1 96 0)
enableChannel: notSearchForSameContents
tabable: true
model: notContentsPatternHolder
@@ -1111,5 +1112,5 @@
!FindFileApplication class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.20 2003-12-23 22:11:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.21 2004-02-21 11:23:49 cg Exp $'
! !