Index: Tools/Install.cls.xml
===================================================================
diff -u -r1436 -r1439
--- Tools/Install.cls.xml	(.../Install.cls.xml)	(revision 1436)
+++ Tools/Install.cls.xml	(.../Install.cls.xml)	(revision 1439)
@@ -13,6 +13,12 @@
 </Property>
 
 <Method name="SetupLocal">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Do ..%New().SetupLocalInternal()
+]]></Implementation>
+</Method>
+
+<Method name="SetupLocalInternal">
 <Implementation><![CDATA[
 	If ($G(^SYS("IsDataMOmgeving"),0)) {
 		Do ..InitieerPoortOpComputerNaamArray()
@@ -105,6 +111,8 @@
 		#dim ComputerNaam As %String = PoortOpComputerNaamIt.Next()
 		#dim Poort As %Integer = PoortOpComputerNaamIt.Key()		
 		set ^cLOG($$$Server,"QQM",Poort,$$$NSpace)="K\1\"
+		
+		Set ^cLOG($$$Server,"DEV",Poort) = "MC"
 	}
 ]]></Implementation>
 </Method>