Button.st
changeset 899 aa84d3d39d94
parent 867 3c2a15b41f56
child 931 a22726fd8e32
--- a/Button.st	Thu Dec 19 14:48:24 1996 +0100
+++ b/Button.st	Thu Dec 19 14:50:56 1996 +0100
@@ -857,7 +857,7 @@
     (ReturnForm notNil and:[aDevice == ReturnForm graphicsDevice]) ifTrue:[
         ^ ReturnForm
     ].
-    f := Form fromFile:'Return.xbm' resolution:100 on:aDevice.
+    f := Image fromFile:'bitmaps/Return.xbm' resolution:100 on:aDevice.
     f isNil ifTrue:[
         f := Form width:24 height:16 fromArray:#[2r00000000 2r00000000 2r00000000
                                                  2r00000000 2r00000000 2r00000000
@@ -880,7 +880,7 @@
     ReturnForm := f.
     ^ f
 
-    "Modified: 5.7.1996 / 17:58:32 / cg"
+    "Modified: 19.12.1996 / 19:18:03 / cg"
 !
 
 returnLightFormOn:aDevice
@@ -892,7 +892,7 @@
     (ReturnLightForm notNil and:[aDevice == ReturnLightForm graphicsDevice]) ifTrue:[
         ^ ReturnLightForm
     ].
-    f := Form fromFile:'ReturnLight.xbm' resolution:100 on:aDevice.
+    f := Image fromFile:'bitmaps/ReturnLight.xbm' resolution:100 on:aDevice.
     f isNil ifTrue:[
         f := Form width:24 height:16 fromArray:#[2r00000000 2r00000000 2r00000000
                                                  2r00000000 2r00000000 2r00000000
@@ -915,7 +915,7 @@
     ReturnLightForm := f.
     ^ f
 
-    "Modified: 5.7.1996 / 17:58:30 / cg"
+    "Modified: 19.12.1996 / 01:00:00 / cg"
 !
 
 returnShadowFormOn:aDevice
@@ -927,7 +927,7 @@
     (ReturnShadowForm notNil and:[aDevice == ReturnShadowForm graphicsDevice]) ifTrue:[
         ^ ReturnShadowForm
     ].
-    f := Form fromFile:'ReturnShadow.xbm' resolution:100 on:aDevice.
+    f := Image fromFile:'bitmaps/ReturnShadow.xbm' resolution:100 on:aDevice.
     f isNil ifTrue:[
         f := Form width:24 height:16 fromArray:#[2r00000000 2r00000000 2r00000000
                                                  2r00000000 2r00000000 2r00000000
@@ -950,7 +950,7 @@
     ReturnShadowForm := f.
     ^ f
 
-    "Modified: 5.7.1996 / 17:58:28 / cg"
+    "Modified: 1.1.1970 / 01:00:00 / cg"
 !
 
 updateStyleCache
@@ -2017,5 +2017,5 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.67 1996-11-06 17:01:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.68 1996-12-19 13:50:04 cg Exp $'
 ! !