--- a/LabelAndIcon.st	Sat Jun 23 07:58:45 2001 +0200
+++ b/LabelAndIcon.st	Mon Jul 02 14:41:27 2001 +0200
@@ -232,6 +232,13 @@
     string := aString. 
 !
 
+gap
+    "return the spacing between the icon and the labelString.
+     The default is 4"
+
+    ^ gap
+!
+
 gap:pixels
     "set the spacing between the icon and the labelString.
      The default is 4."
@@ -453,5 +460,5 @@
 !LabelAndIcon class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/LabelAndIcon.st,v 1.28 2000-09-30 15:53:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/LabelAndIcon.st,v 1.29 2001-07-02 12:41:27 martin Exp $'
 ! !