--- a/FindFileApplication.st	Fri Jan 13 14:44:15 2012 +0100
+++ b/FindFileApplication.st	Fri Jan 13 14:44:18 2012 +0100
@@ -112,6 +112,9 @@
 #namePattern
 'Filename(s) to search for. Can be matchPatterns, separated by ";"'
 
+#excludedNamePattern
+'Filename(s) to skip. Can be matchPatterns, separated by ";"'
+
 #notContentsPattern
 'Search for files NOT containing this. Can be matchPatterns, separated by ";"'
 
@@ -132,7 +135,7 @@
 
 )
 
-    "Modified: / 11-01-2012 / 23:32:42 / cg"
+    "Modified: / 13-01-2012 / 14:40:34 / cg"
 ! !
 
 !FindFileApplication class methodsFor:'history'!
@@ -239,6 +242,24 @@
                     acceptOnPointerLeave: false
                   )
                  (LabelSpec
+                    label: 'But Not Named:'
+                    name: 'Label1'
+                    layout: (LayoutFrame 2 0 55 0 154 0 72 0)
+                    activeHelpKey: excludedNamePattern
+                    translateLabel: true
+                    adjust: right
+                  )
+                 (InputFieldSpec
+                    name: 'EntryField1'
+                    layout: (LayoutFrame 156 0 52 0 -315 1 72 0)
+                    activeHelpKey: excludedNamePattern
+                    tabable: true
+                    model: excludedNamePatternHolder
+                    immediateAccept: true
+                    acceptOnLeave: false
+                    acceptOnPointerLeave: false
+                  )
+                 (LabelSpec
                     label: 'Containing:'
                     name: 'ContentsLabel'
                     layout: (LayoutFrame 2 0 79 0 154 0 96 0)
@@ -386,6 +407,15 @@
                     translateLabel: true
                   )
                  (CheckBoxSpec
+                    label: 'Ignore Case'
+                    name: 'CheckBox1'
+                    layout: (LayoutFrame -169 1 53 0 -4 1 76 0)
+                    activeHelpKey: ignoreCase
+                    tabable: true
+                    model: ignoreCaseInExcludedName
+                    translateLabel: true
+                  )
+                 (CheckBoxSpec
                     label: 'Use ''grep'' Cmd'
                     name: 'UseGrepCheckBox'
                     layout: (LayoutFrame -309 1 77 0 -167 1 100 0)
@@ -432,33 +462,6 @@
                     translateLabel: true
                     model: clearCache
                   )
-                 (LabelSpec
-                    label: 'But Not Named:'
-                    name: 'Label1'
-                    layout: (LayoutFrame 2 0 55 0 154 0 72 0)
-                    activeHelpKey: namePattern
-                    translateLabel: true
-                    adjust: right
-                  )
-                 (InputFieldSpec
-                    name: 'EntryField1'
-                    layout: (LayoutFrame 156 0 52 0 -315 1 72 0)
-                    activeHelpKey: namePattern
-                    tabable: true
-                    model: excludedNamePatternHolder
-                    immediateAccept: true
-                    acceptOnLeave: false
-                    acceptOnPointerLeave: false
-                  )
-                 (CheckBoxSpec
-                    label: 'Ignore Case'
-                    name: 'CheckBox1'
-                    layout: (LayoutFrame -169 1 53 0 -4 1 76 0)
-                    activeHelpKey: ignoreCase
-                    tabable: true
-                    model: ignoreCaseInExcludedName
-                    translateLabel: true
-                  )
                  )
                
               )
@@ -488,6 +491,7 @@
         )
       )
 
+    "Modified: / 13-01-2012 / 14:40:06 / cg"
 ! !
 
 !FindFileApplication class methodsFor:'menu specs'!
@@ -1677,9 +1681,9 @@
 !FindFileApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.99 2012-01-12 02:33:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.100 2012-01-13 13:44:18 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.99 2012-01-12 02:33:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.100 2012-01-13 13:44:18 cg Exp $'
 ! !