--- a/RadioButtonGroup.st	Thu Nov 23 03:26:58 1995 +0100
+++ b/RadioButtonGroup.st	Thu Nov 23 03:28:44 1995 +0100
@@ -10,8 +10,6 @@
  hereby transferred.
 "
 
-'From Smalltalk/X, Version:2.10.5 on 14-mar-1995 at 11:06:48 am'!
-
 OrderedCollection subclass:#RadioButtonGroup
 	 instanceVariableNames:'valueChannel groupID'
 	 classVariableNames:''
@@ -35,10 +33,6 @@
 "
 !
 
-version
-    ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.18 1995-11-15 16:20:34 cg Exp $'
-!
-
 documentation
 "
     RadioButtonGroups control the interaction between RadioButtons
@@ -181,20 +175,24 @@
 "
 
     "Created: 15.11.1995 / 17:14:53 / cg"
+!
+
+version
+    ^ '$Header: /cvs/stx/stx/libwidg/RadioButtonGroup.st,v 1.19 1995-11-23 02:28:44 cg Exp $'
 ! !
 
 !RadioButtonGroup methodsFor:'accessing'!
 
+groupID
+    ^ groupID
+
+    "Modified: 5.9.1995 / 16:04:33 / claus"
+!
+
 groupID:aSymbol 
     groupID := aSymbol
 
     "Modified: 5.9.1995 / 16:04:28 / claus"
-!
-
-groupID
-    ^ groupID
-
-    "Modified: 5.9.1995 / 16:04:33 / claus"
 ! !
 
 !RadioButtonGroup methodsFor:'accessing-mvc'!
@@ -246,27 +244,6 @@
 
 !RadioButtonGroup methodsFor:'update'!
 
-update:something with:someArgument from:changedButton
-    "
-     a RadioButton in this group has changed - notify the others
-    "
-
-    self elementChanged:(changedButton isOn) from:changedButton
-!
-
-queryFrom:aToggle
-    "a query from a toggle, if its the selected one"
-
-    self keysAndValuesDo:[:index :aComponent |
-       ((aToggle == aComponent) or:[aToggle isSubViewOf:aComponent]) ifTrue:[
-	    ^ valueChannel value == index
-       ]
-    ].
-    ^ false
-
-    "Modified: 14.11.1995 / 21:21:27 / cg"
-!
-
 elementChanged:aToggle
     "historic compatibility leftover - will vanish"
 
@@ -293,4 +270,26 @@
     self changed:#queryFrom:
 
     "Modified: 21.9.1995 / 13:42:06 / claus"
+!
+
+queryFrom:aToggle
+    "a query from a toggle, if its the selected one"
+
+    self keysAndValuesDo:[:index :aComponent |
+       ((aToggle == aComponent) or:[aToggle isSubViewOf:aComponent]) ifTrue:[
+	    ^ valueChannel value == index
+       ]
+    ].
+    ^ false
+
+    "Modified: 14.11.1995 / 21:21:27 / cg"
+!
+
+update:something with:someArgument from:changedButton
+    "
+     a RadioButton in this group has changed - notify the others
+    "
+
+    self elementChanged:(changedButton isOn) from:changedButton
 ! !
+