Tools__NewSystemBrowser.st
changeset 17794 d440d4b60a99
parent 17785 f5d785876b85
child 17800 38b8e22de400
--- a/Tools__NewSystemBrowser.st	Mon Nov 27 15:26:35 2017 +0100
+++ b/Tools__NewSystemBrowser.st	Mon Nov 27 15:26:49 2017 +0100
@@ -53,7 +53,8 @@
 		LastClassDocDirectory DefaultShowCoverage LastLintedPackage
 		LastSearchedImplementors LastSearchedSenders
 		LastComparedClassName SkipCompilabilityChecksForFastCheckin
-		DefaultShowImageResourceMethodsImages LastShowSelectorNameFilter'
+		DefaultShowImageResourceMethodsImages LastShowSelectorNameFilter
+		LastShowNameFilter'
 	poolDictionaries:''
 	category:'Interface-Browsers-New'
 !
@@ -340,13 +341,13 @@
 #searchClass
 'Search class'
 
-#selectorNameFilter
+#nameFilter
 'Show only methods with matching selectors / which contain the text '
 
 #nameFilterType
 'Switch between selector- (S) and text matching (T)'
 
-#hideSelectorNameFilter
+#hideNameFilter
 'Hide the filter. Reopen via the "View" menu'
 
 #gotoClassEntryField
@@ -392,7 +393,7 @@
     ].
     ^ spec.
 
-    "Modified: / 25-11-2017 / 11:55:44 / cg"
+    "Modified: / 27-11-2017 / 15:23:15 / cg"
 ! !
 
 !NewSystemBrowser class methodsFor:'image specs'!
@@ -1718,8 +1719,8 @@
                         (Array
 
                           (SubChannelInfoSpec
-                             subAspect: showSelectorNameFilter
-                             aspect: showSelectorNameFilter
+                             subAspect: showNameFilterHolder
+                             aspect: showNameFilterHolder
                            ) 
                           (SubChannelInfoSpec
                              subAspect: doubleClickChannel
@@ -1852,7 +1853,7 @@
        )
      )
 
-    "Modified: / 09-11-2017 / 20:20:53 / cg"
+    "Modified: / 27-11-2017 / 15:21:48 / cg"
 !
 
 multipleCategoryBrowserSpec
@@ -13110,7 +13111,7 @@
          (MenuItem
             label: 'Selector Filter'
             hideMenuOnActivated: false
-            indication: showSelectorNameFilter
+            indication: showNameFilterHolder
           )
          (MenuItem
             label: '-'
@@ -13345,7 +13346,7 @@
         nil
       )
 
-    "Modified: / 09-11-2017 / 20:40:56 / cg"
+    "Modified: / 27-11-2017 / 15:22:00 / cg"
 !
 
 viewMenuForChainBrowser
@@ -20503,17 +20504,17 @@
     "Created: / 24.2.2000 / 14:55:44 / cg"
 !
 
-showSelectorNameFilter
-    |holder|
-
-    (holder := builder bindingAt:#showSelectorNameFilter) isNil ifTrue:[
-        holder := (LastShowSelectorNameFilter ? false) asValue.
-        holder onChangeEvaluate:[ LastShowSelectorNameFilter := holder value].
-        builder aspectAt:#showSelectorNameFilter put: holder
+showNameFilterHolder
+    |holder|
+
+    (holder := builder bindingAt:#showNameFilterHolder) isNil ifTrue:[
+        holder := (LastShowNameFilter ? false) asValue.
+        holder onChangeEvaluate:[ LastShowNameFilter := holder value].
+        builder aspectAt:#showNameFilterHolder put: holder
     ].
     ^ holder
 
-    "Created: / 09-11-2017 / 20:14:58 / cg"
+    "Created: / 27-11-2017 / 15:21:27 / cg"
 !
 
 showingInheritedMethods