--- a/YesNoBox.st Tue Oct 28 21:02:12 1997 +0100
+++ b/YesNoBox.st Tue Oct 28 21:02:59 1997 +0100
@@ -166,16 +166,16 @@
This is the default image; you can overwrite this in a concrete
instance with the #image: message."
- <resource: #style (#requestBoxIcon #requestBoxIconFile)>
+ <resource: #style (#'requestBox.icon' #'requestBox.iconFile')>
|img imgFileName|
RequestBitmap isNil ifTrue:[
- img := StyleSheet at:'requestBoxIcon'.
+ img := StyleSheet at:'requestBox.icon'.
img notNil ifTrue:[
RequestBitmap := img
] ifFalse:[
- imgFileName := StyleSheet at:'requestBoxIconFile' default:'bitmaps/Request.xbm'.
+ imgFileName := StyleSheet at:'requestBox.iconFile' default:'bitmaps/Request.xbm'.
RequestBitmap := Image fromFile:imgFileName.
].
RequestBitmap notNil ifTrue:[
@@ -184,8 +184,8 @@
].
^ RequestBitmap
- "Created: 17.11.1995 / 18:16:47 / cg"
- "Modified: 11.4.1997 / 21:05:36 / cg"
+ "Created: / 17.11.1995 / 18:16:47 / cg"
+ "Modified: / 26.10.1997 / 17:06:19 / cg"
! !
!YesNoBox class methodsFor:'styles'!
@@ -422,5 +422,5 @@
!YesNoBox class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.38 1997-04-11 19:32:29 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/YesNoBox.st,v 1.39 1997-10-28 20:02:59 cg Exp $'
! !