# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 862576884 -7200
# Node ID ea14fe927a8be065a29bf977bfbe1f54cff662b1
# Parent  64a356e640fcef7576735f0c873d941ce1ba0626
preps for native window support

diff -r 64a356e640fc -r ea14fe927a8b CheckBox.st
--- a/CheckBox.st	Fri May 02 09:43:55 1997 +0200
+++ b/CheckBox.st	Fri May 02 14:41:24 1997 +0200
@@ -684,8 +684,28 @@
     "Modified: 19.7.1996 / 20:43:47 / cg"
 ! !
 
+!CheckBox methodsFor:'queries - internal'!
+
+nativeWindowType
+    "return a symbol describing my native window type 
+     (may be used internally by the device as a native window creation hint)"
+
+    ^ #CheckBox
+
+    "Created: 2.5.1997 / 14:41:00 / cg"
+!
+
+windowStyle
+    "return a symbol describing my style 
+     (may be used internally by the device as a decoration hint)"
+
+    ^ #checkBox
+
+    "Created: 2.5.1997 / 14:40:25 / cg"
+! !
+
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.43 1997-04-01 11:22:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.44 1997-05-02 12:41:24 cg Exp $'
 ! !