geometry (for bigger fonts)
authorClaus Gittinger <cg@exept.de>
Sat, 21 Feb 2004 12:23:49 +0100
changeset 5557 c4f509890024
parent 5556 f9583d708764
child 5558 8b9d99f714d7
geometry (for bigger fonts)
FindFileApplication.st
--- 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 $'
 ! !