#DOCUMENTATION by exept
authorClaus Gittinger <cg@exept.de>
Tue, 09 Jul 2019 15:27:30 +0200
changeset 6624 67b49f362dd6
parent 6623 682c9f9e6a11
child 6625 c72c8b4646c4
#DOCUMENTATION by exept class: DialogBox class comment/format in: #modifyingBoxWith:do: #withCheckBoxFor:labelled:do: #withOptoutHolder:labelled:do: #withOptoutOption:labelled:andOptoutOption:labelled:do: #withOptoutOption:labelled:do: #withOptoutOption:labelled:warn: changed: #forRequestText:editViewClass:lines:columns:initialAnswer:initialSelection:model:
DialogBox.st
--- a/DialogBox.st	Sun Jul 07 15:14:41 2019 +0200
+++ b/DialogBox.st	Tue Jul 09 15:27:30 2019 +0200
@@ -3860,6 +3860,7 @@
         initialAnswer:initialText 
         setupWith:
             [:textView :dialog|
+                dialog title:(self classResources string:'Enter').
                 initialText notEmptyOrNil ifTrue:[
                     textModel value:initialText
                 ].