Use #image:/#label: instead of obsolete #form:
authorStefan Vogel <sv@exept.de>
Tue, 11 May 2004 18:41:57 +0200
changeset 2972 d66d46e04cd4
parent 2971 7a54d308f3ac
child 2973 cb5ac87985c9
Use #image:/#label: instead of obsolete #form:
DialogBox.st
--- a/DialogBox.st	Tue May 11 18:41:07 2004 +0200
+++ b/DialogBox.st	Tue May 11 18:41:57 2004 +0200
@@ -1657,7 +1657,7 @@
     box := OptionBox title:aString numberOfOptions:buttonLabels size. 
     box buttonTitles:buttonLabels
              actions:(buttonValues collect:[:v | [answer := v]]).
-    box form:(YesNoBox iconBitmap).
+    box image:(YesNoBox iconBitmap).
     default notNil ifTrue:[box defaultButtonIndex:default].
     box label:(boxLabelOrNil ? (self classResources string:'Confirm')).
     (i := buttonValues indexOf:true) ~~ 0 ifTrue:[
@@ -7961,7 +7961,7 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.229 2004-04-14 13:37:31 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.230 2004-05-11 16:41:57 stefan Exp $'
 ! !
 
 DialogBox initialize!