Toggle.st
changeset 585 8f395aba0173
parent 441 e170bca66a78
child 593 86dd024ed773
--- a/Toggle.st	Thu Apr 25 19:16:52 1996 +0200
+++ b/Toggle.st	Thu Apr 25 19:26:41 1996 +0200
@@ -51,15 +51,18 @@
     If nonNil, the model is supposed to be a ValueHolder holding true or false.
 
 
-    instance variables:
-	showLamp          <Boolean>     true if a lamp should be displayed
-	lampColor         <Color>       color of the lamp
-	lampWidth         <Integer>     width of the lamp in pixel
-	lampHeight        <Integer>     height of the lamp in pixel
+    [instance variables:]
+        showLamp          <Boolean>     true if a lamp should be displayed
+        lampColor         <Color>       color of the lamp
+        lampWidth         <Integer>     width of the lamp in pixel
+        lampHeight        <Integer>     height of the lamp in pixel
 
-    styleSheet values:
-	toggleShowLamp    <Boolean>     if true, a lamp is shown; default:false.
-	toggleLampColor   <Color>       lamps color; default:yellow.
+    [styleSheet values:]
+        toggleShowLamp    <Boolean>     if true, a lamp is shown; default:false.
+        toggleLampColor   <Color>       lamps color; default:yellow.
+
+    [author:]
+        Claus Gittinger
 "
 !
 
@@ -499,5 +502,5 @@
 !Toggle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.26 1996-03-01 13:02:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Toggle.st,v 1.27 1996-04-25 17:24:24 cg Exp $'
 ! !