--- a/MCRepository.st	Wed Nov 22 14:30:46 2006 +0100
+++ b/MCRepository.st	Mon Oct 26 16:24:55 2009 +0100
@@ -68,9 +68,11 @@
 !MCRepository class methodsFor:'class initialization'!
 
 initialize
-	"self initialize"
+        "self initialize"
 
-	ExternalSettings registerClient: self.
+    Smalltalk isSmalltalkX ifFalse:[
+        ExternalSettings registerClient: self.
+    ]
 ! !
 
 !MCRepository class methodsFor:'external settings'!
@@ -226,7 +228,11 @@
 !MCRepository class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepository.st,v 1.1 2006-11-22 13:21:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepository.st,v 1.2 2009-10-26 15:24:55 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCRepository.st,v 1.2 2009-10-26 15:24:55 cg Exp $'
 ! !
 
 MCRepository initialize!