SettingsDialog.st
changeset 18238 45ebb140f966
parent 18237 04b56a4ead5b
child 18240 8465a9e40100
--- a/SettingsDialog.st	Mon Jun 25 14:29:13 2018 +0200
+++ b/SettingsDialog.st	Mon Jun 25 14:42:01 2018 +0200
@@ -2090,12 +2090,11 @@
             ok := false.
             (words contains:[:word | pattern match:word caseSensitive:false ])
             ifTrue:[
-                app window isNil ifTrue:[
-                    ok := true
-                ] ifFalse:[                
-                    widgetsToHighlight := self widgetsWithMatchingSearchStringIn:app.
-                    ok := widgetsToHighlight notEmptyOrNil.
-                ]    
+                ok := true.
+"/                app window notNil ifTrue:[
+"/                    widgetsToHighlight := self widgetsWithMatchingSearchStringIn:app.
+"/                    ok := widgetsToHighlight notEmptyOrNil.
+"/                ]    
             ].
             ok
         ].
@@ -2106,7 +2105,7 @@
         self highlightWidgetsWithMatchingSearchString.
     ].
 
-    "Modified (format): / 25-06-2018 / 14:29:04 / Claus Gittinger"
+    "Modified: / 25-06-2018 / 14:38:49 / Claus Gittinger"
 !
 
 unhighlightFoundItemsFromSearch
@@ -2173,7 +2172,7 @@
         "/ look which widget matches it in its helpKey or label
         
         anApplication window withAllSubViewsDo:[:eachView |
-            |wordsInWidget widgetHasIt label helpKey xLatedText helpText tooltip|
+            |wordsInWidget widgetHasIt label name helpKey xLatedText helpText tooltip|
 
             wordsInWidget := Set new.
              
@@ -2194,6 +2193,11 @@
                 label := label string.
                 wordsInWidget addAll:(allWords value:label)
             ].
+            name := eachView perform:#name ifNotUnderstood:nil.
+            (name notNil and:[name isString]) ifTrue:[
+                name := name string.
+                wordsInWidget addAll:(allWords value:name)
+            ].
             
             widgetHasIt := wordsInWidget contains:[:w | pattern match:w caseSensitive:false ].
             widgetHasIt ifTrue:[
@@ -2223,6 +2227,8 @@
         ].   
     ].
     ^ widgetsToHighlight.
+
+    "Modified: / 25-06-2018 / 14:36:35 / Claus Gittinger"
 ! !
 
 !SettingsDialog methodsFor:'selection'!