Button.st
changeset 761 5bd603d649d6
parent 713 0c38ad51016d
child 781 51741bd620ab
--- a/Button.st	Wed Jun 12 14:55:00 1996 +0200
+++ b/Button.st	Wed Jun 12 14:56:24 1996 +0200
@@ -1538,6 +1538,8 @@
 !
 
 initStyle
+    <resource: #style (#name)>
+
     |hasGreyscales nm|
 
     super initStyle.
@@ -1662,7 +1664,7 @@
         ].
     ].
 
-    "Modified: 28.5.1996 / 21:11:04 / cg"
+    "Modified: 12.6.1996 / 14:55:58 / cg"
 !
 
 initialize
@@ -1719,10 +1721,14 @@
 !Button methodsFor:'queries'!
 
 is3D
+    <resource: #style (#name)>
+
     "return true, if the receiver is a 3D style view"
 
     styleSheet name == #mswindows ifTrue:[^ true].
     ^ super is3D
+
+    "Modified: 12.6.1996 / 14:56:03 / cg"
 !
 
 isOn
@@ -2001,5 +2007,5 @@
 !Button class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.62 1996-05-29 10:18:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Button.st,v 1.63 1996-06-12 12:56:24 cg Exp $'
 ! !