--- a/DialogBox.st Fri Apr 17 03:43:22 2015 +0000
+++ b/DialogBox.st Tue Apr 21 15:47:05 2015 +0200
@@ -1196,7 +1196,7 @@
information:aString
"launch a Dialog to tell user something"
- self information:aString title:aString
+ self information:aString title:(aString upTo:Character cr)
"
Dialog information:'help'
@@ -10388,11 +10388,11 @@
!DialogBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.370 2015-04-16 09:35:01 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.371 2015-04-21 13:47:05 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.370 2015-04-16 09:35:01 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.371 2015-04-21 13:47:05 cg Exp $'
! !