EnterBox2.st
changeset 1764 45ca6b617934
parent 1760 631f902aaabe
child 2040 7e2052cb0c8c
--- a/EnterBox2.st	Sat Mar 06 03:14:43 1999 +0100
+++ b/EnterBox2.st	Sat Mar 06 04:04:04 1999 +0100
@@ -77,7 +77,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.19 1999-03-06 01:59:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EnterBox2.st,v 1.20 1999-03-06 03:03:56 cg Exp $'
 ! !
 
 !EnterBox2 methodsFor:'accessing'!
@@ -110,13 +110,15 @@
 !EnterBox2 methodsFor:'initialization'!
 
 initialize
+    <resource: #style (#'dialogBox.okAtLeft')>
+
     super initialize.
 
     "
      add a second ok-button (a return button)
     "
     okButton2 := Button okButton.
-    (styleSheet at:'dialogBox.okAtLeft') ifTrue:[
+    (styleSheet at:'dialogBox.okAtLeft'default:false) ifTrue:[
         buttonPanel addSubView:okButton2 before:okButton.
     ] ifFalse:[
         buttonPanel addSubView:okButton2 after:okButton.