Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Sat, 07 May 2016 12:39:55 +0200
changeset 5712 001865a1591f
parent 5711 79fed9b84afe
child 5713 83f67e5544b8
#DOCUMENTATION by cg class: DialogBox comment/format in: #requestSelector:okLabel:initialAnswer:
DialogBox.st file | annotate | diff | comparison | revisions 
--- a/DialogBox.st	Sat May 07 12:39:42 2016 +0200
+++ b/DialogBox.st	Sat May 07 12:39:55 2016 +0200
@@ -6585,17 +6585,18 @@
         onCancel:nil
         list:nil
         initialSelection:nil
-        entryCompletionBlock:[:s :field| 
-                                |completion|
-
-                                completion := Smalltalk selectorCompletion:s.
-                                completion second size > 1 ifTrue:[ 
-                                    UserPreferences current beepInEditor ifTrue:[                
-                                        Screen current beep
-                                    ].
-                                ].
-                                field contents:(completion first)
-                              ]
+        entryCompletionBlock:
+            [:s :field| 
+                |completion|
+
+                completion := Smalltalk selectorCompletion:s.
+                completion second size > 1 ifTrue:[ 
+                    UserPreferences current beepInEditor ifTrue:[                
+                        Screen current beep
+                    ].
+                ].
+                field contents:(completion first)
+            ]
 
     "
      Dialog
hg/stx-libwidg