--- a/CheckBox.st	Mon Sep 15 22:04:25 1997 +0200
+++ b/CheckBox.st	Mon Sep 15 22:45:47 1997 +0200
@@ -11,6 +11,8 @@
 "
 
 
+'From Smalltalk/X, Version:3.1.10 on 14-sep-1997 at 12:13:10 am'                !
+
 HorizontalPanelView subclass:#CheckBox
 	instanceVariableNames:'toggleView labelView labelForegroundColor
 		disabledLabelForegroundColor'
@@ -630,6 +632,15 @@
         toggleView := CheckToggle in:self.
     ].
 
+    (StyleSheet at:'checkBoxStyle' default:StyleSheet name) == #motif ifTrue:[
+        toggleView activeLogo:nil.
+        toggleView passiveLogo:nil.
+        toggleView activeLevel:-2.
+        toggleView passiveLevel:2.
+        toggleView extent:10@10.
+        toggleView sizeFixed:true.
+    ].
+
     "/ my controller handles both components
     labelView setController:controller.
     toggleView setController:controller.
@@ -648,7 +659,7 @@
      b open
     "
 
-    "Modified: 7.3.1997 / 17:48:46 / cg"
+    "Modified: 14.9.1997 / 12:12:25 / cg"
 ! !
 
 !CheckBox methodsFor:'private'!
@@ -700,5 +711,5 @@
 !CheckBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.46 1997-08-07 10:57:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/CheckBox.st,v 1.47 1997-09-15 20:45:46 cg Exp $'
 ! !