class: DialogBox
authorClaus Gittinger <cg@exept.de>
Sat, 30 Mar 2013 20:14:25 +0100
changeset 4545 ce6a7f5f5583
parent 4544 84d2e978b4e2
child 4546 51a852797d70
class: DialogBox changed: #requestText:initialAnswer: default size of box a little bigger
DialogBox.st
--- a/DialogBox.st	Sat Mar 30 02:37:42 2013 +0100
+++ b/DialogBox.st	Sat Mar 30 20:14:25 2013 +0100
@@ -4696,7 +4696,7 @@
      Return a stringCollection or nil if cancelled."
 
     ^ self 
-        requestText:title lines:10 columns:40 initialAnswer:initialAnswer
+        requestText:title lines:10 columns:60 initialAnswer:initialAnswer
 
     "
      Dialog requestText:'Bla' initialAnswer:'Hello world'
@@ -9799,11 +9799,11 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.333 2013-03-28 02:23:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.334 2013-03-30 19:14:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.333 2013-03-28 02:23:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.334 2013-03-30 19:14:25 cg Exp $'
 ! !