# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1037008159 -3600
# Node ID 98a32f29fa08e01483d02fffd7c624e9a91ce2f4
# Parent  1352e7b3ac67f4e6829f469a97b81ef414377c59
access to number of choices

diff -r 1352e7b3ac67 -r 98a32f29fa08 RadioButtonGroup.st
--- a/RadioButtonGroup.st	Wed Nov 06 12:08:23 2002 +0100
+++ b/RadioButtonGroup.st	Mon Nov 11 10:49:19 2002 +0100
@@ -303,8 +303,14 @@
     "Modified: / 30.10.1997 / 20:14:54 / cg"
 ! !
 
+!RadioButtonGroup methodsFor:'queries'!
+
+numberOfValues
+    ^ numberOfValues
+! !
+
 !RadioButtonGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.32 2001-10-18 16:52:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.33 2002-11-11 09:49:19 cg Exp $'
 ! !