--- a/MCVariableDefinition.st	Fri Jan 18 14:02:43 2013 +0100
+++ b/MCVariableDefinition.st	Fri Jan 18 14:02:44 2013 +0100
@@ -25,13 +25,6 @@
 	name := aString
 ! !
 
-!MCVariableDefinition methodsFor:'as yet unclassified'!
-
-printOn: aStream
-	super printOn: aStream.
-	aStream nextPut: $(; nextPutAll: self name; nextPut: $)
-! !
-
 !MCVariableDefinition methodsFor:'comparing'!
 
 = other
@@ -43,6 +36,13 @@
 	^ name hash
 ! !
 
+!MCVariableDefinition methodsFor:'printing'!
+
+printOn: aStream
+	super printOn: aStream.
+	aStream nextPut: $(; nextPutAll: self name; nextPut: $)
+! !
+
 !MCVariableDefinition methodsFor:'testing'!
 
 isClassInstanceVariable
@@ -72,13 +72,14 @@
 !MCVariableDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVariableDefinition.st,v 1.4 2012-09-11 21:30:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVariableDefinition.st,v 1.5 2013-01-18 13:02:44 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVariableDefinition.st,v 1.4 2012-09-11 21:30:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCVariableDefinition.st,v 1.5 2013-01-18 13:02:44 cg Exp $'
 !
 
 version_SVN
     ^ '§Id: MCVariableDefinition.st 5 2010-08-29 07:30:29Z vranyj1 §'
 ! !
+